Try
Exccept
on e:exception do
if e is EbdeEngineError Then
with e as EbdeEngineError do
for i:=0 to errors.errorCount Do
showmessage(Inttostr(erors[i].errorcode));
Try
Exccept
on e:exception do
if e is EbdeEngineError Then
with e as EbdeEngineError do
for i:=0 to errors.errorCount Do
showmessage(Inttostr(erors[i].errorcode));
End;