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;