| **Navigation:**  [[introduction.htm|Language Reference]] > 13 - Built-in Functions >====== SETCURSOR (set temporary mouse cursor) ====== | [[setcommand set command line parameters .htm|{{btn_prev_n.gif|Previous page}}]][[introduction.htm|{{btn_home_n.gif|Return to chapter overview}}]][[setdropid set dropid return string .htm|{{btn_next_n.gif|Next page}}]] | | || **SETCURSOR(** [//cursor//] **)** {{blk2blue.jpg|blk2blue.jpg}} | **SETCURSOR** | Specifies a temporary mouse cursor to display. | | //cursor// | An EQUATE naming a Windows-standard mouse cursor, or a string constant naming a cursor resource linked into the project--the name of a .CUR file with a leading tilde ('~Mycur.CUR'). If omitted, turns off the temporary cursor. | The **SETCURSOR** statement specifies a temporary mouse //cursor// to display until a SETCURSOR statement without a //cursor// parameter turns it off. This cursor overrides all CURSOR attributes. When SETCURSOR without a //cursor// parameter is encountered, all CURSOR attributes once again take effect. SETCURSOR is generally used to display the hourglass while your program is doing some "behind the scenes" work that the user should not break into. EQUATE statements for the Windows-standard mouse cursors are contained in the EQUATES.CLW file. The following list is a representative sample of these (see EQUATES.CLW for the complete list): | CURSOR:None | No mouse cursor | | CURSOR:Arrow | Normal windows arrow cursor | | CURSOR:IBeam | Capital "I" like a steel I-beam | | CURSOR:Wait | Hourglass | | CURSOR:Cross | Large plus sign | | CURSOR:UpArrow | Vertical arrow | | CURSOR:Size | Four-headed arrow | | CURSOR:Icon | Box within a box | | CURSOR:SizeNWSE | Double-headed arrow slanting left | | CURSOR:SizeNESW | Double-headed arrow slanting right | | CURSOR:SizeWE | Double-headed horizontal arrow | | CURSOR:SizeNS | Double-headed vertical arrow | **Example:** **MainWin APPLICATION('My Application'),SYSTEM,MAX,ICON('MyIcon.ICO'),STATUS,HVSCROLL** **         MENUBAR** **          ITEM('Batch Update'),USE(?Batch)** **         END** **        END** ** CODE** ** OPEN(MainWin)** ** ACCEPT ** **  CASE ACCEPTED()** **  OF ?Batch** **   SETCURSOR(CURSOR:Wait)   !Turn on hourglass mouse cursor** **   BatchUpdate              !and call the batch update procedure** **   SETCURSOR                !then turn off hourglass ** **  END** ** END**