Показать сообщение отдельно
Старый 22.03.2008, 23:23   #18
Новичок
 
Аватар для Johnson
 
Регистрация: 27.10.2007
Адрес: Пермь
Сообщений: 19
Сказал Спасибо: 28
Имеет 1 спасибку в 1 сообщении
Johnson пока неопределено
По умолчанию

Цитата:
Таймер со сквозным проходом (mod)
позволяет задавать переменную, по которой будет проверяться время

Код: Выделить всё
function Wait(var tick: integer;Timewait: Integer): Boolean;
// сквозная проверка без остановки скрипта (c)dmitry501
// modifed by Sh00rGo
var
t: integer;
begin
result:=false;
t:=Round(Time*86400);
if t>(tick+Timewait) then begin
if tick>0 then result:=true;
tick:=t;
end;
end;
Мучался, мучался, но так и не понял, как интервал можно сократить... подскажите подалста? Желательно, чтоб можно было задавать хотябы 0.5 секунды.
__________________
Если Вы недовольны моими действиями - то Вам сюда!
Johnson вне форума   Ответить с цитированием