Hola.
Agregando algo a lo que bién sugirió
escafandra, si deseas aplicarlo a todos los botones de un mismo contenedor:
Código:
void WordWrapButtons(TWinControl* aParent)
{
for(int i=0; i < aParent->ControlCount; i++)
if(aParent->Controls[i]->ClassNameIs("TButton")) {
TButton *b = static_cast<TButton*>(aParent->Controls[i]);
SetWindowLong(b->Handle,
GWL_STYLE,
GetWindowLong(b->Handle, GWL_STYLE) | BS_MULTILINE);
b->Refresh();
}
}
Ejemplo de llamadas:
Código:
...
WordWrapButtons(Form1);
WordWrapButtons(Panel1);
...
Saludos