Código Delphi [-] procedure TForm1.FormCreate(Sender: TObject); var ALabel: TLabel; begin ALabel := TLabel.Create(Self); ALabel.Parent := Self; ALabel.Align := alClient; ALabel.Alignment := taCenter; ALabel.Layout := tlCenter; ALabel.Caption := 'Texto centrado'; end;
procedure TForm1.FormCreate(Sender: TObject); var ALabel: TLabel; begin ALabel := TLabel.Create(Self); ALabel.Parent := Self; ALabel.Align := alClient; ALabel.Alignment := taCenter; ALabel.Layout := tlCenter; ALabel.Caption := 'Texto centrado'; end;