Hey dudes!
I am beginning a little GUI that I plan to sell at a reasonably low cost ;)
I know many GUIs already exists but I haven't found yet the good one. So I've started mine: FatGUI
You can try an early early version showing only some windows without components, but this is a good start I think :)
http://www.kochonet.com/FatGUI/FatGUI-demo.zip
Here is the code needed to achieve this demo:
Let me know if it will have your interest...
Bye, KöchOn
I am beginning a little GUI that I plan to sell at a reasonably low cost ;)
I know many GUIs already exists but I haven't found yet the good one. So I've started mine: FatGUI
You can try an early early version showing only some windows without components, but this is a good start I think :)
http://www.kochonet.com/FatGUI/FatGUI-demo.zip
Here is the code needed to achieve this demo:
Include "fatGUI.bb" Graphics3D 640, 480, 16, 2 SetBuffer BackBuffer() FatInit() myfirst = CreateFatWindow("My first (modal) window", 10, 50, 320, 240) SetFatStatusText(myfirst, "You'll need to close this one to access other Windows") HideFatSizer(myfirst) HideFatSysLock(myfirst) HideFatSysMinimize(myfirst) mysecond = CreateFatWindow("My second (topmost) window", 220, 120, 280, 140) HideFatSysMinimize(mysecond) mythird = CreateFatWindow("My third window", 320, 180, 220, 200) SetFatWindowIcon(mythird, 0) SetFatTopmost(mysecond) FatModal = myfirst ClsColorFat 64, 64, 64 fps_Init() While Not KeyDown(1) Cls FatUpdate() fps_Update() Text 0, 0, "FPS: " + Str$(fps) Text 0, 15, "FatWidgetUnder: " + Str$(FatWidgetUnder) + " FatWidgetUnder_Class$: " + FatWidgetUnder_Class$ Text 0, 30, "FatWidgetPushed: " + Str$(FatWidgetPushed) + " FatWidgetPushed_Class$: " + FatWidgetPushed_Class$ Flip False Wend
Let me know if it will have your interest...
Bye, KöchOn