Code: Select all
SetWindowLongPtr_(WindowID(#Win), #GWL_EXSTYLE, GetWindowLongPtr_(WindowID(#Win), #GWL_EXSTYLE) | #WS_EX_DLGMODALFRAME)Anybody have a workaround without resorting to a 'Tool' window?

Code: Select all
SetWindowLongPtr_(WindowID(#Win), #GWL_EXSTYLE, GetWindowLongPtr_(WindowID(#Win), #GWL_EXSTYLE) | #WS_EX_DLGMODALFRAME)
Code: Select all
Procedure WindowRemoveIcon(WindowNr)
Protected WindowID = WindowID(WindowNr)
SetClassLongPtr_(WindowID, #GCL_HICON, 0)
SetWindowLongPtr_(WindowID, #GWL_EXSTYLE, GetWindowLongPtr_(WindowID, #GWL_EXSTYLE) | #WS_EX_DLGMODALFRAME)
EndProcedureCode: Select all
; Set/Change icon.
SendMessage_(WindowHandle), #WM_SETICON, 0, ImageHandle) ; 0=ICON_SMALL, 1=ICON_BIG
; Drop icon.
SetWindowLongPtr_(WindowHandle, #GWL_EXSTYLE, GetWindowLongPtr_(WindowHandle, #GWL_EXSTYLE) | #WS_EX_DLGMODALFRAME)
