Ermittelt die aktuelle Position der Scrollbox in der festgelegten Scrollbar
#include <GuiScrollBars.au3>
_GUIScrollBars_GetScrollPos ( $hWnd, $iBar )
$hWnd | Handle des Fensters |
$iBar | Legt den Typ der Scrollbar fest. Dieser Parameter kann einer der folgenden Werte sein: $SB_CTL - Ermittelt die Position der Scrollbox in dem ScrollBar-Control. Der $hWnd Parameter muss dabei das Handle des ScrollBar-Control sein. $SB_HORZ - Ermittelt die Position der Scrollbox einer standardmäßigen horizontalen Scrollbar. $SB_VERT - Ermittelt die Position der Scrollbox einer standardmäßigen vertikalen Scrollbar. |
Erfolg: | die aktuelle Position der Scrollbox |
Fehler: | -1 |
- - - - - - - - Erklärung der Controls - - - - - - - -
_GUIScrollBars_SetScrollInfoPos
Suche nach GetScrollPos in der MSDN Bibliothek.
#include <GUIConstantsEx.au3>
#include <GuiScrollBars.au3>
#include <StructureConstants.au3>
#include <WindowsConstants.au3>
Global $g_idMemo
Example()
Func Example()
Local $hGuiMsg, $hGui
$hGui = GUICreate("ScrollBar: Beispiel", 400, 400, -1, -1, BitOR($WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP, $WS_SYSMENU, $WS_SIZEBOX))
$g_idMemo = GUICtrlCreateEdit("", 2, 2, 380, 380, BitOR($WS_HSCROLL, $WS_VSCROLL))
GUICtrlSetResizing($g_idMemo, $GUI_DOCKALL)
GUICtrlSetFont($g_idMemo, 9, 400, 0, "Courier New")
GUISetBkColor(0x88AABB)
GUISetState(@SW_SHOW)
_GUIScrollBars_Init($hGui)
_GUIScrollBars_SetScrollInfoPos($hGui, $SB_HORZ, 10)
MemoWrite("Scrollposition horizontal: " & _GUIScrollBars_GetScrollPos($hGui, $SB_HORZ))
Sleep(1000)
_GUIScrollBars_SetScrollInfoPos($hGui, $SB_HORZ, 0)
MemoWrite("Scrollposition horizontal: " & _GUIScrollBars_GetScrollPos($hGui, $SB_HORZ))
Sleep(1000)
_GUIScrollBars_SetScrollInfoPos($hGui, $SB_VERT, 20)
MemoWrite("Scrollposition vertikal: " & _GUIScrollBars_GetScrollPos($hGui, $SB_VERT))
Sleep(1000)
_GUIScrollBars_SetScrollInfoPos($hGui, $SB_VERT, 0)
MemoWrite("Scrollposition vertikal: " & _GUIScrollBars_GetScrollPos($hGui, $SB_VERT))
While 1
$hGuiMsg = GUIGetMsg()
Switch $hGuiMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
Exit
EndFunc ;==>Example
; Gibt eine Zeile im Memo-Fenster aus
Func MemoWrite($sMessage)
GUICtrlSetData($g_idMemo, $sMessage & @CRLF, 1)
EndFunc ;==>MemoWrite