in Laufzeit Objakt hinzufügen

[Remote1]

könnt das so gehn:

Delphi-Quellcode:

var MyButton: TButton;
begin
  MyButton := TButton.Create(Form1);
  with MyButton do begin
    Parent := Form1;
    Height := 32;
    Width := 128;
    Caption := 'Neuer Button';
    Left := 50;
    Top := 50;
    OnClick:=ButtonXClick;
  end;
end;