- Сообщения
- 8,673
- Репутация
- 2,486
_CursorGetStringValue - Функция позволяющая получить название курсора по его ID (возвращаемое от MouseGetCursor).
В примере отображается название курсора при его изменений в реальном времени:
В примере отображается название курсора при его изменений в реальном времени:
Код:
HotKeySet("^+e", "_Quit")
$iLast_Cursor = MouseGetCursor()
While 1
Sleep(100)
$iCurrent_Cursor = MouseGetCursor()
If $iLast_Cursor <> $iCurrent_Cursor Then
ToolTip( _
StringFormat("Pointer has been Changed:\n\nCurrent...\n\tName:\t%s\n\tID:\t%s\n\nPrevious...\n\tName:\t%s\n\tID:\t%s", _
_CursorGetStringValue($iCurrent_Cursor), $iCurrent_Cursor, _
_CursorGetStringValue($iLast_Cursor), $iLast_Cursor), _
0, 0, "_CursorGetStringValue Demo!", 1)
$iLast_Cursor = $iCurrent_Cursor
EndIf
WEnd
Func _CursorGetStringValue($iValue)
Local $aStr_Values[16] = ["Pointing/Grabbing hand", "APPSTARTING", "ARROW (Default?)", "CROSS", "HELP", "IBEAM (Selection)", _
"ICON", "NO", "SIZE", "SIZEALL", "SIZENESW", "SIZENS", "SIZENWSE", "SIZEWE", "UPARROW", "WAIT"]
If $iValue < UBound($aStr_Values) And $iValue >= 0 Then Return $aStr_Values[$iValue]
Return $iValue
EndFunc
Func _Quit()
Exit
EndFunc