Может просто по таймеру (компонент TTimer)? В свойстве Interval выставить нужный интервал (в мс) между срабатываниями таймера.
Чтоб сделать такое, нужно отказаться от конструкций "for" или "while" и прописать всё руками. Т.е. начальное состояние (i := 1) задаётся в основной программе, а инкремент переменной и опосля проверка на достижение предела, а также основные действия (преобразование посылки в СОМ порт и т.п.), прописывается в обработчике OnTimer. Таймер сразу не запускаете, сначала инициализируете переменные. Если надо - остановить таймер можно как из основной программы, так и в самом обработчике, при выполнении каких-либо условий.
|