Lo que yo quiero hacer es algo mas o menos parecido pero no es del todo eso, adjunto el código de lo que hago que no me funciona. El procedimiento en si hace varias cosas más yo deje solamente la parte que no me funciona y me interesaria que me ayuden. Espero ser mas claro
Código Delphi
[-]
procedure EjecutarForm(var pForm: TfrmForm);
begin
inherited;
pForm.ExecuteModal(self)
end;
Para despues llamar a la ejecución de un form de la siguiente manera
EjecutarForm(TfrmVenta);