【3D!】用pascal绘制一个旋转的立方体
pascal吧
全部回复
仅看楼主
level 12
啤9🍺 楼主
想必有人想急着做3D了,这里给了个例子,仅供参考,3D引擎很多,可以自己去学→_→。
这里用到了OPENGL,一个3D图像引擎,我在这里给大家举了个例子,如果你觉得很NB,可以自己尝试去学习(这个已经有点年头了,还有,pascal自带opengl相关的库)
另外,注意{$mode delphi}这个编译开关,大家想必知道是什么意思吧。(不知道左转百度)
下面的result:=xxxx的就是delphi里经常使用的,是function返回一个值,没必要麻烦地写
函数名:= xxxx;
代码在FPC下编译通过。
代码在附件中。
代码大部分是摘抄的,里面还有一些详细的注释。
如果想学OPENGL,建议先去看看一些windows编程基础的东西。
网上面有少量的delphi版本教程和较多的C版本教程,其实FPC可以编译delphi的代码。
效果图:(一个三角形+一个立方体)
2014年09月04日 15点09分 1
level 12
啤9🍺 楼主
沙发~
2L
nehe的opengl教程比较详细,可以去看看
(对于这个我不打算深入学习233)
2014年09月04日 15点09分 2
level 15
高大上orz
2014年09月05日 00点09分 4
level 13
我想到了pascal版我的世界!
2014年09月05日 04点09分 5
OTLmc把pascal吧占领了
2014年09月05日 05点09分
level 9
好东西,收藏。就是代码有点长,而且OpenGL神马的各种不兼容啊。
2014年09月05日 06点09分 6
貌似ax大神一直不喜欢长的文文字。
2017年06月06日 11点06分
level 12
不如直接fmx3D
2014年09月05日 11点09分 7
怎么搞?
2014年11月01日 02点11分
回复 1007726717 :拖控件呀,改属性呗
2014年11月01日 02点11分
回复 wfwhl12 :如果fpc面向对象就好了,但是它不是。。。。。不过我记得有个叫glscene的,差不多
2014年11月05日 15点11分
回复 dfxxlyc :free pascal本来就支持面向对象呀
2014年11月06日 04点11分
level 13
...pascal学opengl简直作死
2014年09月05日 11点09分 8
我是学delphi时学了点,然后再把这个代码转移到FPC下,唯一需要更改的只是几个单元的名称
2014年09月05日 13点09分
回复 dfxxlyc :我的意思是用c学好一点 pascal文档很少
2014年09月05日 13点09分
回复 Meau_遗忘 :我是看着C的教程学的.....表示自己会一些C,这样看教程方便,其实看教程更多时候只是想了解这个函数来干什么的等等==
2014年09月05日 13点09分
level 13
orz opengl!
2014年09月05日 12点09分 9
level 9
我来水一水带着我的
十五字
小尾巴[滑稽]顺便帮顶[吐舌]
2014年09月07日 08点09分 10
[吐舌]
2014年09月07日 08点09分
我来水一水带着我的十五字小尾巴[滑稽]顺便帮顶[吐舌]
2018年04月23日 04点04分
level 12
啤9🍺 楼主
表示想用opengl画圆的童鞋请左转去搜索画圆算法,opengl可没有画曲线,面的算法。不过有些和OPENGL相关的拓展库有
2014年09月09日 10点09分 11
level 12
啤9🍺 楼主
有关pascal的OpenGL教程请参考Delphi版和C版教程
delphi用的是Object Pascal,和PASCAL基本差不多,面向对象与面向过程的区分
在学习opengl前,建议先看看下面内容:
windows编程(至少知道创建窗体,句柄等概念,还有消息处理机制,还有部分函数过程的作用)
搞清什么叫缓存,双缓存,alpha通道等等。
有了这些基础,勉强可以开始学习了。
2014年09月09日 11点09分 12
orz
2014年09月09日 11点09分
回复 猎火电脑工作室 :表示看到你很多作品都是字符拼的界面,不过这样作品内容有点局限,表示以前也做过~
2014年09月11日 13点09分
回复 dfxxlyc :对windows编程没有基础[委屈]
2014年09月12日 09点09分
orz windows渣
2014年09月12日 12点09分
level 14
顶一个
2014年09月12日 16点09分 13
level 7
好贴
虽然至今编译未果[怒]
但貌似蛮好
怎么会在这么后面???
2014年10月30日 06点10分 14
level 7
1.申精 @革命家的右手 @EXPsta @canadaottata
2.调用的过程(尤其glVertex3f)可否给解释!
2014年11月01日 02点11分 15
level 1
顶一个
<script type="text/javascript">
document.write(Date())
</script>
2014年11月01日 03点11分 16
level 9
O(∩_∩)O谢谢
2014年11月03日 10点11分 17
level 12
啤9🍺 楼主
linux不灭opengl应该长久了。等到有空弄个简单的入门。。
表示没学多少,只是稍微接触了一下233。如果做3d的话简单的几何体可以弄弄,复杂的要提前弄好模型,涉及建模,各种软件等等。(所以懒得学。。。。。。)
话说minecraft用的是opengl引擎,java写的,电脑渣,带不动唉233.
2014年11月05日 15点11分 18
level 9
后排orz
2014年11月08日 01点11分 20
level 3
。。。。
2018年04月25日 23点04分 21
1