Chamar formulário cadastrado em banco usando Delphi 7

Olá pessoal,

Uso Delphi 7 e tenho formulários cadastrados em banco de dados e quero montar um menu onde cada formulário será chamado via consulta SQL de acordo com o perfil de cada usuário e que esteja ativo (1) para aquele usuário. Todos os formulários estão na seção implementation. Tentei fazer o código:

>
procedure TFrmMenuPrincipal.ChamaForm;
Var

 vlFc : TFormClass;
 vlF : TForm;

 ChamaForm(CONSULTA, DMDados.Login.FieldByName('Usu_ID').AsInteger, ComboFormulario.EditValue, 1);
 If CONSULTA.RecordCount > 0 Then
 Begin
 vlF.Name:=vlNome;
 vlFc:=TFormClass(vlF);
 Application.CreateForm(vlFc, vlF);
 vlF.ShowModal;
 End
 Else If CONSULTA.RecordCount = 0 Then Begin
 ShowMessage('Você não tem permissão para acessar este formulário.');
 End;
end;

Mas aparece o erro:

Access violation at address 6E6F7474. Read of address 6E6F7474.

Alguém poderia me ajudar?

Grato,

Ilano.