From bf483549cb64c6aea6e6ec981392e95c693b70b5 Mon Sep 17 00:00:00 2001 From: "Michael H.G. Schmidt" Date: Tue, 14 Feb 2023 10:43:51 +0100 Subject: [PATCH] bugfix --- source/minibrowser.pb | 14 ++++++++------ tools/minibrowser.exe | Bin 88576 -> 88576 bytes 2 files changed, 8 insertions(+), 6 deletions(-) diff --git a/source/minibrowser.pb b/source/minibrowser.pb index db39ebd..d732312 100644 --- a/source/minibrowser.pb +++ b/source/minibrowser.pb @@ -96,7 +96,7 @@ If OpenWindow(0, 100, 200, 800, 600, "MiniBrowser", #PB_Window_MinimizeGadget | WebGadget(10, 1, 37, 1278, 732,"") AddKeyboardShortcut(0, #PB_Shortcut_Return, 0) - + ; Use bindevent() to have a realtime window resize BindEvent(#PB_Event_SizeWindow, @ResizeWebWindow()) ResizeWebWindow() ; Adjust the gadget to the current window size @@ -110,7 +110,7 @@ If OpenWindow(0, 100, 200, 800, 600, "MiniBrowser", #PB_Window_MinimizeGadget | Repeat Event = WaitWindowEvent() - + Select Event Case #PB_Event_Gadget Select EventGadget() @@ -123,17 +123,19 @@ If OpenWindow(0, 100, 200, 800, 600, "MiniBrowser", #PB_Window_MinimizeGadget | Case 5 SetGadgetText(10, GetGadgetText(4)) EndSelect + Case #PB_Event_Menu ; We only have one shortcut - SetGadgetText(10, GetGadgetText(4)) + SetGadgetText(10, GetGadgetText(4)) + EndSelect Until Event = #PB_Event_CloseWindow - + EndIf ; IDE Options = PureBasic 5.73 LTS (Windows - x64) -; CursorPosition = 105 -; FirstLine = 79 +; CursorPosition = 98 +; FirstLine = 77 ; Folding = - ; EnableXP ; UseIcon = internet_free_icon.ico diff --git a/tools/minibrowser.exe b/tools/minibrowser.exe index 29feb302686144d8ff136e58be36562369433bad..d908477ce4ad6b2881f7b87d59e34c8a877ddfb5 100644 GIT binary patch delta 75 zcmZqJ!rHKfbwUTzvGB&OtzC>&hCtSIHX}wg5Upp#C&hCtSIHX}wg5Upp#C