Function long SetWindowLongA(ulong hWnd, int nIndex, long dwNewLong) library "user32" Function long GetWindowLongA(ulong hWnd, int nIndex) library "user32"
2. 建立一个Response类型的窗口, 记住: ControlMenu属性必须为False.
3. 在窗口的Open事件里:
constant long GWL_STYLE = -16
constant long WS_SYSMENU = 524288 constant long WS_THICKFRAME = 262144
long dwStyle dwStyle = GetWindowLongA(Handle(this), GWL_STYLE)
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
