Função Abrir Form

Boa tarde a todos!   Há uma função para criar forms, que achei muito interessante, que está disponível na vídeo-aula da locadora, do Marcelo Pimenta.   procedure AbreForm(aClasseForm: TComponentClass; aForm: TForm);
begin
  Application.CreateForm(aClasseForm, aForm);
  try
    aForm.ShowModal;
  finally
    FreeAndNil(aForm);
  end;
end;     No form principal, para abrir uma tela de clientes:   AbrirForm(tfrmClientes, frmClientes);     Quando uso alguma função onde passo o formulário como parâmetro, dá erro de access violation. Então, resolvi verificar em um botão que eu coloquei no form de clientes se este está criado em memória. Eu a fiz também dentro da procedure AbreForm:   No form clientes (dentro de um botão):   if not Assigned(frmClientes) then   showmessage('Form não criado') else   showmessage('Form criado')   Dentro da procedure:   Application.CreateForm(aClasseForm, aForm);
try   if not Assigned(aForm) then     showmessage('Form não criado') else   showmessage('Form criado')
   aForm.ShowModal;
finally
   FreeAndNil(aForm);
end;
  Fazendo o debug, ao passar pela procedure, ele dá a mensagem de 'Form criado', agora quando clico no botão, dá a mensagem 'Form não criado', e o interessante é que a tela está sendo visualizada, mas por algum motivo está perdendo a referência na memória. Se eu escrever o código sem usar procedure, por exemplo:     Application.CreateForm(tfrmClientes, frmClientes);
  try
    frmClientes.ShowModal;
  finally
    FreeAndNil(frmClientes);
  end;     Da forma acima funciona numa boa. Eu sei que a procedure facilita muito principalmente se tiver que mudar algum detalhe, mas eu não consigo utilizá-la.   Eu até fiz uma uma gambiarra pra fazer a coisa funcionar na marra. No evento onshow do form de clientes, coloquei este código:     if not Assigned(frmClientes) then Application.CreateForm(tfrmClientes, frmClientes);   Funcionar, funciona, mas ter que colocar essas verificações nos outros forms é dose pra leão, sem falar que fica um código esquesito, não sei o que vocês acham.   Gostaria de saber se já passaram por esta situação e se há uma solução para este caso.   Agradeço a todos pela atenção.   Abraços.   Rogério