NeHe的opengl教程delphi版(6)----纹理映射(贴图)

{贴图可以极大的节省CPU时间。呵呵，但是这一节费了我比较多的时间 : (因为用到了opengl的辅助库，现在这个库的函数已经很少有人用了，但是我还是找到了，感谢zdcnow（磁效应），他给我提供的这个辅助库的delphi版本。在学习本节之前，请大家到网上下载glaux.dll、Glaux.pas文件，并加到项目中。好了，让我们继续opengl之路.首先我们需要加进SysUtils单元，因为我们这节要用到文件操作，我们还要将Glaux单元加进来。然后我们在第一课的基础上加上几个变量,xrot , yrot 和 zrot 。这些变量用来使立方体绕X、Y、Z轴旋转。texture[] 为一个纹理分配存储空间。如果您需要不止一个的纹理，应该将数字1改成您所需要的数字。}VAR   h_RC             : HGLRC;            // Rendering Context(着色描述表)。   h_DC             : HDC;              // Device Context(设备描述表)   h_Wnd