задержка выполнения

← →
dms_main © (2004-09-01 19:53) [0]

в программе использую код:
procedure Delay(Seconds:Word);
Var
Later: TDateTime;
Begin
Later := Now + (Seconds / (24.0 * 60.0 * 60.0));
While Now < Later do Application.ProcessMessages;
end;
как сделать аналогичную задержку в DLL неиспользуя sleep()

← →
Семен Сорокин © (2004-09-01 20:04) [1]

передавай туда Application.Handle и подменяй его.

← →
Mim1 © (2004-09-02 01:10) [2]

> dms_main © (01.09.04 19:53)

Посторайтесь обойтись без этой процедуры, ИМХО ее использование - плохой тон.

← →
Mim1 © (2004-09-02 01:11) [3]

Например заведите окно и делайте ему stetimer как это сделано в класее ttimer.

← →
vidiv © (2004-09-02 03:46) [4]

settimer и без окна умеет работать!

> settimer и без окна умеет работать!

> Например заведите окно и делайте ему stetimer

не злоупотребляте знаками восклецания!!!!

← →
Erik1 (2004-09-02 11:43) [6]

А чем плох sleep или надо обрабатывать временые промежутки с большой точностью? Или дело в организации цикла выборки сообщений? Вариантов масса, вобщем нужны уточнения. Тожет использование TThread решит проблену.

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