[Ramsay]

Hola , estoy tratando de lograr crear un label que se posicione perfectamente al medio del form teniendo en cuenta el tamaño de la letra.

Mi codigo :

Código Delphi [-]
procedure form123();
var
  new_label: TLabel;
var
  form_new: TForm;
begin

  form_new := TForm.Create(nil);

  new_label := TLabel.Create(form_new);

  form_new.Caption := 'hola';
  form_new.Width := 500;
  form_new.Height := 300;

  new_label.Alignment := taCenter;
  new_label.Layout := tlCenter;
  new_label.Parent := form_new;
  new_label.Caption := text;
  new_label.Font.Color := clRed;
  new_label.Font.Size := 27;
  new_label.AutoSize := False;

  // new_label.Top := form_new.Height div 2;
  // new_label.Left := form_new.Width div 2;

  new_label.Left := (form_new.Width - new_label.Width) div 2;

  new_label.top := (form_new.Height - new_label.Height) div 2;

  new_label.Show;

  form_new.Show;

end;

Casi lo logro pero el label esta un poco mas abajo y un poco mas a la derecha del verdadero centrado. ¿ Alguien me podria ayudar ?