Puedes acceder al Canvas de TLabel y de ahí al método: TextWidth;
Te dará el ancho del texto del label segun los parámetros actuales (configurados en el Canvas); Es cuestión de ir cambiando el tamaño de la fuente (Label.Font.Size) hasta que TextWidth te de un ancho que se ajuste a lo que tú necesitas.
No se si me expliqué claramente.
|