GUIde 1.4a now out
Community Forums/Showcase/GUIde 1.4a now out
| ||
| The new version of my form editor now features SuperStrict support for Bmax. I also fixed some export bugs for blitzplus... If you are a GUIde owner, and you didnt get this update then email me please, cos I might have used an outdated email adress. A quick export from a simple project:
'GUIde 1.4 BlitzMAX export
SuperStrict
AppTitle ="Quick One"
Global EditWindow:TGadget
Global btnButton0:TGadget
Global btnButton1:TGadget
Global tabTabber0:TGadget
Global TabPanel0:TGadget
Global tfdTextField0:TGadget
Global tfdTextField1:TGadget
Global TabPanel1:TGadget
Global prbProgressBar0:TGadget
Global TabPanel2:TGadget
Global grpGroupBox0:TGadget
Global cobComboBox0:TGadget
EditWindow=CreateWindow("Quick One",0,00,400,172,Desktop(),WINDOW_TITLEBAR|WINDOW_RESIZABLE)
btnButton0=CreateButton("OK",320,112,64,24,EditWindow,BUTTON_PUSH)
SetGadgetLayout btnButton0,1,0,1,0
btnButton1=CreateButton("Cancel",248,112,64,24,EditWindow,BUTTON_PUSH)
SetGadgetLayout btnButton1,1,0,1,0
tabTabber0=CreateTabber(8,8,376,96,EditWindow)
AddGadgetItem tabTabber0,"Item0", False
AddGadgetItem tabTabber0,"Item1", False
AddGadgetItem tabTabber0,"Item2", True
SetGadgetLayout tabTabber0,1,2,1,2
TabPanel0=CreatePanel(0,0,ClientWidth(tabTabber0),ClientHeight(tabTabber0),tabTabber0,0)
HideGadget TabPanel0
SetGadgetLayout TabPanel0,1,1,1,1
HideGadget TabPanel0
tfdTextField0=CreateTextField(70,34,176,20,TabPanel0)
SetGadgetText tfdTextField0,"textfield"
CreateLabel("Password:",20,37,46,20,TabPanel0,0)
SetGadgetLayout tfdTextField0,1,0,1,0
tfdTextField1=CreateTextField(70,10,176,20,TabPanel0)
SetGadgetText tfdTextField1,"textfield"
CreateLabel("User Name:",10,13,56,20,TabPanel0,0)
SetGadgetLayout tfdTextField1,1,0,1,0
TabPanel1=CreatePanel(0,0,ClientWidth(tabTabber0),ClientHeight(tabTabber0),tabTabber0,0)
HideGadget TabPanel1
SetGadgetLayout TabPanel1,1,1,1,1
HideGadget TabPanel1
prbProgressBar0=CreateProgBar(62,26,296,16,TabPanel1)
UpdateProgBar prbProgressBar0,0.4
CreateLabel("Progress:",12,29,46,20,TabPanel1,0)
SetGadgetLayout prbProgressBar0,1,2,1,2
TabPanel2=CreatePanel(0,0,ClientWidth(tabTabber0),ClientHeight(tabTabber0),tabTabber0,0)
SetGadgetLayout TabPanel2,1,1,1,1
grpGroupBox0=CreatePanel(6,2,288,64,TabPanel2,PANEL_GROUP,"Grouped Stuff")
SetGadgetLayout grpGroupBox0,1,0,1,0
cobComboBox0=CreateComboBox(172,8,96,20,grpGroupBox0)
AddGadgetItem cobComboBox0,"item0"
AddGadgetItem cobComboBox0,"item1"
AddGadgetItem cobComboBox0,"item2"
AddGadgetItem cobComboBox0,"item3"
SelectGadgetItem cobComboBox0,3
CreateLabel("Select Item:",110,11,58,20,grpGroupBox0,0)
SetGadgetLayout cobComboBox0,1,0,1,0
'-mainloop--------------------------------------------------------------
Repeat
Select WaitEvent()
Case EVENT_GADGETACTION ' interacted with gadget
DoGadgetAction()
Case EVENT_WINDOWCLOSE ' close gadget
Exit
End Select
Forever
'-gadget actions--------------------------------------------------------
Function DoGadgetAction()
Select EventSource()
Case btnButton0 ' user pressed button
Case btnButton1 ' user pressed button
Case tabTabber0 ' user changed tabber item
Select SelectedGadgetItem(tabTabber0)
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 tfdTextField0
If EventData() = 13 Then ' user pressed return in textfield
EndIf
Case tfdTextField1
If EventData() = 13 Then ' user pressed return in textfield
EndIf
Case cobComboBox0
' insert your action for cobComboBox0 here
End Select
End Function
Here is the changelog for this version... URL to a demo version is in my sig. ; 1.4a ; + moved gadget variable name to top of exported code. ; + you can move a gadget which is partially outside its parent 'inside', even when 'constrain gadgets' is on. ; + added bmx to exported code extensions. ; + you can now delete tab panels! you can only delete tabpanels who have no children. ; - fixed colorselector bplus export ; - bplus custom gadgets are declared correctly now ; - bmax export now works correctly, even with superstrict ; - copy label does copy the label text. ; - tabbers start with one tab item now. it seems there are people out there who want to have one tab item. ok. ; - exportlanguage combobox selector now stays in place. ; - Updated decls file. There now is a Guide.decls in the res folder. Copy this to your blitzplus userlibs folder ; You can remove the old decls file if you want to. ; 1.4 ; + bliz max export added... some fine tuning required, but basics do work. ; Just select bmax from the language combobox ; + text clipping on gadgets ; + added splitters! add a gadget to the same group as the splitter and it will move with it. ; Be cautious with the gadgetlayout parameters of the linked gadgets. ; - fixed some problems in the GadgetDelete function. More stable now ; - typing sizes in the edit window properties now resizes the edit window accordingly ; - gadgetcounters are reset properly now when creating or loading a project ; - the input box for a selected gadget was not hidden when you selected a menu item. ; interacting with the surviving input box would cause a crash. |
| ||
| Got mine Wiebo. Thanks. The max exporting changes are very much welcome. NOTES: * You have 2 copies of the guide exe in the zip. * The zip still comes through as a *.sit attachment here but renaming the file to *.zip works fine. |
| ||
| Weirdnes. I will take a look at it, ok? I'm glad you like the update. |
| ||
| Looking good Wiebo. |
| ||
| Thanks m8! =] |
| ||
| Wiebo: I mailed you a couple of days ago.. |
| ||
| Hi Wiebo. I just emailed you to ask you if it's possible for you to update my email address. Cya. Nice update by the way :) |
| ||
| ok, will take a look at my inbox in a few mins =] |
   |