开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 多显示器编程 > 查看源码
Unit3.cpp
资源名称：第6章 多线程编程.rar　[点击查看]
上传用户：gyjjlc
上传日期：2013-03-29
资源大小：2124k
文件大小：2k
源码类别：

多显示器编程

开发平台：

C++ Builder

Unit3.cpp：源码内容
  1. //---------------------------------------------------------------------------
  3. #include <vcl.h>
  4. #pragma hdrstop
  6. #include "Unit3.h"
  7. #include "Unit1.h"
  8. #pragma package(smart_init)
  9. //---------------------------------------------------------------------------
  11. //   Important: Methods and properties of objects in VCL can only be
  12. //   used in a method called using Synchronize, for example:
  13. //
  14. //      Synchronize(UpdateCaption);
  15. //
  16. //   where UpdateCaption could look like:
  17. //
  18. //      void __fastcall Unit3::UpdateCaption()
  19. //      {
  20. //        Form1->Caption = "Updated in a thread";
  21. //      }
  22. //---------------------------------------------------------------------------
  24. __fastcall TDisplayThread::TDisplayThread(bool CreateSuspended)
  25.     : TThread(CreateSuspended)
  26. {
  27.     FreeOnTerminate=true;
  28.     Resume();
  29. }
  30. //---------------------------------------------------------------------------
  31. void __fastcall TDisplayThread::Execute()
  32. {
  33.     while(!Terminated)
  34.     {
  35.         //等待信号事件处于信号态，一旦等到事件处于信号态随即复位至无信号态
  36.         if(Form1->pEvent->WaitFor(10)==wrSignaled)
  37.             //访问VCL必须用同步方法
  38.             Synchronize(ListInMemo);
  39.         //设置事件处于信号态
  40.         Form1->pEvent->SetEvent();
  41.     }
  42. }
  43. //---------------------------------------------------------------------------
  44. void __fastcall TDisplayThread::ListInMemo(void)
  45. {
  46.     //因容量有限，超过50行时，删除首行
  47.     if(Form1->Memo1->Lines->Count>50)
  48.         Form1->Memo1->Lines->Delete(0);
  49.     //添加新行
  50.     Form1->Memo1->Lines->Add(AnsiString(Form1->LetterTable,26));
  51. }