您现在的位置: 中国教师站 >> 教师关注 >> 电脑技术 >> 编程技术 >> Delphi >> 正文

Google
NeHe的opengl教程delphi版(1)----基本框架
作者:Siny 文章来源:中国教师站cn-teacher 点击数: 更新时间:2007-4-22 15:51:28
nbsp;   Result := 0;
         Exit;
      End;

   While Not finished Do
      Begin
         //检查一个线程消息队列,将所选的范围保存到消息纪录中
         //BOOL PeekMessage(
         //             LPMSG lpMsg,          // 消息记录的指针
         //             HWND hWnd,          // 窗口句柄
         //             UINT wMsgFilterMin,  // 第一个消息
         //             UINT wMsgFilterMax,  // 最后一个消息
         //             UINT wRemoveMsg      // 标志    Value        Meaning
         //            );                                  PM_NOREMOVE 处理后保留在消息队列中
         //                                                PM_REMOVE 处理后从消息队列中清除
         //要做的第一件事是检查是否有消息在等待。
         //使用PeekMessage()可以在不锁住我们的程序的前提下对消息进行检查。
         //许多程序使用GetMessage(),也可以很好的工作。
         //但使用GetMessage(),程序在收到paint消息或其他别的什么窗口消息之前不会做任何事。
         If (PeekMessage(msg, 0, 0, 0, PM_REMOVE)) Then //检查是否有消息
            // wMsgFilterMin,wMsgFilterMax 这两个参数都为0,返回所有可用的消息
            Begin
               If (msg.message = WM_QUIT) Then // 如果是退出消息
                  finished := True      //改变循环条件,退出
               Else
                  Begin                 // 否则处理消息
                     // 翻译消息,然后发送消息,使得WndProc() 或 Windows能够处理他们。
 &nbs

 << 上一页  [11] [12] 下一页

相关专题:
 
 网友评论:(评论内容只代表网友观点,与本站立场无关!)
GOOGLE广告

阅读排行

| 设为首页 | 加入收藏 | 联系站长 | 友情链接 | 版权申明 |
中国教师站

中国教师站 版权所有 Copyright © 2006-2020 All Rights Reserved 站长:Sina & Siny
[备用域名:www.JXZYW.Com] 有事请留言有事请留言
【实力成就精品 诚信呵护品牌】

信息产业部备案
苏ICP备06018635号