TButton multilinea

[CID]

Código

SetWindowLong(Button1->Handle,GWL_STYLE, GetWindowLong(Button1->Handle, GWL_STYLE) | BS_MULTILINE);
Button1->Caption = "Linea 1\nLinea 2";