void __fastcall TForm1::FormShow(TObject *Sender)
{
	int Left = (Screen->Width - Form1->Width) / 2;
	int Top = (Screen->Height - Form1->Height) / 2;

	Form1->Top = Top;
	Form1->Left = Left;
}