Guten Morgen alle zusammen!
Also ich möchte nach Eingabe einer Zahl im TEdit je nach Anzahl labels erstellen. Also das klappt auch alles wunderbar nur wenn sie erstellt sind verschwindet der Button...Das versteh ich nicht so recht hoffe ihr könnt mir helfen!
Delphi-Quellcode:
procedure TForm1.BtnEinlesenClick(Sender: TObject);
var lab: TLabel;
begin
For i:=1 To StrToInt(edtanzahl.Text) Do Begin
zaehler:=zaehler+20;
Lab.Visible := true;
Lab.Parent := GroupBox1;
Lab:= TLabel.Create(GroupBox1);
Lab.Top:= 20+zaehler;
Lab.Left:= 14;
Lab.Caption:= IntToStr(i)+'. ';
end;
end;