Créeation de composant

Résolu
mathieu57100 Messages postés 103 Date d'inscription jeudi 24 juin 2004 Statut Membre Dernière intervention 9 février 2006 - 12 juil. 2005 à 11:15
divadav Messages postés 94 Date d'inscription lundi 13 janvier 2003 Statut Membre Dernière intervention 22 janvier 2009 - 12 juil. 2005 à 11:51
bonjour,
j'ai suivis un tuto pour la création de composant, un label qui ressemble à un lien hypertexte et qui lance soit le navigateur par défaut soit le logiciel de messagerie par défaut.
le code obtenu est le suivant:

unit TLabelLien;
interface
uses
SysUtils, Classes, Controls, StdCtrls;


type
TLabelLien = class(TLabel)
private
{ Déclarations privées }
protected
{ Déclarations protégées }
public
{ Déclarations publiques }
published
{ Déclarations publiées }
end;


procedure Register;


implementation


procedure Register;
begin
RegisterComponents('Supplément', [TLabelLien]);
end;


end.

sauf que dans le code il me souligne TLabelLien de la 6e ligne...en me disant dans une info-bulle: << identificateur redéclaré 'TLabelLien' >>

Que puisje faire?
merci pour vos réponses.

3 réponses

Gildeplomb Messages postés 102 Date d'inscription samedi 29 décembre 2012 Statut Membre Dernière intervention 24 mars 2021
12 juil. 2005 à 11:46
Bonjour

Ben a mon avis il ne faut pas donner le meme nom a l'unité et au type
3
Gildeplomb Messages postés 102 Date d'inscription samedi 29 décembre 2012 Statut Membre Dernière intervention 24 mars 2021
12 juil. 2005 à 11:44
0
divadav Messages postés 94 Date d'inscription lundi 13 janvier 2003 Statut Membre Dernière intervention 22 janvier 2009 2
12 juil. 2005 à 11:51
Salut !!

Une simple correction à ton unité : change son nom !!

Tu ne peut pas donner le même nom à ton unité et au type que tu crée... Donc, sur la première ligne, il faut que tu corrige

unit TLabelLien;
en
unit LabelLien;

et ça devrait marcher !

N'oublie pas de valider si la réponse te convient !

Keep Cool & Be Wild
Divad
0
Rejoignez-nous