前一段时间，需要弄一个四轴的监控平台，看了匿名的上位机后，十分感兴趣。于是我也想自己也弄一个上位机来玩玩，在将串口通讯调好了以后，就开始好奇那个3D模型是怎么弄的。在网上面查找了很多资料，由于我用的是Delphi来开发的，而现在有关Delphi的资料也不是太多，最后还是找到了一个好东西，就是GL_Scene。

　　废话少说，先上GL_Scene的下载地址。

1、下载GL_Scene控件（http://glscene.sourceforge.net/wikka/HomePage）

     论坛中下载（http://download.csdn.net/download/freem123/4847888）

2、安装参考教程（http://blog.163.com/tfn2008@yeah/blog/static/11032131920130233718611/）

【注】：如果下载失败，可以在这里下载链接：http://pan.baidu.com/s/1qWt5gDY 密码：yx0o

 

【注意事项】：

1、把这些文件考到delphi的安装目录下

2、打开delphi，点击tools/Environmen Options/Library,选择Library path的目录就是刚刚考到安装目录下的Delphi7和source位置。

3、打开Delphi7/GLScene7.dpk后，点击incal

【安装失败】：

1、文件的目录没有设置好，把相应的文件包含在Library path中（重复注意事项中的第二步）

2.搜索{GLScene}中的SDL.dll、cg.dll、cgGL.dll、ode.dll、bass.dll和fmod.dll，将它们全部拷贝到{Delphi}\Projects\Bpl目录。

【安装成功后_会出现】

出现了这几图标，就说明已经安装成功了。

/**************************************************************************************/

/*                          第一个实例：创建一个3D视图                                                                                     */

/**************************************************************************************/

【步骤1】：添加GLScene和GLSceneViewer在窗体上

【步骤2】：双击GLScene，进入界面

依次进行以上的操作。

【步骤3】：添加基本物体（灯光、摄像机、物体）

      1.添加一个实体，点击Cylinder

      2.添加一个GLLightSource.

      3.添加一个GLDummyCube,在GLDummyCube上有击添加一个GLCamera

【步骤4】：属性设置

1.设置GLSceneViewer,的Camera的值是刚刚添加的GLcamera1.(关联到摄像机)

   选择Buffer里的BackgroundColor为ckground(设置背景颜色)

设置完后可以看到窗体上是黑色的。先不要着急，还有东西需要设置呢。

2.设置GLCamera的Position的XYZ分别为18,18,15

   设置GLCamera的TargetObiect为GLDummyCube1

   设置GLCamera的FocalLenth的值为400

设置完后可以看到一个虚线的框（因为没有设置灯光，所以实物我们看不见）

3. 设置灯光GLLightSource的Position的值分别为10,10,10

 

这样就可以看到我们刚刚创建的一个圆柱体了。