关于循环检测的Timer，应该怎么设计？------------［有点难］

Question

是这样的，表A里有字段 FileName(文件名)   LoopTime(检测文件的间隔时间S)
---------------    -----------------------------
a.txt               10
b.txt               20
c.txt               15
.....我想让程序，的每条记录，按其不同时间的间隔 执行检测该文件的函数checkfilea请问该如设计最好？

Answer 1

我是大概这样想的~~
弄一个 结构体 
Rxxx = Record
  FileName:string;
  LoopTime:integer;
  TakeTime:integer;
end;
PRxxx = ^Rxxx;
把 所有记录 拿出来 放到 Rxxx 里 ，然后 PRxxx 放到 Tlist之类的东西里面，然后 算出 所有 LoopTime 的最大公约数，比如这里是 5s，然后设置 timer 是5s ，然后每次 timer时间到，就 TakeTime := TakeTime + 5; 然后判断  TakeTime 和LoopTime是否相等 ，然后......

Answer 2

不能判断TakeTime 和LoopTime是否相等,要判断是否能整除才行.

Answer 3

文件名和时间放到一个array或list里，然后每个文件开一个定时器

Answer 4

为每个文件动态创建timer，在timer里执行函数；一个timer的话不好做~