Trotzdem fällt mir dabei auf, dass auf das Event nur reagiert wird, wenn ich feste Fensternummern verwende.
Öffne ich ein Fenster mit #PB_Any und benutze die generierte Fenster ID dann für BindEvent(), dann wird nicht mehr auf den Event reagiert.
Vermutlich übersehe ich mal wieder was.
Code: Alles auswählen
EnableExplicit
Procedure SizeWindowHandler()
Debug "Size event on window #" + EventWindow()
EndProcedure
; This works
; OpenWindow(0, 100, 100, 200, 200, "Resize test")
; BindEvent(#PB_Event_SizeDesktop, @SizeWindowHandler(), 0)
; This not
Define.i Wnd = OpenWindow(#PB_Any, 100, 100, 200, 200, "Resize test")
BindEvent(#PB_Event_SizeDesktop, @SizeWindowHandler(), Wnd)