Comment géré l envennement d un bouton

Résolu/Fermé
Zaydoun_391 Messages postés 10 Date d'inscription mercredi 30 novembre 2005 Statut Membre Dernière intervention 28 novembre 2007 - 18 nov. 2007 à 18:36
Zaydoun_391 Messages postés 10 Date d'inscription mercredi 30 novembre 2005 Statut Membre Dernière intervention 28 novembre 2007 - 18 nov. 2007 à 18:36
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;
Rejoignez-nous