openGL教程delphi版(2)—-创建三角形和四边形

继续

利用上面的框架,我们可以很方便的进行我们的OPENGL编程(NeHe的教程也是围绕这个框架展开的,而且我看老外的源码,很多使用这个框架的)

下面我们在窗体上画一个三角和一个正方形

只要在Procedure glDraw();中添加以下代码即可

//==============================================================================
//所有的绘图代码。任何您所想在屏幕上显示的东东都将在此段代码中出现。
//以后的每个程序会在此处增加新的代码。
//==============================================================================

Procedure glDraw();
Begin
   glClear(GL_COLOR_BUFFER_BIT Or GL_DEPTH_BUFFER_BIT); // 清除屏幕和深度缓存

   //当您调用glLoadIdentity()之后,您实际上讲当前点移到了屏幕中心,X坐标轴从左至右,
   //Y坐标轴从下至上,Z坐标轴从里至外。OpenGL屏幕中心的坐标值是X和Y轴上的0.0f点。
   // 中心左面的坐标值是负值,右面是正值。移向屏幕顶端是正值,移向屏幕底端是负值。
   // 移入屏幕深处是负值,移出屏幕则是正值。
   glLoadIdentity();                    // 重置当前的模型观察矩阵

   //glTranslatef(x, y, z)沿着 X, Y 和 Z 轴移动。
   //根据前面的次序,下面的代码沿着X轴左移1.5个单位,Y轴不动(0.0f),最后移入屏幕6.0f个单位。
   //注意在glTranslatef(x, y, z)中当您移动的时候,您并不是相对屏幕中心移动,
   //而是相对与当前所在的屏幕位置。
   glTranslatef(-1.5, 0.0, -6.0);       // 左移 1.5 单位,并移入屏幕 6.0

   //现在我们已经移到了屏幕的左半部分,
   //并且将视图推入屏幕背后足够的距离以便我们可以看见全部的场景-创建三角形。
   //glBegin(GL_TRIANGLES)的意思是开始绘制三角形,glEnd() 告诉OpenGL三角形已经创建好了。
   //通常您会需要画3个顶点,可以使用GL_TRIANGLES。
   //在绝大多数的显卡上,绘制三角形是相当快速的。
   //如果要画四个顶点,使用GL_QUADS的话会更方便。
   //但据我所知,绝大多数的显卡都使用三角形来为对象着色。
   //最后,如果您想要画更多的顶点时,可以使用GL_POLYGON。

   //本节的简单示例中,我们只画一个三角形。
   //如果要画第二个三角形的话,可以在这三点之后,再加三行代码(3点)。
   //所有六点代码都应包含在glBegin(GL_TRIANGLES) 和 glEnd()之间。
   //在他们之间再不会有多余的点出现,
   //也就是说,(GL_TRIANGLES) 和 glEnd()之间的点都是以三点为一个集合的。
   //这同样适用于四边形。如果您知道实在绘制四边形的话,
   //您必须在第一个四点之后,再加上四点为一个集合的点组。
   //另一方面,多边形可以由任意个顶点,
   //(GL_POLYGON)不在乎glBegin(GL_TRIANGLES) 和 glEnd()之间有多少行代码。

    //   几何图元类型和说明
    //   类型                    说明
    //   GL_POINTS              单个顶点集
    //   GL_LINES               多组双顶点线段
    //   GL_POLYGON             单个简单填充凸多边形
    //   GL_TRAINGLES           多组独立填充三角形
    //   GL_QUADS               多组独立填充四边形
    //   GL_LINE_STRIP          不闭合折线
    //   GL_LINE_LOOP           闭合折线
    //   GL_TRAINGLE_STRIP      线型连续填充三角形串
    //   GL_TRAINGLE_FAN        扇形连续填充三角形串
    //   GL_QUAD_STRIP          连续填充四边形串

  //glBegin之后的第一行设置了多边形的第一个顶点,
  //glVertex 的第一个参数是X坐标,然后依次是Y坐标和Z坐标。
  //第一个点是上顶点,然后是左下顶点和右下顶点。
  //glEnd()告诉OpenGL没有其他点了。
  //这样将显示一个填充的三角形。

  //译者:这里要注意的是存在两种不同的坐标变换方式,
  //glTranslatef(x, y, z)中的x, y, z是相对与您当前所在点的位移,
  //但glVertex(x,y,z)是相对于glTranslatef(x, y, z)移动后的新原点的位移。
  //因而这里可以认为glTranslate移动的是坐标原点,glVertex中的点是相对最新的坐标原点的坐标值。

   glBegin(GL_TRIANGLES);               // 绘制三角形
   glVertex3f(0.0, 1.0, 0.0);           // 上顶点
   glVertex3f(-1.0, -1.0, 0.0);         // 左下
   glVertex3f(1.0, -1.0, 0.0);          // 右下
   glEnd();                             // 三角形绘制结束

   //在屏幕的左半部分画完三角形后,我们要移到右半部分来画正方形。
   //为此要再次使用glTranslate。
   //这次右移,所以X坐标值为正值。
   //因为前面左移了1.5个单位,
   //这次要先向右移回屏幕中心(1.5个单位),再向右移动1.5个单位。
   //总共要向右移3.0个单位。

   glTranslatef(3.0, 0.0, 0.0);         // 右移3单位

   //现在使用GL_QUADS绘制正方形。
   //与绘制三角形的代码相类似,画四边形也很简单。
   //唯一的区别是用GL_QUADS来替换了GL_TRIANGLES。
   //并增加了一个点。
   //我们使用顺时针次序来画正方形-左上-右上-右下-左下。
   //采用顺时针绘制的是对象的后表面。这就是说我们所看见的是正方形的背面。
   //逆时针画出来的正方形才是正面朝着我们的。
   //现在来说并不重要,但以后您必须知道。
   glBegin(GL_QUADS);                   // 绘制正方形
   glVertex3f(-1.0, 1.0, 0.0);          // 左上
   glVertex3f(1.0, 1.0, 0.0);           // 右上
   glVertex3f(1.0, -1.0, 0.0);          // 左下
   glVertex3f(-1.0, -1.0, 0.0);         // 右下
   glEnd();                             // 正方形绘制结束

   // Markus Knauer 注:
   //在 ("OpenGL Programming Guide: The Official Guide to Learning OpenGL, Release 1",
   //J. Neider, T. Davis, M. Woo, Addison-Wesley, 1993)
   //《OpenGL编程指南:OpenGL学习的官方指南,第一版》
   //一书中清楚的解释了NeHe所指的在OpenGL中移动的单位概念:
   //"在OpenGL中真的有英寸和英里的区别吗?
   //答案是一句话:没有。透视和其他的变换都是无单位的。
   //如果您想要裁剪在1.0到20.0米,英寸、公里等等之间的平面,
   //在OpenGL中您无法做到。唯一的法则是您必须使用一致的度量单位。"
End;

运行一下看看效果