Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Вниз

Как показать последнюю ошибу при работе с БД через BDE 


Rail   (2002-04-07 16:05) [0]

Может не только при работе с БД



sniknik   (2002-04-07 18:45) [1]

можеш так
try
{код для работы с БД}
except
on E: EADOError do begin ErrMessage:= "EADOError : "+ E.Message; Err:= True; end;
on E: EOleException do begin ErrMessage:= "EOleException : "+ E.Message; Err:= True; end;
on E: EDataBaseError do begin ErrMessage:= "EDataBaseError : "+ E.Message; Err:= True; end;
else begin ErrMessage:= "Неизвестная ошибка!"; Err:= True; end;
end;

if Err then {показать} .....



Rail   (2002-04-08 07:16) [2]

Все работает спасибо




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.025 c
4-94629           Romul                 2002-02-25 14:06  2002.04.29  
Как


14-94574          False                 2002-03-20 12:28  2002.04.29  
Какое расширение имееи Oracle?


7-94594           ATLANTIDO             2002-02-02 23:58  2002.04.29  
ШАРИТЬ ПО ДИСКАМ ЗАПРЕЩЕНО


1-94454           Decoda                2002-04-15 21:38  2002.04.29  
А можно не изобретать велосипед ?


7-94593           Андрей Татуков        2002-02-04 16:14  2002.04.29  
Язык Windows