void __fastcall TForm1::FormResize(TObject *Sender){//button1 的位置一直在窗体的最右边 Button1->Left = Form1->ClientWidth - Button1->Width;}