Альтернатива контролу Таймер

[Gigahard]

Стандартный контрол Таймер не позволяет использовать интервалы чуть более одной минуты (65 535 милисекунд). Как обойти это ограничение?

[Kovu]

SetTimer?

[Konst_One]

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

[Gigahard]

Конечно такая идея была, но при этом для повышения точности придется ставить таймер на малый цикл, а это по напрасну будет загружать систему. Я бы все же хотел обойтись без изврата по созданию большого таймера из маленького... Может есть какая альтернатиа в API?



Гы .. Еще как вариант, поставить для выполнения таймера условие, что таймер перед этим будет прокручиваться в холостую n раз с периодом скажем в одну секунду... Если он n раз прокрутился, то выполнить обработку данных и опять ставим счетчик прокруток на 0...

[Gigahard]

И все же... Может в API есть какой нибудь свой таймер в котором можно пставить достаточно большой период, дабы не гонять дефолтный таймер в холостую?

[alibek]

http://bbs.vbstreets.ru/viewtopic.php?p=6570878#6570878

[Twister]

Ссылка сюда же!
Но цифорки другие...

[GAGArin]

Ссылка сюда же!

Ну дык если ответ в этой теме, то куда еще ссылаться?

[beat_swamp]

можно по таймеру например какой нить переменную-счетчик увиличивать на 1 и как тока счетчик достигнет определенного занчения, выполнить действие и занулить счетчик1

Код: Выделить всё

Dim Counter as Long
Dim ItsTimeToDo as Long

Private Sub Form_Load()
     Counter = 0
     ItsTimeToDo = 1000 'время в секундах
     Timer1.Interval = 1000 'одна секунда
end sub

Private Sub Timer1_Timer()
     Counter = Counter + 1
     if Counter >= ItsTimeToDo then
          Counter = 0
          DoSomething
     end if
End Sub

Private Sub DoSomething()
     'здесь процедура которая будет выполняться каждые 1000 секунд
End Sub

[keks-n]

Конечно такая идея была, но при этом для повышения точности придется ставить таймер на малый цикл, а это по напрасну будет загружать систему. Я бы все же хотел обойтись без изврата по созданию большого таймера из маленького...

А кто мешает проставить таймер на максимум, а поиом если надо менять интервал. Это-же переменная величина всё-таки.

[keks-n]

Вот, за 20 мин сварганил...



Общая идея начинки такова: Таймер изначально ставится на 1 сек (проц не грузит, согласитесь), и по таймеру устанавливает скока до истечения указанного интервала, если меньше секунды-уменьшаем интервал...