http://gsbelarus.com/gs/content/downloads/other/test_fb_cancel.rar
Как пользоваться:
1) В архиве я собрал простейшую программу, которая устанавливает
подключение
к заданной БД и выполняет указанный запрос. Если время выполнения
превышает 2 сек, то
на экране появится окно с кнопкой Прервать, нажатие на которую
вызывает функцию fb_cancel_operation.
2) Собственно, отдельная нить для вызова это функции определена в
файле: IBSQL_WaitWindow.pas
3) в файле IBSQL.pas можно видеть два места: ExecQuery и Next, где эта
нить
активизируется.
Функция объявлена с типом:
Tfb_cancel_operation = function (status_vector :
PISC_STATUS;
db_handle :
PISC_DB_HANDLE;
option : UShort):
ISC_STATUS;
cdecl;
константы определены:
fb_cancel_disable = 1;
fb_cancel_enable = 2;
fb_cancel_raise = 3;
Предворительного вызова enable/disable не производится.
