[The Shadow]

Напиши в событии OnCreate формы:

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
Button1.Left:=(ClientWidth - Button1.Width) div 2;
Button1.Top:=(ClientHeight - Button1.Height) div 2;
end;