Alguna tontería estará pasando, porque eso debe fallar fijo.
Código Delphi [-]
if E is EDBEngineError then
form1.label4.Caption := IntToStr((E as EDBEngineError).Errors[0].Errorcode)
else
raise;
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
|