Cursorcheck Topic is solved

[Erich]

Hallo,

Nach ein paar Jahren habe ich ein altes Script reaktiviert in welchem ein Teil prüft ob sich der Cursor ändert. Es ist kein Systemcursor.

Dazu hatte ich folgende Funktion gefunden. Unter XP lies sich feststellen ob sich in der Anwendung der Cursor verändert, also h_cursor. Jetzt habe ich Win10 und in h_cursor ist immer 0.

Bin mir auch nicht sicher ob es an Win10 oder doch was anderem liegt.

Wäre schön wenn die jemand wieder hin bekommt oder eine Alternative?

Code: Select all

CursorCheck()

{

; Credit: shimanov, http://www.autohotkey.com/forum/post-47747.html#47747

 VarSetCapacity(ci, 20, 0)

 ci := Chr(20)

 ErrorLevel := DllCall("GetCursorInfo", "uint", &ci)

 ErrorLevel := mod(ErrorLevel + 1, 2)

 h_cursor := *(&ci+8)+(*(&ci+9) << 8)+(*(&ci+10) << 16)+(*(&ci+11) << 24)

 return h_cursor

}

[jNizM]

Code: Select all

GetCursorInfo() ; https://msdn.microsoft.com/en-us/library/ms648381(v=vs.85).aspx
{
    NumPut(VarSetCapacity(CURSORINFO, 16 + A_PtrSize, 0), CURSORINFO, "uint")
    if !(DllCall("user32\GetCursorInfo", "ptr", &CURSORINFO))
        return A_LastError
    return NumGet(CURSORINFO, 8, "ptr") ; hCursor
}

MsgBox % GetCursorInfo()

[Erich]

Danke, klappt prima