VC中加入定时机制的几种方法

VC中加入定时机制的几种方法
辉日电器（番禺）有限公司资讯部 杨山河
定时机制是指在程序运行当中间隔特定的时间引发指定的事件。在DOS下编程时，主要依靠时钟中断Int 8及其调用中断
Int 1cH来实现，应用程序通过修改这些系统中断来达到实现定时触发。而在Windows下，若想象在DOS下肆无忌惮的修
改系统是不现实的，那么应当如何实现定时机制呢？下面在下就在学习当中的几点体会谈谈这个问题，提出几种方案供大家
参考。
第一种方案是大家熟悉的截获定时消息的途径。在Windows提供给我们使用的系统资源当中，有一种称为“定时器
（Timer）”的特殊资源，在申请了这类资源的程序当中每间隔一段时间会接收到值为WM_TIMER的消息。需要定时执行的
代码可以放在该消息的处理部分。如果在VC中，我们可以具体按照以下步骤实现这一目的：
利用MFC AppWizard创建一个标准的工程，接受所有缺省选项。名为s1
在Classview中选中“CMainFrame”类，然后按Ctrl+W激活ClassWizard，在“Message Map”选项卡中Class Name
选“CMainFrame”，接着在“Message”中选“WM_TIMER”，最后按下“Add Funcation”。以上步骤加入了对WM_TIMER消
息的映射处理。
回到Classview中，双击“OnCreate”成员函数，在函数的末尾添加申请Timer的语句：
SetTimer(100,1000,NULL);//申请一个标识值为100的Timer，定时间隔为1000毫秒（1秒）。
在“Classview”中双击OnTimer函数，输入要定时实现的代码。本例子中为：
MessageBeep(1000);;//每隔一秒发出通告声
编译并执行之，我们可以每隔一秒就听到声音。这正是我们在OnTimer函数内要求执行的。
实际当中，我们可以将“MessageBeep(1000);”换成任何我们想完成的任务，譬如定时存盘等。
第二种方案也利用Timer资源，但却是采用已经编写好的代码��我们可以加入一个具有定时功能的组件至当前工程
当中。这种方法特别适用于基于对话框的工程。具体步骤如下：
利用MFC AppWizard创建一个基于对话框的工程，其余接受所有缺省选项。名为s2。
在ResourceView中，双击IDD_S2_DIALOG，显示对话框，将其中的“To do:”改为“定时触发演示的例子”，表明工程的
作用。
右击对话框编辑区，在弹出的右键菜单中选择“Insert ActiveX Control”，从弹出的列表框中选择“Timer Object”，确定后
会在对话框内出现一个Timer对象。
我们右击Timer对象，从弹出的菜单中选择“Properties”，接着选“All”选项卡，将其中的Interval值设为5000，即每隔5秒
发生一次Timer事件。
回到对话框编辑界面，双击Timer，产生一个CS2Dlg::OnTimerTimer1成员函数，接受缺省值，并在函数实现部分输入：
MessageBox("定时触发消息框","定时演示" ,MB_OK);
编译并运行此工程，将会在产生的对话框运行期间，每隔5秒弹出一个消息框。
同样，我们可以以任何自己的代码来替换5中的消息框语句。详细见附例s2。
第三种方法是采用线程技术。众所周知，Windows 9X是一个基于多线程的多任务操作系统，在内核中以线程作为调度的基
本单位，由系统分时间片进行调度。利用这一点，我们可以在程序当中创建一个“司职”计时的线程，通过线程间的同步来定
时触发我们要完成的任务的代码。不象前两种方法需要至少有一个窗口作为接受消息的主窗口，采用线程技术实现定时触发
将免去创建窗口的麻烦以及带来的系统各种资源的消耗。下面我们来举一个例子来说明这个问题：我们在CmyApp类的
Initstance成员中不建立主窗口而是创建一个工作线程，该线程休眠一定的时间后，自动调用主线程的SomeThing函数。
为了支持线程的运行，我们需要给CmyApp类增加相应的线程函数。下面，我们还是一步一步的实现：
利用MFC AppWizard创建一个标准工程，其中为不产生多余的代码，不选文档/视图支持，并选择单文档。工程名为S3。
在CS3App:: InitInstance()中用“/* … */”注释掉“return TRUE;”之前的所有代码。这是为了不建立窗口。并添加以下代
码：
ExitFlag=TRUE;//是否结束主线程的循环的标志变量。因为子线程严重依赖主线程，所以在本例子中为了避免没有主窗口
而提前结束应用程序，从而使子线程无法存在，所以给主线程一个循环，知道全局变量ExitFlag在子线程退出前被设置成
FALSE为止.
StartThread();//启动线程
do{}while(ExitFlag);//直到结束子线程
::MessageBox(NULL,"主线程结束！","定时触发演示",MB_OK);
return TRUE;
在Globals中增加一标志变量“ExitFlag”，类型为BOOL。它被主线程用来判断是否结束自身运行。
通过ClassView在CS3App的Public部分声明以下函数:
void StartThread(void); //启动线程
static UINT ThreadFunction(void); //主要执行代码的函数
static UINT StaticThreadFunc(LPVOID lpparam);//设置线程时用到的函数
需要特别指出的是，用AfxBeginThread进行线程设置时，第一参数必须象本例所指出的那样声明为Static ，不然参数转换
的错误会扰得你不得安宁。
在StartThread中输入如下代码：
AfxBeginThread(StaticThreadFunc,this);//建立并启动线程
在StaticThreadFunc中输入如下代码：
return ThreadFunc();//调用完成主要线程代码的函数，注意一定要是Static.
实现ThreadFunction：
int i;
i=5;//触发5次
while(i--)
{
Sleep(5000);//间隔5秒
::MessageBox (NULL,"我被定时触发了！","定时触发演示",MB_OK);
}
ExitFlag=FALSE;//ExitFlag是一全局变量，通知主线程结束运行。
return 0;
}
编译并运行工程，将看不到应用程序窗口，但可以看到每隔5秒，桌面上出现一个消息框，5次后弹出主线程结束的消息框。
以上即本人在学习当中解决 Windows下实现定时触发而采取的一些办法，各自方法的特点也在介绍当中指出。希望所述能
给大家一点帮助，更希望能得到大家的指正。如果您有什么意见和设想，欢迎发E-Mail给我（shanhe@371.net）。