Dynamisches Anlegen von Labels

[Ricane]

Zitat von remie:

Hi ich hab ein Problem und zwar will ich ein Label Dynamisch anlegen,
habe auch schon den code dafür geschriegen aber irgend wie will er nicht
vieleicht wisst ihr ja was ich Falsch gemacht habe

Code

Code:

var lb : TLable;

...

lb := TLabel.Create(self);
lb.Visible := false;
lb.Font.Size := 13;
lb.Font.Style := [fsBold];
lb.Top := 16;
lb.Left := 140;
lb.Caption := 'TEXT';
lb.Visible := true;

Thx im voraus

Also erstmal heissen die Dinger ja "TLabel", was sicherlich schon ein Problem werden dürfte...

Dann würde ich folgenden Code anwenden:

Delphi-Quellcode:

Var
  EinLabel: TLabel;

With EinLabel Do
Begin
  Create(frmMain);
  Parent := frmMain;
  Visible := True
  Font.Size := 13;
  Font.Style := [fsBold];
  Top := 16;
  Left := 140;
  Caption := 'TEXT';
End;

Das dürfte funzen...

Beste Grüsse,

Ricane



PS: Wirft er bei der Lable Nummer keine Exception aus ?!?!?!