Centrar

[ecfisa]

Empezado por aldodzb

No no, quiero poner una etiqueta centrada en el form. Osea lo que quiero centrar es la etiqueta (label)

Entonces sería:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  with Label1 do
  begin
     Left:= (Self.ClientWidth - Width ) shr 1;  // centrado horizontal
     Top:= (Self.ClientHeight - Height) shr 1;  // centrado vertical
  end;
end;

Un saludo.