Programmer Reference : Common Graphics : Using cursors : Font cursors
Font cursors
Font cursors are easy to use. They are specified by a constant from the CgConstants pool dictionary. The previous example used a font cursor called watch:. In the following example, a coffee mug cursor appears on the screen for 5 seconds:
| window mug |
window := self shell window.
mug := window display createFontCursor: XCCoffeeMug.
window defineCursor: mug.
(Delay forSeconds: 5) wait.
window undefineCursor.
mug freeCursor
The following table lists the available font cursors specified in the CgConstants pool dictionary:
Table 20. Font cursors
XCArrow
XCBasedArrowDown
XCBasedArrowUp
XCBoat
XCBogosity
XCBottomLeftCorner
XCBottomRightCorner
XCBottomSide
XCBottomTee
XCBoxSpiral
XCCenterPtr
XCCircle
XCClock
XCCoffeeMug
XCCross
XCCrosshair
XCCrossReverse
XCDiamondCross
XCDot
XCDotbox
XCDoubleArrow
XCDraftLarge
XCDraftSmall
XCDrapedBox
XCExchange
XCFleur
XCGobbler
XCGumby
XCHand1
XCHand2
XCHeart
XCIcon
XCIronCross
XCLeftbutton
XCLeftPtr
XCLeftSide
XCLeftTee
XCLlAngle
XCLrAngle
XCMan
XCMiddlebutton
XCMouse
XCNumGlyphs
XCPencil
XCPirate
XCPlus
XCQuestionArrow
XCRightbutton
XCRightPtr
XCRightSide
XCRightTee
XCRtlLogo
XCSailboat
XCSbDownArrow
XCSbHDoubleArrow
XCSbLeftArrow
XCSbRightArrow
XCSbUpArrow
XCSbVDoubleArrow
XCShuttle
XCSizing
XCSpider
XCSpraycan
XCStar
XCTarget
XCTcross
XCTopLeftArrow
XCTopLeftCorner
XCTopRightCorner
XCTopSide
XCTopTee
XCTrek
XCUlAngle
XCUmbrella
XCUrAngle
XCWatch
XCXCursor
XCXterm
 
 
 
Last modified date: 05/12/2020