1. We need to declare the following API functions:
Function Long SetWindowlonga (Ulong Hwnd, Int Nindex, Long Dwnewlong) library "user32" Function Long getWindowlonga (Ulong Hwnd, Int nindex) library "user32"
2. Create a RESPONSE type window, remember: The ControlMenu property must be false.
3. In the OPEN event in the window:
Constant Long GWL_Style = -16
Constant Long WS_SYSMENU = 524288Constant Long WS_THICKFRAME = 262144
Long dwstyledWstyle = getWindowlonga (Handle (this), gwl_style
Setwindowlonga (Handle (this), GWL_Style, DWStyle WS_THICKFRAME WS_SYSMENU)