SET CURSOR
 Comuta a visibilidade do cursor em tela
------------------------------------------------------------------------------

 Sintaxe

     SET CURSOR ON | off | <xlComuta>

 Argumentos

     ON Torna o cursor visível.

     OFF Torna o cursor invisível.

     <xlComuta> é uma expressao lógica que deve ser colocada entre
     parênteses. O valor de verdadeiro (.T.) é o mesmo que ON, e o valor
     falso (.F.) tem o mesmo significado que OFF.

 Descriçao

     SET CURSOR comuta o estado do cursor entre ON e OFF (ligado e
     desligado). Quando o CURSOR está OFF, entradas via teclado e exibiçoes
     em tela nao sao afetadas. O cursor é simplesmente escondido, podendo a
     entrada de dados ser efetuada sem que o cursor esteja visível. As
     funçoes ROW() e COL() sao atualizadas como se o cursor estivesse
     vísivel.

     Este comando é geralmente utilizado para suprimir o cursor enquanto uma
     tela está sendo montada. A forma mais ideal é de somente mostrar o
     cursor em um programa de produçao quando o usuário se encontrar no modo
     de ediçao, ou seja, utilizando GETs, MEMOEDIT(), ou algum outro tipo de
     modo de ediçao.

 Exemplos

     O exemplo seguinte mostra a utilizaçao típica do SET CURSOR:

     LOCAL lAnswer := .F.
     @ 24, 0
     @ 24, 15 SAY "Deseja encerrar [S/N]?";
        GET lAnswer PICT "@!";
     SET CURSOR ON
     READ
     SET CURSOR OFF

 Arquivos:  Biblioteca CLIPPER.LIB.
 To download this example - click here.

See Also: SET CONSOLE SETCURSOR() SETPOS()