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

SetCaret()
Sets the shape of the caret
------------------------------------------------------------------------------

Syntax
SetCaret( [ <nShape> ] )   -->   nOldCaret

Arguments
<nShape> is an optional integer specifying the new shape of
the caret.

Returns
An integer representing the previous caret shape.

Description
This function sets/gets the shape of the caret.  You may pass
a value between 1 and 5, which correspond to the following
shapes:

Value     Shape
  1       Normal (Underline)
  2       Lower half block
  3       Full block caret
  4       Upper half block
  5       Vertical line

Note that values 1-4 are the same as with the Clipper
SETCURSOR() function. By default, the caret will be set to
shape 1 (underline).

Example
#include "setcaret.ch"
nOldCaret = SetCaret( SC_VERTICAL_LINE )
ShowCaret( hWnd )
read
HideCaret( hWnd )
SetCaret( nOldCaret )