【3D！】用pascal绘制一个旋转的立方体

想必有人想急着做3D了，这里给了个例子，仅供参考，3D引擎很多，可以自己去学→_→。
这里用到了OPENGL，一个3D图像引擎，我在这里给大家举了个例子，如果你觉得很NB，可以自己尝试去学习（这个已经有点年头了，还有，pascal自带opengl相关的库）
另外，注意{$mode delphi}这个编译开关，大家想必知道是什么意思吧。（不知道左转百度）
下面的result:=xxxx的就是delphi里经常使用的，是function返回一个值，没必要麻烦地写
函数名:= xxxx;
代码在FPC下编译通过。
代码在附件中。
代码大部分是摘抄的，里面还有一些详细的注释。
如果想学OPENGL，建议先去看看一些windows编程基础的东西。
网上面有少量的delphi版本教程和较多的C版本教程，其实FPC可以编译delphi的代码。
效果图：（一个三角形+一个立方体）