How
to scroll without scrollbars
In
order to scroll vertical or horizontal without scrollbars,
special events must be sent with the MS-Windows API function
SendMessage() to the bBrowser. The function SendMessage()
is defined as follows:
|
SendMessage( |
hWnd
iMessage
iWParam
iLParam |
AS PTR,;
AS DWORD,;
AS DWORD,;
AS LONG) AS LONG |
|
|
|
|
hWnd |
Handle
of bBrowser control |
iMessage |
Vertical
scroll: |
WM_VSCROLL |
Horizontal
scroll: |
WM_HSCROLL |
|
iWParam |
Vertical
scroll: |
SB_LINEUP |
Scrolls
one line up. |
SB_LINEDOWN |
Scrolls
one line down. |
SB_PAGEUP |
Scrolls
one page up. |
SB_PAGEDOWN |
Scrolls
one page down. |
|
Horizontal
scroll: |
SB_LINELEFT |
Scrolls
one column left. |
SB_LINERIGHT |
Scrolls
one column right. |
SB_PAGELEFT |
Scrolls
one page left. |
SB_PAGERIGHT |
Scrolls
one page right. |
|
|
iLParam |
This
parameter must be 0. |
|
The following code fragment defines 4 methods, in order
to sroll one page or line up or down in the bBrowser.
|
METHOD
PageUp() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_VSCROLL,;
MakeWParam(SB_PAGEUP, 0),;
0)
METHOD PageDown() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_VSCROLL,;
MakeWParam(SB_PAGEDOWN, 0),;
0)
METHOD LineUp() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_VSCROLL,;
MakeWParam(SB_LINEUP, 0),;
0)
METHOD LineDown() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_VSCROLL,;
MakeWParam(SB_LINEDOWN,
0),;
0)
|
The following code fragment defines 4 methods, in order to
sroll one page or column left or right in the bBrowser.
|
METHOD
PageLeft() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_HSCROLL,;
MakeWParam(SB_PAGELEFT, 0),;
0)
METHOD PageRight() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_HSCROLL,;
MakeWParam(SB_PAGERIGHT, 0),;
0)
METHOD LineUp() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_HSCROLL,;
MakeWParam(SB_LINELEFT, 0),;
0)
METHOD LineDown() CLASS myDataWindow
SendMessage(self:oDCBrowser:Handle(),;
WM_HSCROLL,;
MakeWParam(SB_LINERIGHT, 0),;
0)
|
|