tlabel como Centrar ?

[Pascual Montes]

Hola colega tengo 3 tlabel en mi forma
con longitud fija y en tiempo de diseño la longuitud la ajusto todos
los label iguales para que se vean parejas y el contenido caption
lo centro tambien en la propiedad alingment = tacenter para que
centre el contenido del caption, el problema es en tiempo de ejecucion
cuando cambio el contenido caption se pierde el tamaño del tlabel
se cambia a una longitud del mismo tamaño del contenido, es decir
se ajusta el tamaño, y obvio se pierde la alineacion , ya no se ven
centrados los tlabel's. tuve que re-formatear las propiedades en runtime
para que se reajusten y se vean centradas . asi

label13.caption:=timetostr(time());
label15.caption:=sdia[dayofweek(date())];
label16.caption:=' '+inttostr(DayOfTheMonth(date()))+'/'+smes[monthof(date())]+'/'+inttostr(yearof(date()))+' ';
label13.Height:=81;
label13.Width:=257;
label15.Height:=56;
label15.Width:=257;
label16.Height:=32;
label16.Width:=257;
label13.Alignment:=tacenter;
label15.Alignment:=tacenter;
label16.Alignment:=tacenter;

como puedo hacer para que en tiempo de diseño permanezca el
formato igual al ejecutar ?

\gracias y saludos