PureBasic Forums - English

• Windows: [Done] Issue with Redrawing in same Sprite (DirectX9)
• Windows: [Done] Module Spline - crash with invalid memory access (6.21 beta 6 / 8 )
• Windows: [Done] OptionGadget set value in hidden state (6.21 beta 8, asm, x64)
• Windows: [Done] 6.21 B8: Menu icons have no transparency
• Windows: [Done] TransparentSpriteColor issue with GrabSprite (6.21 Beta 6)

diceman wrote: Wed May 07, 2025 1:37 pm Don't know if helpful (maybe not), but with my game (turn-based dungeon crawler "The Ruins of Calaworm"), and another sideproject (an asteroids-shooter called "Cherry Shift") all is well. No lags, graphics is rendering fast as ever, also no CPU overload. Working on a (kinda) ancient laptop with Windows 10.
Hope you can figure things out.

Joubarbe wrote: Wed May 07, 2025 8:39 pm Yep, it's weird... What I find really weird is that I cannot ALT-F4 the game. Does BindEvent() work exactly the same as handling events with WaitWindowEvent()? If it's stuck in an event loop, it wouldn't redraw the game at all (as it is a custom event).

Joubarbe wrote: Wed May 07, 2025 9:17 pm Unfortunately, some events cannot be bound, so my event declaration block looks like this:

Code: Select all

BindGadgetEvent(#CANVAS_MAIN, @OnInput(), #PB_EventType_Input)
BindGadgetEvent(#CANVAS_MAIN, @OnKeyUp(), #PB_EventType_KeyUp)
BindGadgetEvent(#CANVAS_MAIN, @OnKeyDown(), #PB_EventType_KeyDown)
BindGadgetEvent(#CANVAS_MAIN, @OnLeftClick(), #PB_EventType_LeftClick)
BindGadgetEvent(#CANVAS_MAIN, @OnRightClick(), #PB_EventType_RightClick)
BindGadgetEvent(#CANVAS_MAIN, @OnMouseMove(), #PB_EventType_MouseMove)
BindGadgetEvent(#CANVAS_MAIN, @OnMouseWheel(), #PB_EventType_MouseWheel)
BindEvent(#PB_Event_SizeWindow, @OnResize(), #WINDOW_MAIN)
BindEvent(#PB_Event_ActivateWindow, @OnFocus(), #WINDOW_MAIN)
BindEvent(#PB_Event_Timer, @OnTimer(), #WINDOW_MAIN)
BindEvent(#EVENT_REDRAW_TERMINAL, @RenderTerminal())
BindEvent(#EVENT_REDRAW_VIEW, @RenderView())
AddKeyboardShortcut(#WINDOW_MAIN, #PB_Shortcut_Tab, #EVENT_TAB)
AddKeyboardShortcut(#WINDOW_MAIN, #PB_Shortcut_Shift | #PB_Shortcut_Tab, #EVENT_SHIFT_TAB)

Repeat
  event = WaitWindowEvent()
  Select event
    Case #PB_Event_CloseWindow
      CloseTerminal()
    Case #PB_Event_Menu
      Select EventMenu()
        Case #EVENT_TAB
          If terminal\no_keyboard_navigation = #False And terminal\active_view\locked = #False
            NextView()
          EndIf
        Case #EVENT_SHIFT_TAB
          If terminal\no_keyboard_navigation = #False And terminal\active_view\locked = #False
            PreviousView()
          EndIf
      EndSelect
  EndSelect
ForEver

EDIT: Hmm... Maybe they could all go to BindEvent actually

Joubarbe wrote: Thu May 08, 2025 7:28 am It doesn't work, but thanks for trying! I'm going to look into it more seriously today.

marcoagpinto wrote: Thu May 08, 2025 7:45 am ...
All my menus images in PNG now appear in 16x16 instead of 32x32 with beta 9.
...