Clarion comes with these:
CURSOR:None EQUATE ('<0FFH,01H,00H,00H>')
CURSOR:Arrow EQUATE ('<0FFH,01H,01H,7FH>')
CURSOR:IBeam EQUATE ('<0FFH,01H,02H,7FH>')
CURSOR:Wait EQUATE ('<0FFH,01H,03H,7FH>')
CURSOR:Cross EQUATE ('<0FFH,01H,04H,7FH>')
CURSOR:UpArrow EQUATE ('<0FFH,01H,05H,7FH>')
CURSOR:Size EQUATE ('<0FFH,01H,81H,7FH>')
CURSOR:Icon EQUATE ('<0FFH,01H,82H,7FH>')
CURSOR:SizeNWSE EQUATE ('<0FFH,01H,83H,7FH>')
CURSOR:SizeNESW EQUATE ('<0FFH,01H,84H,7FH>')
CURSOR:SizeWE EQUATE ('<0FFH,01H,85H,7FH>')
CURSOR:SizeNS EQUATE ('<0FFH,01H,86H,7FH>')
CURSOR:Hand EQUATE ('<0FFH,01H,8AH,7FH>')
CURSOR:DragWE EQUATE ('<0FFH,02H,01H,7FH>')
CURSOR:Drop EQUATE ('<0FFH,02H,02H,7FH>')
CURSOR:NoDrop EQUATE ('<0FFH,02H,03H,7FH>')
CURSOR:Zoom EQUATE ('<0FFH,02H,04H,7FH>')
…but that list is not quite right. I think that winuser.h
has the correct list. I don’t have a winuser.h
lying around but a quick google shows up a few which incidentally also indicates some of these are in fact now obsolete.
There is also a list at the docs for SetSystemCursor function
Take for example:
OCR_APPSTARTING 32650
Translating this to clarion land you add 1 and convert to hex gives you 7F8B
the Clarion SetCursor function then wants that presented like so:
'<0FFH,01H,8BH,7FH>'
These appear to be some potentially useful additional cursor equates:
CURSOR:SIZEALL EQUATE('<0FFH,01H,87H,7FH>') ! Replaces the obsolete CURSOR:Size
CURSOR:NO EQUATE('<0FFH,01H,89H,7FH>')
CURSOR:HAND EQUATE('<0FFH,01H,8AH,7FH>') ! #if(WINVER >= 0x0500) ?
CURSOR:APPSTARTING EQUATE('<0FFH,01H,8BH,7FH>') ! #if(WINVER >= 0x0400) ?
CURSOR:HELP EQUATE('<0FFH,01H,8CH,7FH>')
Anyone have any others? I think there are some “Pan” cursors similar to the “Size” ones but I did not find any documentation yet.