Comment géré l envennement d un bouton [Résolu/Fermé]

Signaler
Messages postés
10
Date d'inscription
mercredi 30 novembre 2005
Statut
Membre
Dernière intervention
28 novembre 2007
-
Messages postés
10
Date d'inscription
mercredi 30 novembre 2005
Statut
Membre
Dernière intervention
28 novembre 2007
-
dans cette exemple j ai crée un bouton je veux savoir comment je géré son évènement lorsque je clik, bon la résultat par exemple je change le nom du form ou changé le button.caption

var
Form1: TForm1;
btn: array[0..30,1..2] of TControl;

implementation

{$R *.dfm}

procedure TForm1.creationbutton(Sender: TObject);
var
i: integer;
begin

btn[1,2]:= Tbutton.Create(form1);
( btn[1,2] as Tbutton ).Parent:= form1;
( btn[1,2] as Tbutton ).Caption:= 'azeryuio';
( btn[1,2] as Tbutton ).Width:= 130;
( btn[1,2] as Tbutton ).Height:= 50;
( btn[1,2] as Tbutton ).Top:= 200;
( btn[1,2] as Tbutton ).Left:= 150;
//( btn[1,2] as Tbutton ).OnClick := ?????// je veux changé le nom du form1.caption



end;