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

Google
NeHe的opengl教程delphi版(1)----基本框架
作者:Siny 文章来源:中国教师站cn-teacher 点击数: 更新时间:2007-4-22 15:51:28
// 没有菜单
      h_Instance,                       // 实例句柄
      Nil);                             // 不向WM_CREATE传递任何东东

   If h_Wnd = 0 Then                    // 创建失败,销毁窗体
      Begin
         glKillWnd(Fullscreen);
         MessageBox(0, '不能创建窗体!', '错误', MB_OK Or
            MB_ICONERROR);
         Result := False;
         Exit;
      End;

   // 描述象素格式
   //选择了通过RGBA(红、绿、蓝、alpha通道)支持OpenGL和双缓存的格式。
   //试图找到匹配选定的色彩深度(16位、24位、32位)的象素格式。
   //最后设置16位Z-缓存。
   //其余的参数要么未使用要么不重要
   //(stencil buffer模板缓存和accumulation buffer聚集缓存除外)。
   With pfd Do
      Begin
         nSize := SizeOf(TPIXELFORMATDESCRIPTOR); // 格式描述符大小
         nVersion := 1;                 // 版本号
         dwFlags := PFD_DRAW_TO_WINDOW  // 格式必须支持窗口
         Or PFD_SUPPORT_OPENGL          // 格式必须支持OpenGL
         Or PFD_DOUBLEBUFFER;           // 必须支持双缓冲
         iPixelType := PFD_TYPE_RGBA;   // 申请 RGBA 格式
         cColorBits := PixelDepth;      // 选定色彩深度
         cRedBits := 0;                 // 忽略的色彩位
         cRedShift := 0;                // 忽略的色彩位
         cGreenBits := 0;               // 忽略的色彩位
         cGreenShift := 0;              // 忽略的色彩位
         cBlueBits := 0;                // 忽略的色彩位
         cBlueShift := 0;               // 忽略的色彩位
         cAlphaBits := 0;               // 无Alpha缓存
         cAlphaShift := 0;&n

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >> 

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

阅读排行

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

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

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