Ajout d'uncomposant

Signaler
Messages postés
8
Date d'inscription
jeudi 5 mars 2009
Statut
Membre
Dernière intervention
29 mai 2010
-
hammadiest
Messages postés
8
Date d'inscription
jeudi 5 mars 2009
Statut
Membre
Dernière intervention
29 mai 2010
-
salut
j'ai un code qui fait l'ajout d'un label dans le meme form sil vous plait aider moi pour faire l'ajout dans un form différent du premier
et voila le code.

var
  NewLabel: TLabel;
begin
    NewLabel := TLabel.Create(self);
    NewLabel.Parent := self;
    NewLabel.Top := 20;    
    NewLabel.Left := 20 * 20;
    NewLabel.Caption := 'nomCaption'
  end;
end;


et merci d'avance

2 réponses

Messages postés
418
Date d'inscription
mardi 3 janvier 2006
Statut
Membre
Dernière intervention
26 novembre 2013
3
Salut.

"Self" référence l'objet dans lequel la méthode est appelée.

Si tu utilises Self dans une procédure de Form1 (ex : procedure TForm1.Faire) : self = Form1.
C'est l'exemple que tu donnes.

Pour créer dans une procédure de Form1 un label sur Form2 :
NewLabel := TLabel.Create(Form2);
NewLabel.Parent := Form2;

A +
Thierry
Messages postés
8
Date d'inscription
jeudi 5 mars 2009
Statut
Membre
Dernière intervention
29 mai 2010

merci mon ami sur l'explication

je voulut maintenant que le label reste une fois pour tout dans l'exécution après que je lance
l'exécution la première fois