Я бы посоветовал убрать вообще таймеры из основного потока (читай - нафиг они не нужны на форме). А вместо этого в самом потоке использовал бы тупо SLEEP(XXXX). Примерно так:
Код:
procedure TPotok1.Execute();
begin
While not Terminated do
begin
sleep(XXX);
//действие таймера N
end;
end; |