TButton 정렬 변경하기.

procedure TForm1.Button3Click(Sender: TObject);
var
  AStyle:Integer;
begin
  AStyle:=GetWindowLong(Button1.Handle,GWL_STYLE);
  AStyle:=AStyle or BS_LEFT;
  SetWindowLong(Button1.Handle,GWL_STYLE,AStyle);

end;