Mensaje    Asunto: Alinear el texto de un botón Responder citando

code:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DWORD dwStyle = GetWindowLong(Button1->Handle, GWL_STYLE);
dwStyle = dwStyle | BS_RIGHT;
//(o BS_LEFT, o BS_CENTER)
SetWindowLong(Button1->Handle, GWL_STYLE, dwStyle);
Button1->Invalidate();
}