@Muttley, Yes thats correct. did you try both versions?
@Slenkar, heres the sourcecode for the two examples.
'
'
'
Framework PUB.fltk
Import BRL.StandardIO
Import BRL.Retro
window = FLTK_CreateGUIWindow("BlitzMax Windows Ftlk Example",200,100,300,200)
GUIWindowResizable(window,0)
FLTK_BeginGUIGadgetGroup(window)
Local ok:Int = FLTK_CreateGUIButton("Ok",10,10,100,20)
Local cancel:Int = FLTK_CreateGUIButton("Cancel",140,10,100,20)
Local box = CreateGUIBox("Box",50,100,200,50,7)
FLTK_EndGUIGadgetGroup(window)
window2 = FLTK_CreateGUIWindow("BlitzMax Windows 2 Ftlk Example",200,400,300,200)
FLTK_BeginGUIGadgetGroup(window2)
Local ok2:Int = FLTK_CreateGUIButton("Ok",10,10,100,20)
Local cancel2:Int = FLTK_CreateGUIButton("Cancel",140,10,100,20)
FLTK_EndGUIGadgetGroup(window2)
Repeat
event = FLTK_WaitGUIEvent()
Select event
Case $401
gadget = FLTK_EventSource()
Select gadget
Case ok
NotifyMSG("Window 1 OK Gadget")
Case cancel
NotifyMSG("Window 1 Cancel Gadget")
Case ok2
NotifyMSG("Window 2 OK Gadget")
Case cancel2
NotifyMSG("Window 2 Cancel Gadget")
End Select
Case $803
NotifyMSG("GoodBye")
End
End Select
Forever
End
Testers can you put the version tested.
thanks
kev