Таймеры с одним выстрелом
Уважаемые программисты Delphi!
Я ищу помощь, как написать однократный таймер (без графического интерфейса, поэтому VCL Timers не может быть и речи) ...
Позвольте мне объяснить немного больше.
В моем коде (объяснение с таймером VCL, но в этом конкретном проекте у меня нет форм):
Позвониprocedure
которые отправляют символ через последовательный портВключить таймер с количеством ХInterval
вOnTimer
мероприятие:
У меня есть код, который отправляет символ, а затем отключает сам таймер, чтобы он никогда больше не выполнялся.
Проблема в том, что мне нужно сделать создание этих таймеров динамичным. Я думал о функцииSetTimer()
тогдаKillTimer()
в «событии OnTimer», чтобы отключить его (освободить его).
Это хороший (безопасный) способ?
Спасибо!