Как определить, анимирован ли текущий курсор мыши?

Я нашел один обходной путь — перейти к параметру istepIfAniCur в DrawIconEx равно UINT. Невозможно, чтобы кто-то создал анимированный курсор с 4 294 967 295 кадрами (может быть, для какого-то ролика курсора :)

Учитывая этот факт, вы можете передать это значение в DrawIconEx. функция, которая вернет False в случае, если курсор анимирован (из-за превышения диапазона кадров) и True в случае статического, поскольку игнорирует параметр istepIfAniCur. Вы должны передать 0 параметру diFlags, потому что не нужно ничего рисовать.

Вот пример Дельфи:

if not DrawIconEx(Canvas.Handle, 0, 0, hCursor, 0, 0, High(Cardinal), 0, 0) then
  Caption := 'Cursor is animated ...'
else
  Caption := 'Cursor is not animated ...';

И поскольку я обещал тег C++, вот моя попытка перевода

if (!DrawIconEx(this->Canvas->Handle, 0, 0, hCursor, 0, 0, UINT_MAX, NULL, 0))
  this->Caption = "Cursor is animated ...";
else
  this->Caption = "Cursor is not animated ...";

На превышение диапазона кадров также указывает ошибка ОС ERROR_INVALID_PARAMETER, что можно проверить с помощью GetLastError, когда DrawIconEx не работает.

Лучший способ:

      typedef HCURSOR(WINAPI* GET_CURSOR_FRAME_INFO)(HCURSOR, LPCWSTR, DWORD, DWORD*, DWORD*);
      GET_CURSOR_FRAME_INFO fnGetCursorFrameInfo = 0;

      HMODULE libUser32 = LoadLibraryA("user32.dll");
      if (!libUser32)
      {
        return false;
      }

      fnGetCursorFrameInfo = reinterpret_cast<GET_CURSOR_FRAME_INFO>(GetProcAddress(libUser32, "GetCursorFrameInfo"));
      if (!fnGetCursorFrameInfo)
      {
        return false;
      }

      DWORD displayRate, totalFrames;
      fnGetCursorFrameInfo(hcursor, L"", 0, &displayRate, &totalFrames);

Вот пример в Delphi (и попытка перевода на C++), как я пытался получить размеры курсора, используя GetIconInfo, но она работает не так, как я ожидал. Он всегда возвращает ширину одного кадра в случае анимированного курсора, поэтому кажется, что GetIconInfo вообще не заботится о фреймах. Или я ошибаюсь?

procedure TForm1.Timer1Timer(Sender: TObject);
var
  IconInfo: TIconInfo;
  CursorInfo: TCursorInfo;
  Bitmap: Windows.TBitmap;
begin
  CursorInfo.cbSize := SizeOf(CursorInfo);
  GetCursorInfo(CursorInfo);
  GetIconInfo(CursorInfo.hCursor, IconInfo);

  if GetObject(IconInfo.hbmColor, SizeOf(Bitmap), @Bitmap) <> 0 then
  begin
    Caption := 'Cursor size: ' +
               IntToStr(Bitmap.bmWidth) + ' x ' +
               IntToStr(Bitmap.bmHeight) + ' px';
  end;

  DeleteObject(IconInfo.hbmColor);
  DeleteObject(IconInfo.hbmMask);
end;

Моя попытка Visual C++ (обратите внимание, что я не знаю C++ и не имею компилятора :)

CString txt;
ICONINFO ii;
CURSORINFO ci;
BITMAP bitmap;

ci.cbSize = SizeOf(CURSORINFO);
GetCursorInfo(ci);
GetIconInfo(ci.hCursor, ii);
GetObject(ii.hbmColor, sizeof(BITMAP), &bitmap);
txt.Format("Cursor width: %d px", bitmap.bmWidth);
MessageBox(txt);