NeHe的opengl教程delphi版(7)----滤波

{这一课我会教您如何使用三种不同的纹理滤波方式。教您如何使用键盘来移动场景中的对象，还会教您在opengl场景中应用简单的光照。这一课包含了很多内容，如果您对前面的课程有疑问的话，先回头复习一下。进入后面的代码之前，很好的理解基础知识十分重要。我们还是在第一课的代码上加以修改。跟以前不一样的是，只要有任何大的改动，我都会写出整段代码。首先我们还要加进SysUtils单元和Glaux单元。}Uses   SysUtils,   opengl,   windows,   Messages,   Glaux In '....GLAUXGlaux.pas';   //下面几行是增加新的变量。   //我们增加三个布尔变量。   // light 变量跟踪光照是否打开。   //变量lp和fp用来存储'L' 和'F'键是否按下的状态。   //后面我会解释这些变量的重要性。现在，先放在一边吧。   light            : Boolean;          // 光源的开/关   lp               : Boolean;          // L键