Label in Bevel zentrieren

[himitsu]

Die Werte im OI kann man doch auch zur Laufzeit noch zuweisen.

Delphi-Quellcode:

TextFeld := TLabel.Create(OkBottomDlg);
With TextFeld do Begin
     Parent := OkBottomDlg;
     AutoSize := False;           {}
     Alignment := taCenter;       {}
     Top := 14;                   {NewBevel.Top + 1}
     Left := 14;                  {NewBevel.Left + 1}
     Width := Bevel1.Width - 12;  {NewBevel.Width - 2}
     Caption := 'TEXTZEILE';
     Font.Color := clWindowText;
     Font.Height := -11;
     Font.Name := 'Courier New';
     Font.Style := [];
End;