Tworzenie dynamicznie komponentów na Formie

Witam
No właśnie mam takie pytanie jak stworzyć dynamicznie komponent np.: Button na dynamicznie stworzonej formie robiłem coś takiego

procedure Okno;
var
Forma:TForm;
Button: TButton;
begin

Forma:=TForm.Create(nil);
Button:=TButton.Create(nil);
Forma.Show;
Button.Left:=10; // pozycja X przycisku na formularzu
Button.Top:=10; // pozycja Y przycisku na formularzu
Button.Width:=140; // szerokość przycisku
Button.Height:=40; // wysość przycisku
Button.Caption:='Przycisk dynamiczny'; // podpis przycisku
Button.Parent:=nil; // rodzic przycisku
Button.Visible:=True; // czy przycisk widoczny?
end;

A ”Buttona” jak nie było tak nie ma może wy coś poradzicie na to.

Z góry dziękuje.

Button:=TButton.Create(Forma);
Button.Parent:=Forma;

Dodatkowo, proponuję kod o takiej strukturze:

with TButton.Create(Forma) do
  begin
  Parent:=Forma;
  SetBounds(10, 10, 140, 40);
  Caption:='Przycisk dynamiczny';
  end;

Dzięki [browar]