Xojo Conferences

Platforms to show: All Mac Windows Linux Cross-Platform

FAQ.How can I disable the close box of a window on Windows?
Answer: The following code will remove the close item from the system menu of the window.
#if TargetWin32 then
Declare Function GetSystemMenu Lib "user32" (hwnd as Integer, bRevert as Integer) as Integer
Declare Function RemoveMenu Lib "user32" (hMenu as Integer, nPosition as Integer, wFlags as Integer) as Integer
Dim hSysMenu as Integer
hSysMenu = GetSystemMenu(me.WinHWND, 0)
RemoveMenu hSysMenu, &HF060, &H0
Notes: The window may not be updated directly.

Feedback, Comments & Corrections

The biggest plugin in space...

MBS Xojo Plugins