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

Google
NeHe的opengl教程delphi版(1)----基本框架
作者:Siny 文章来源:中国教师站cn-teacher 点击数: 更新时间:2007-4-22 15:51:28
bsp;             // 忽略Shift Bit
         cAccumBits := 0;               // 无聚集缓存
         cAccumRedBits := 0;            // 忽略聚集位
         cAccumGreenBits := 0;          // 忽略聚集位
         cAccumBlueBits := 0;           // 忽略聚集位
         cAccumAlphaBits := 0;          // 忽略聚集位
         cDepthBits := 16;              // 16位 Z-缓存 (深度缓存)
         cStencilBits := 0;             // 无模板缓存
         cAuxBuffers := 0;              // 无辅助缓存
         iLayerType := PFD_MAIN_PLANE;  // 主绘图层
         bReserved := 0;                // 保留
         dwLayerMask := 0;              // 忽略层遮罩
         dwVisibleMask := 0;            // 忽略层遮罩
         dwDamageMask := 0;             // 忽略层遮罩
      End;
   //得到设备场景描述
   h_DC := GetDC(h_Wnd);
   If (h_DC = 0) Then
      Begin
         glKillWnd(Fullscreen);         // 创建失败,销毁窗体
         MessageBox(0, '不能得到设备场景!', '错误', MB_OK Or
            MB_ICONERROR);
         Result := False;
         Exit;
      End;

   //找到相应的象素格式
   PixelFormat := ChoosePixelFormat(h_DC, @pfd);
   If (PixelFormat = 0) Then
      Begin
         glKillWnd(Fullscreen);
         MessageBox(0, '找不到合适的格式', '错误', MB_OK
            Or MB_ICONERROR);
         Result := False;
         Exit;
      End;

   //设置像素格式.
   If (Not SetPixelFormat(h_DC, PixelFormat, @pfd)) Then
      Begin
         glKillWnd(Fullscreen);
   &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号