NeHe的opengl教程delphi版(2)----创建三角形和四边形

继续  利用上面的框架，我们可以很方便的进行我们的opengl编程（NeHe的教程也是围绕这个框架展开的，而且我看老外的源码，很多使用这个框架的）下面我们在窗体上画一个三角和一个正方形只要在Procedure glDraw();中添加以下代码即可//==============================================================================//所有的绘图代码。任何您所想在屏幕上显示的东东都将在此段代码中出现。//以后的每个程序会在此处增加新的代码。//==============================================================================Procedure glDraw();Begin   glClear(GL_COLOR_BUFFER_BIT Or GL_DEPTH_BUFFER_BIT); // 清除屏幕和深度缓存   //当您调用glLoadIdentity()之后，您实际上讲当前点移到了屏幕中心，X坐标轴从左至右，   //Y坐标