OK merci les gars, surtout de la rapidité de la reponse sa fait plaisir :)
-------------------------------
Réponse au message :
-------------------------------
Il faudrait peut-être avoir un lien sur chaque bouton créer pour pouvoir mieux les gérer ou bien les détruire. Tu pourrais référencer dans un TObjectList tout les bouton créés.
-------------------------------
Réponse au message :
-------------------------------
Exemple :
var but:array [1..10] of TButton;
procedure TForm1.FormCreate(Sender: TObject);
begin
but[1] := TButton.Create(Self);
but[1].Parent := Form1;
but[1].Left := 20;
but[1].Top := 20;
but[1].Visible := True;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
but[1].Free;
end;
Bruto --- Le p'tit belge --- pour vous servir
-------------------------------
Réponse au message :
-------------------------------
voila j'aimerai faire quelque chose comme sa :
var i:integer;
begin
for i:=1 to 10 do
begin
Tbutton(inttostr(i)).create;
end;
je sais que c'est possible mais je ne sais pas comment.
Aider moi sVp