timer1.interval

[celovec]

timer1.interval:=30000

Возможно ли как-то определить сколько прошло уже секунд?

[asmodey1]

GetTickCount в момент запуска или OnTimer.
И GetTickCount в нужный момент.
Разница между ними, поделенная на 1000 и есть "сколько прошло в секундах"...

[celovec]

Можно подробней пожалуйста. Как сделать такой условие?

if (timer2.OnTimer < 8000) then begin

Он ругается.

[veniside]

var
  gtc: integer;

  gtc := GetTickCount();
  Timer1.Enabled := true;

Когда нужно проверить:

  if (8000 > GetTickCount() - gtc) then
    // еще не прошло 8 секунд

[celovec]

Это все пишу на button.

var
  gtc: integer;
begin
  gtc := GetTickCount();
  Timer1.Enabled := true;

 if (8000 > GetTickCount() - gtc) then close;
    // еще не прошло 8 секунд

Но почему то не срабатывает. Ошибок тоже не выдает.

[BB2000]

Встречный вопрос, почему 30000. А если установить к примеру 100...1000 и контролировать процесс?

[celovec]

BB2000, у меня достаточно много вещей привязано к таймеру который срабатывает через 30 секунд. Что либо трогать в интервале я не хочу.

Намного проще, отслеживать примером veniside.
Но он почему-то не срабатывает.

[Mad_Cat]

еще один таймер с интервалом 1000 мс))) тупо в лоб))

[BB2000]

Ну, а если использовать Tag-и или метки, темболее много вещей, как, вы узнаете в какое время произошло, то или иное событие, от того или иного таймера?

[celovec]

Mad_Cat, сейчас так и сделал. Но все же хочется довести до ума пример veniside. В чем там может быть проблема?