IGlass GUI for blitzmax - IV

BlitzMax Forums/BlitzMax Programming/IGlass GUI for blitzmax - IV

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

SoggyP

I have made a test with your combo, it seem to have a little bug
when you don't activate an item before, i'll correct this !

for the moment add this line
MyCombo.ActivateItem("Combo item number 2")

After :
Local MyCombo:IGL_Combo
MyCombo=IGL_Combo.Create(MyWindow01,60,130,160)
MyCombo.CreateItem("Combo item number 1",IGL_Icon_Default)
MyCombo.CreateItem("Combo item number 2",IGL_Icon_Default)

Strict

Include "IGL_Classe\Inc_IGlass.bmx"

Graphics 800,600,0

IGL_InitGUI(1)

Global MyWindow01:IGL_Window
MyWindow01=IGL_Window.Create("Window 01",50,50,600,400)

Local MyCombo:IGL_Combo
MyCombo=IGL_Combo.Create(MyWindow01,60,130,160)
MyCombo.CreateItem("Combo item number 1",IGL_Icon_Default)
MyCombo.CreateItem("Combo item number 2",IGL_Icon_Default)
MyCombo.ActivateItem("Combo item number 2")


While Not KeyHit(KEY_ESCAPE)
Cls

IGL_RefreshGui()

Flip
FlushMem()
Wend

IGL_ClearGui()
End