Hallo,
ich versuche ein Formular mit Button zur Laufzeit zu erstellen, ich bekomme aber das Form ohne Button.
Delphi-Quellcode:
unit:Form2
...
procedure TForm2.FormCreate(Sender: TObject);
var
button:TButton;
begin
button := TButton.create(self);
button.left:=10;
button.top:=10;
button.width:=17;
button.height:=17;
button.Parent := self;
end;
dieses Formular wird auf FormMain mit einem Button Click aufgerufen
Delphi-Quellcode:
unit:TFormMain
..
procedure TFormMain.Btn1Click(Sender: TObject);
var:
Form: TForm2;
begin
Form:= TForm2.Create(self);
Form.show;
end;
Was mache ich denn Falsch?
Danke.