我已经在Gambas中创建了一个包含组件gb.opengl和gb.opengl.glu的项目。如何在Gambas3中使用opengl绘制一条线
以下讷河教程,我有以下代码:(glArea1是opegl应用的形式分量)
Public Sub GLArea1_Open()
gl.ClearDepth(100.0)
Gl.ClearColor(20, 40, 20, 0.70)
Gl.DepthFunc(Gl.LESS) ' The type of depth test to do
Gl.Enable(Gl.DEPTH_TEST) ' Enables depth testing
End
Public Sub GLArea1_Draw()
gl.Clear(gl.COLOR_BUFFER_BIT Or gl.DEPTH_BUFFER_BIT)
' Clear The Screen And The Depth Buffer
gl.Viewport(0, 0, GLArea1.Width, GLArea1.Height)
gl.MatrixMode(Gl.PROJECTION)
gl.LoadIdentity() 'Reset The Projection Matrix
gL.Translatef(0, GLArea1.Width/2, 0)
gl.LineWidth(1.0)
gl.begin(gl.LINES)
gl.Color3f(1.0, 1.0, 0.2)
gl.Vertex3f(0, GLArea1.Height/2, 0)
gl.Vertex3f(GLArea1.Width/2, GLArea1.Height/2, 0)
gl.End()
End
我希望这个代码来画线,但仍然是黑屏。源代码归档如下:http://www.filedropper.com/glline-001tar
如何在gambas 3的openGl区域中删除行?更具体地说,我想先在视口中绘制轴。请帮忙。
嗨,谢谢你的答案。我试着改变线坐标到[1/2,0,0]到[-1/2,-1/2,0],但这不起作用。我没有看到一种方法来将投影改为GB3中的正字法,无论是通过检查元素还是维基。你能告诉我该怎么做吗? – Sean 2014-12-13 14:43:58