Ver Mensaje Individual
  #1  
Antiguo 07-05-2005
Avatar de Capo
Capo Capo is offline
Miembro
 
Registrado: jul 2004
Posts: 64
Reputación: 20
Capo Va por buen camino
Listado de codigos de excepciones ADO

Hola Compañeros.
Estoy trabajando Delphi7+Ms SQL Server con ADO y estoy intentando manejar excepciones, en lo posible necesito informacion de donde sacar la lista de excepciones del gestor de base de datos utilizando ADO. ejemplo:

Hasta donde entiendo:
Si el codigo del error "Campo requerido" arrojado por el DbEngine utilizando DBE es: 9732, ¿cual es el codigo de ese mismo error si yo utilizo ADO?, ¿O es el mismo?...si es el mismo por que no me levanta mi error personalizado.

Este es el codigo:

Código Delphi [-]
  
procedure TDM1.LINEASPostError(DataSet: TDataSet; E: EDatabaseError;
  var Action: TDataAction);
begin
  if (E is EDBEngineError) then
    if (E as EDBEngineError).Errors[0].Errorcode = eRequiredFieldMissing then
    begin
      MessageDlg('Falta Campo.', mtWarning, [mbOK], 0);
      Abort;
    end;
end;
La Contante eRequiredFieldMissing le asigno el valor 9732, el MsSQL Server tiene los campos como NO NULOS, pero no me muestra mi mensaje de error personalizado cuando desde el form intento grabar con los controles EDIT vacios.

Agradezco cualquier luz.
Saludos.Dag++
Responder Con Cita