I've been working on a more complete export. I've added a mainloop and a gadget action function. Next are custom gadgets and menu's.
After that I will add custom exporters for other GUI systems.
Here is what GUIde exports now: ( copy and past to run it, imagine entering and aligning all that by hand. ugh )
;GUIde 1.0.1 BlitzPlus export
Global EditWindow=CreateWindow("EditWindow",0,0,400,400,0,3)
Global tabTabber0=CreateTabber(8,8,194,96,EditWindow)
AddGadgetItem tabTabber0,"Tab0", False
AddGadgetItem tabTabber0,"Tab1", False
AddGadgetItem tabTabber0,"Tab2", False
SelectGadgetItem tabTabber0,0
SetGadgetLayout tabTabber0,1,2,1,2
Global TabPanel0=CreatePanel(0,0,194,76,tabTabber0,0)
SetPanelColor TabPanel0,212,208,200
SetGadgetLayout TabPanel0,1,1,1,1
Global chbCheckBox0=CreateButton("chbCheckBox0",48,28,96,20,TabPanel0,2)
SetGadgetLayout chbCheckBox0,1,0,1,0
Global TabPanel1=CreatePanel(0,0,194,76,tabTabber0,0)
SetPanelColor TabPanel1,212,208,200
SetGadgetLayout TabPanel1,1,1,1,1
Global rabRadioButton0=CreateButton("rabRadioButton0",48,28,96,20,TabPanel1,3)
SetGadgetLayout rabRadioButton0,1,0,1,0
Global TabPanel2=CreatePanel(0,0,194,76,tabTabber0,0)
SetPanelColor TabPanel2,212,208,200
SetGadgetLayout TabPanel2,1,1,1,1
Global btnButton0=CreateButton("btnButton0",64,28,64,20,TabPanel2,1)
SetGadgetLayout btnButton0,1,0,1,0
;------------------------------------------------------------------
Repeat
id=WaitEvent()
Select id
Case $101; pressed key
If KeyHit( 1 ) Then End; ESC to exit
Case $401; interacted with gadget
DoGadgetAction( EventSource() )
End Select
Forever
Function DoGadgetAction( gadget )
Select gadget
Case tabTabber0; user changed tabber item
item = SelectedGadgetItem( tabTabber0 )
Select item
Case 0
ShowGadget TabPanel0
HideGadget TabPanel1
HideGadget TabPanel2
Case 1
HideGadget TabPanel0
ShowGadget TabPanel1
HideGadget TabPanel2
Case 2
HideGadget TabPanel0
HideGadget TabPanel1
ShowGadget TabPanel2
End Select
Case chbCheckBox0; user changed checkbox
Case rabRadioButton0
; insert your action for rabRadioButton0 here
Case btnButton0; user pressed button
End Select
End Function