Hola rufo.
Si ya creaste el formulario en diseño, haciendo: File->New-Form, y sacaste el mismo de Auto-create forms; para crearlo el código podría ser:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
with TForm2.Create(Self) do
try
ShowModal;
finally
Free
end;
end;
Supongo que de eso se trata.
Ahora si te piden crear los componentes totalmente en tiempo de ejecución, sería algo como esto:
Código Delphi
[-]
procedure TForm1.Button2Click(Sender: TObject);
var
F: TForm;
begin
F:= TForm.Create(Self);
with F do
begin
Caption:= 'Creado en ejecución';
Height:= 400;
Width:= 600;
with TEdit.Create(Self) do
begin
Left:= 8;
Top:= 8;
Height:= 25;
Width:= 200;
Parent:= F;
end;
with TMemo.Create(Self) do
begin
Left:= 300;
Top := 8;
Height:= 200;
width:= 100;
Parent:= F;
end;
ShowModal;
end;
end;
Esto último es sólo un ejemplo. Lógicamente con las necesarias comprobaciones, asignaciónes de eventos,
liberación de recursos, etc., la cosa se complica bastante más...
Saludos.