前一段时间,需要弄一个四轴的监控平台,看了匿名的上位机后,十分感兴趣。于是我也想自己也弄一个上位机来玩玩,在将串口通讯调好了以后,就开始好奇那个3D模型是怎么弄的。在网上面查找了很多资料,由于我用的是Delphi来开发的,而现在有关Delphi的资料也不是太多,最后还是找到了一个好东西,就是GL_Scene。
废话少说,先上GL_Scene的下载地址。
1、下载GL_Scene控件(http://glscene.sourceforge.net/wikka/HomePage)
论坛中下载(http://download.****.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
这样就可以看到我们刚刚创建的一个圆柱体了。