Re: Индикация времени выполнения запроса

Tue, 10 Jun 2008 09:34:07 -0700 


Andrei wrote:

Вот сделал, может кому интересно будет:

http://gsbelarus.com/gs/wiki/index.php/%D0%98%D0%BD%D0%B4%D0%B8%D0%BA%D0%B0%D1%86%D0%B8%D1%8F_%D0%B2%D1%8B%D0%BF%D0%BE%D0%BB%D0%BD%D0%B5%D0%BD%D0%B8%D1%8F_SQL_%D0%B7%D0%B0%D0%BF%D1%80%D0%BE%D1%81%D0%B0

дальше приделаю кнопку Прервать и появится возможность интерактивно
прервать любой запрос.
Только узнаю параметры соответствующей API функции...


Попробовал прикрутить к ФИБам, код-то схожий.
Что-то не выскакивает окошко, где-то не докрутил :-(

Кстати, там в вызове пропущен параметр:
   FLabel := CreateWindow(
     'static',
     ,                     < ----- ???
     WS_VISIBLE or WS_CHILD or BS_TEXT,
     12, 18,
     WindowWidth - 20, 20,
     FWnd,
     idLabel,
     hInstance,
     nil);

Ответить