继续

  利用上面的框架，我们可以很方便的进行我们的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;

运行一下看看效果