Einzelnen Beitrag anzeigen

thomasschaf
(Gast)

n/a Beiträge
 
#4

AW: Dynamisch Erstellter Button - NAME

  Alt 15. Aug 2011, 18:33
Ok, aber wie würde das mit den Arrays gehen ?

Also ich würde dann so was in der Art machen:


Code:
procedure TForm1.Button1Click(Sender: TObject);
var
  a: TButton;
  i: Integer;
begin
  for i:=1 to 100 do begin

  a    := TButton.Create(self);
  a.Parent := Form1;
  a.Visible := True;
  a.Top := 50*i+10;
  a.Left := 10;
  a.Width := 100;
  a.Height := 45;
  a.Caption := 'Der '+inttostr(i)+'. Button!';

  end;
end;
Aber wie meint ihr das mit dem Array ?

Danke!
  Mit Zitat antworten Zitat