Click above to get retro games delivered to your door ever month!

#xcommand DEFINE CURSOR <oCursor> ;
             [ <resource: RESOURCE, RESNAME, NAME> <cResName> ] ;
             [ <predef: ARROW, ICON, SIZENS, SIZEWE, SIZENWSE,;
                  SIZENESW, IBEAM, CROSS, SIZE, UPARROW, WAIT> ] ;
       => ;
          <oCursor> := TCursor():New( <cResName>, [ Upper(<(predef)>) ] )

/*----------------------------------------------------------------------------//