Аварийное закрытие приложения

← →
Dron1173 (2005-06-16 07:59) [0]

Я уже здавал этот вопрос, но конкретного ответа не получил.
Опять поднимаю эту тему. Может кто-то и поможет.
..... код.....
...
procedure TForm1.FormCreate(Sender......)
Begin
IBDataBase1.Connected:=true;
...
...
end;
procedure TForm1.Button_StartClick(Sender.....)
Begin
if IBDataBase1.Connected=true then
begin
IBQuery1.Close;
IBQuery1.SQL.ADD(.....);
IBQuery1.Open;
end

end;
procedure TForm1.FormDestroy(Sender.....)
Begin
try IBDatabase1.ForceClose except end; // - ОТРАБАТЫВАЕТСЯ
try IBDatabase1.CloseDataSets except end;//- ОТРАБАТЫВАЕТСЯ
try IBDatabase1.IBQuery1.Free except end;//- не отрабатывает
....

так вот, при закрытии приложения выдается системная ошибка
(... error IbClient... DataSet open)
Как мне избавиться от этой ошибки или, как мне правильно отключить DataSets?????
ПРОШУ ПОМОЩИ!!!!!

← →
Zacho © (2005-06-16 08:09) [1]

Блин, я тебе уже давал конкретный ответ, смотреть внимательнее надо было, и не создавать кучу веток. Впрочем, повторю:
http://www.ibase.ru/fibc/ibx_disc.htm

← →
Dron1173 (2005-06-16 08:18) [2]

Я читал твое сообщение. Спасибо огромное. Но я не профессионал в программировании. Иначе бы сюда не писал свои сообщения. Честно говоря, я не понял. Если не трудно, то напиши конкретно для моего примера. Спасибо.

← →
Zacho © (2005-06-16 08:29) [3]

Dron1173 (16.06.05 8:18) [2]

Для решения этой проблемы тебе надо внести изменения в исходники IBX. По указанной мной ссылке и написано, какие именно. Если у тебя другая версия IBX, не 6.03, то возможно, придётся делать по-другому. Но всё равно ты можешь использовать этот код для примера.

А в твоем коде эту проблему не решить.
P.S. Уточни, проблема возникает именно при обрыве соединения ?

← →
Dron1173 (2005-06-16 08:41) [4]

Да. Если просто конект к базе, без выполнения запроса, и оборвать сеть, то прога завершает свою работу (при данном коде описания ошибок) нормально. А если выполнялся запрос, то при томже условии (обрыв сети) выдается ошибка - DataSet Open.

Аварийное закрытие приложения Найти похожие ветки