Ja som to celé akosi nepobral, čo vlastne chceš docieliť a načo Ti treba ďalší "setup form"... Čo zamýšľaš Ty, musíš si to aj vedieť premyslieť prečo práve tak, alebo inak.
Či nebude chyba tu: "Vytvořím prazdný form1 určite šiřky a 0 vyšky."
Takto si pridáš niekoľko tlačítok za behu:
var
B: TButton;
i: Integer;
begin
for i := 0 to 9 do
begin
B := TButton.Create(Self);
B.Caption := Format('Button %d', [i]);
B.Parent := Self;
B.Height := 23;
B.Width := 100;
B.Left := 10;
B.Top := 10 + i * 25;
end;
end;