Muy buenas, tengo el siguiente problema:
Estoy intentando crear un formulario sencillo en tiempo de ejecución donde se muestran unas TLabel
, y necesito que estén centradas y a una altura determinada cada una. He podido centrarlas correctamente utilizando TLabel.Align := alClient
y TLabel.Alignment := taCenter
, pero no logro asignarle la altura que necesito, porque TLabel.Layout
sólo me deja especificar arriba, centro o abajo.
¿Cómo puedo asignarle a la TLabel
un valor de altura como por ejemplo ClientHeight div 3
?
Tengo este código para crear una label:
with TLabel.Create(Self) do
begin
Align := alClient;
Alignment := taCenter;
Top := (F.ClientHeight div 3) * 2;
caption:= 'Texto de la etiqueta';
Font.Size:= 18;
Font.Color := RGB(128, 0, 0);
Parent:= F;
end;
Parece que al aplicar Align
y Alignment
ignora lo que le especifico en Top
, entonces no sé cómo darle el valor deseado.
EDIT:
Estoy usando Lazarus v1.6RC1
en Windows 10
. La aplicación también es para Windows 10
.
Gracias de antemano.