C
cverbiest
Guest
We use following code to remove scrollbars from a frame, I haven't tested it on a window procedure ShowScrollBar external "user32": define input parameter hwnd as LONG. define input parameter fnBar as LONG. define input parameter fShow as LONG. define return parameter ReturnValue as LONG. end procedure. procedure ShowFrameScrollbar : define input parameter ip-Frame as handle no-undo. define input parameter ip-horizontal as logical no-undo. define input parameter ip-vertical as logical no-undo. define variable iv-retint as integer no-undo. &scoped-define SB_HORZ 0 &scoped-define SB_VERT 1 &scoped-define SB_BOTH 3 &scoped-define SB_THUMBPOSITION 4 run ShowScrollBar ( ip-Frame:hwnd, {&SB_HORZ}, if ip-horizontal then -1 else 0, output iv-retint ). run ShowScrollBar ( ip-Frame:hwnd, {&SB_VERT}, if ip-vertical then -1 else 0, output iv-retint ). &undefine SB_HORZ &undefine SB_VERT &undefine SB_BOTH &undefine SB_THUMBPOSITION end procedure.
Continue reading...
Continue reading...