Validar Usuario

[Kenlyr]

Despues de que lo corro step by step y llega al DMcasos.qryUsuario.Open;
el error que me da es de insufficient Memory for this operation

El codigo completo de ese evento onclick:

Código Delphi [-]
procedure TFM_Casos.B_AceptarClick(Sender: TObject);
begin
 DMcasos.qryUsuario.Close;
 DMcasos.qryUsuario.SQL.Text;
  DMCasos.qryUsuario.parambyname('IDENT').AsString := E_Usuario.text;
  DMcasos.qryUsuario.Open;
 
 if not DMcasos.qryUsuario.IsEmpty then
   begin
     Fm_Acceso.Show;
   end
   else
    begin
     MessageDlg('Usuario o Contraseña Incorrecta, Intente nuevamente', mterror, [mbOk], 0);
      E_Usuario.SetFocus;
    end;

end;