Set form position in FormCreate event handler: procedure TForm1.FormCreate(Sender: TObject); begin Left:=(Screen.Width-Width) div 2; Top:=(Screen.Height-Height) div 2; end;