![]() Somewhere in that updating, the graphics may revert to the cursor set by the SetClassLong API, but since Excel is constantly updating the graphics, it is constantly over-ridden. I thern realized that as the pinter is moved over various entities in the window, the cursor is constantly being updated to be appropriate to the object that it's hovering over. However, on closer inspection, I saw the pointer flicker to the custom cursor as I moved the mouse over the worksheet. ![]() Get_Active_HWND = FindWindowEx(DeskHWnd, 0&, "EXCEL7", ActiveWindow.Caption)Īt first, it looked like there was no effect. HOldCursor = SetClassLong(Get_Active_HWND, GCL_HCURSOR, hOldCursor)ĭeskHWnd = FindWindowEx(AppHWnd, 0&, "XLDESK", vbNullString) HOldCursor = SetClassLong(Get_Active_HWND, GCL_HCURSOR, hNewCursor) HNewCursor = LoadCursorFromFile(Win_Dir & "harrow.cur") Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _Ĭonst Win_Dir As String = "C:\WINDOWS\Cursors\" ![]() ![]() Private Declare Function SetClassLong Lib "user32" Alias "SetClassLongA" _ Private Declare Function LoadCursorFromFile Lib "user32" Alias "LoadCursorFromFileA" _ ![]()
0 Comments
Leave a Reply. |
Details
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |