Forum: Sonstige Fragen zu Delphi
Delphi
by turboPASCAL,
27. Feb 2006
Verschibe mal "procedure Click(Sender: TObject); " in die private Deklaration.
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
procedure Click(Sender: TObject);
//...
Forum: Sonstige Fragen zu Delphi
Delphi
by turboPASCAL,
27. Feb 2006
Da der Button selbst ein Fenster ist muss ihm noch ein Parent zugewiesen werden damit er weis auf welchem Fenster er erscheinen soll.
procedure TForm1.FormCreate(Sender: TObject);
var i:Integer;
begin
for i:=0 to 20 do
begin
buttons:=TButton.create(form1);
buttons.Visible:=true;