定义开始时间，每几分，每几小时，每几星期，每几月执行一次任务 ,怎么写(100分)

定义开始时间，每几分，每几小时，每几星期，每几月执行一次任务 ,怎么写

用TTimer做定时器。

用系统的“计划任务”吧

上是多个任务，每几分或每几小时或每几星期或每几月是某个个任务的频

建议使用多线程处理，绝对可以圆满的解决你的问题，因为你的这些都是有时间间隔的，也就是你的某些功能需要每隔多少时间执行一次。

其实没那么复杂，看我的方法

//定时器刷新函数(定时器间隔设置成一秒)
procedure TMainFrmOpt.TimerRefresh;
var
TmpSysTime: _SYSTEMTIME;
begin
GetSystemTime(TmpSysTime)
//取得时间

if TmpSysTime.wSecond = 0 then //每一分钟显示时间
ShowTime;

if TmpSysTime.wSecond mod 3 = 1 then //每三秒刷新数据
begin
GetDevsShowData;
ShowDevicesData;
end;

with TmpSysTime do
begin
if (wHour = 6) and (wMinute = 6) and (wSecond = 6) then
MoveOverTimeData
//每天清除数据一次
if (wMinute = 6) and (wSecond = 6) then //每小时清理日志一次
ClearLogs;
end;

ShowCmmState
//每秒刷新通讯状态
end;

问题已解决

帮顶!

http://www.source520.com

站长开发推广同盟 站长朋友的终极驿站
同时拥有海量源码电子经典书籍下载

http://www.source520.com/search/search.asp

"编程.站长"论坛搜索引擎-----为中国站长注入动力!