[fortran]

Viene a ser lo mismo que hago yo.

procedure TPrincipal.Botonverformulario(Sender: TObject);
begin
Application.CreateForm(Tformularioaver,Formularioaver);
Try
Formularioaver.showModal;
finally
formularioaver.Free;
end;
end;