>#DEFINE GWL_STYLE (-16) >#DEFINE WS_CAPTION 0x00C00000 > >DECLARE INTEGER SetWindowLong IN user32; > INTEGER hWnd, INTEGER nIndex, INTEGER dwNewLong > >DECLARE INTEGER GetWindowLong IN user32; > INTEGER hWnd, INTEGER nIndex > >LOCAL lnHwnd, lnSetting >lnHwnd = THIS.Hwnd > >*-- Get old style setting >lnSetting = GetWindowLong(lnHwnd, GWL_STYLE) >THIS.AddProperty("nOldGWLSTYLE", lnSetting) > >*-- Calculate and set new style setting >lnSetting = lnSetting - WS_CAPTION >SetWindowLong(lnHwnd, GWL_STYLE, lnSetting) >>