Thanks Guys, and nice to see you on this thread Danjo.
Well, the zip file has been updated to let show you a Fat3DWindow demonstration:
http://www.kochonet.com/FatGUI/FatGUI-demo.zip
demo.bb:
Now the windows can't go out of the screen when they are sized or draggeg.
You can verticaly resize windows by dragging Status Bars with the right button.
Thanks for feedback,
köchOn
Well, the zip file has been updated to let show you a Fat3DWindow demonstration:
http://www.kochonet.com/FatGUI/FatGUI-demo.zip
demo.bb:
Include "fatGUI.bb" Graphics3D 800, 600, 16, 2 SetBuffer BackBuffer() cam1 = CreateFatCamera() : PositionEntity cam1, 0, 2, -5 : RotateEntity cam1, 25, 0, 0 light = CreateLight(1) : PositionEntity light, -1, 10, - 4 cube = CreateCube() FatInit() win1 = CreateFatWindow("My first (modal) window", 10, 50, 320, 240) SetFatStatusText(win1, "You'll need to close this one to access other Windows") HideFatSizer(win1) : HideFatSysLock(win1) : HideFatSysMinimize(win1) : FatModal = win1 win2 = CreateFatWindow("My second (topmost) window", 60, 100, 320, 240) SetFatTopmost(win2) SetFatStatusText(win2, "This one will stay ontop of other windows") win3 = CreateFatWindow("My third window", 110, 150, 320, 240) SetFatWindowIcon(win3, 0) SetFatStatusText(win3, "No system icon for this one") win3d = CreateFat3DWindow("My 3D window", 160, 200, 320, 240, cam1) SetFatStatusText(win3d, "Yes! a window capable of 3D displaying.") ClsColorFat 64, 64, 64 fps_Init() While Not KeyDown(1) Cls : TurnEntity cube, 0.5, 0.5, 0 : RenderWorld : 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
Now the windows can't go out of the screen when they are sized or draggeg.
You can verticaly resize windows by dragging Status Bars with the right button.
Thanks for feedback,
köchOn