Un ejemplo para hacer lo que pedís.
Código Delphi
[-]
Var
MiBoton : TButton; begin
MiBoton := TButton.Create(Form1);
with MiBoton do begin
Parent := Form1; height := 30;
width := 120;
caption := 'Mi Botón';
left := (Form1.ClientWidth - width) div 2;
top := (Form1.ClientHeight - height) div 2;
end;
end;
Un saludo