TLMSetCursor

type TLMSetCursor = record

  Msg: Cardinal;

  CursorWnd: HWND;

  case Boolean of

    False: (

        HitTest: SmallInt;

        MouseMsg: Word;

      );

    True: (

        Dummy: LPARAM;

        Result: LRESULT;

      );

end;