Delphi笔记(GL_Scene安装及简单使用)
前一段时间,需要弄一个四轴的监控平台,看了匿名的上位机后,十分感兴趣。于是我也想自己也弄一个上位机来玩玩,在将串口通讯调好了以后,就开始好奇那个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
这样就可以看到我们刚刚创建的一个圆柱体了。
最新文章
- C++文件读写详解
- C——第一阶段结束
- WinForm richtextbox 关键字变红色
- 免安装版MySQL安装步骤
- spring Aop的一个demo
- Spring之在客户端访问RESTful业务
- cocos2d-html5 笔记3: Node
- Windows系统编程之进程间通信
- hdu 5126 stars cdq分治套cdq分治+树状数组
- POJ 3835 &;amp; HDU 3268 Columbus’s bargain(最短路 Spfa)
- ie6、ie7真的不支持inline-block吗?
- Java 实现大整数加减乘除
- 实验吧_NSCTF web200&;FALSE(代码审计)
- SQL之DISTINCT
- [转载]Oracle之xml的增删改查操作
- Appium+Java(三)搭建环境之踩过的坑
- 微信服务器配置令牌(Token)
- 石子合并 区间dp模板
- SQL中的split方法的使用
- 【C#新特性】不用out ref同时返回多个值-元组Tuple
热门文章
- HDOJ 2073 无限的路
- NHibernate遇到的问题集 持续更新。
- [Locked] Smallest Rectangle Enclosing Black Pixels
- 【行业干货】ASOS:外来快时尚品牌的入华战 - 行业干货 - 京东内部论坛 - Powered by Discuz!
- Git 中README.md中MarkDown语法示例
- JSP基本语法
- POJ 2075 Tangled in Cables (c++/java)
- HDFS Users Guide--官方文档
- [转] 多线程下变量-gcc原子操作 __sync_fetch_and_add等
- epoll 回显服务器源码