manejar error registro bloqueado
Publicado por Rafael Frias (12 intervenciones) el 13/12/2003 15:48:02
Hola foristas, me gustaria saber como puedo conseguir un listado de todos los errores que me da paradox
como el que esta en el ejemplo tuyo eKeyViol :
procedure TForm1.Table1PostError(DataSet: TDataSet;
E: EDatabaseError; var Action: TDataAction);
begin
if (E is EDBEngineError) then
if (E as EDBEngineError).Errors[0].Errorcode = eKeyViol then
begin
MessageDlg('Imposible guardar el registro: Número de C.I. duplicado. Buscate otro C.I.', mtWarning, [mbOK], 0);
Abort;
end;
end;
Tengo una pequeña aplicacion en en delphi 5 usando paradox es cliente/servidor y me gustaria
controlar el error de registro bloqueado capturarlo y desplegar el mensaje que yo quiero y no se
como lograrlo, te agradeceria si me pudieras ayudar,
Saludos,
Rafael Frias.
Santo Domingo, República Dominicana.
como el que esta en el ejemplo tuyo eKeyViol :
procedure TForm1.Table1PostError(DataSet: TDataSet;
E: EDatabaseError; var Action: TDataAction);
begin
if (E is EDBEngineError) then
if (E as EDBEngineError).Errors[0].Errorcode = eKeyViol then
begin
MessageDlg('Imposible guardar el registro: Número de C.I. duplicado. Buscate otro C.I.', mtWarning, [mbOK], 0);
Abort;
end;
end;
Tengo una pequeña aplicacion en en delphi 5 usando paradox es cliente/servidor y me gustaria
controlar el error de registro bloqueado capturarlo y desplegar el mensaje que yo quiero y no se
como lograrlo, te agradeceria si me pudieras ayudar,
Saludos,
Rafael Frias.
Santo Domingo, República Dominicana.
Valora esta pregunta


0