El problema, es que si estás utilizando como alineación para el componente TLabel.Align := alClient
, esto hará que el componente se ajuste de forma automática (para su ancho y su alto) para ocupar todo el espacio disponible del componente que lo contiene.
Al ser así, las propiedades ancho y alto ya no puedes asignarlas de forma manual como comentas (label1.width := ClientHeight div 3
), porque serán ignoradas.
Tendrás que cambiar la propiedad de alineación (TLabel.Align
) y entonces podrás asignar manualmente el ancho y el alto.