问一个GLscene的简单问题

Question

在Delphi中用下面的代码可以画出一个三角形，其颜色是渐变的。glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
glBegin(GL_TRIANGLES);
glColor3f(1,0,0);
glVertex3f(1,0,0);
glColor3f(0,1,0);
glVertex3f(0,1,0);
glColor3f(0,0,1);
glVertex3f(-1,0,0);
glEnd;
SwapBuffers(DC);
现在我想在Delphi中用GLScene组件库来实现这个简单的图形，试了半天却不行，哪位用过这个组件，能说说怎么实现吗？

Answer 1

用GLPolygon画三角形倒没问题，问题是只能画出单色的，色彩渐变的效果该怎么实现？

Answer 2

http://www.lischke-online.de/Graphics.html#GraphicEx 
http://www.delphi-gems.com/GLScene.php

Answer 3

http://www.delphibox.com/article.asp?articleid=211

Answer 4

To  ksaiy(消失在人海)  http://www.delphibox.com/article.asp?articleid=211中讲的方法是直接调用OpenGL的函数来绘图，我现在想知道用GLScene组件库来实现一个颜色渐变的三角形该怎么做？

Answer 5

to ：myling(AD)
好像顶点的属性中没有改变颜色的，我是初学者，请教怎么加这个功能？先谢了！！！
GLScene的下载地址是：
http://glscene.sourceforge.net/download.htm

Answer 6

glBegin(GL_TRIANGLES);
glColor3f(1,0,0);
glVertex3f(1,0,0);
glColor3f(0,1,0);
glVertex3f(0,1,0);
glColor3f(0,0,1);
glVertex3f(-1,0,0);
glEnd;
这些代码就是阿在OPENGL里，每次调用了glColor3f(0,0,1);之类的改变颜色的函数
以后每次画都会用最后一次的颜色来画我现在机器上没装delphi
你给了地址也没法装:(如果这个控件是基于OPENGL的，也不外是这样
你找到画三角型的代码处（如果有代码的话），加上改变颜色的代码就行了

Answer 7

直接用这些代码没有问题，我也编得出来。问题是用GLScene这套组件以后这些代码就不管用了，而我是想用这套组件实现这个简单的功能。