SetWindowLong(Button1->Handle,GWL_STYLE,GetWindowLong(Button1->Handle,GWL_STYLE)|BS_MULTILINE); 
Button1->Caption="a\nlot\nof\nstrings";