SET Cursor

• Propósito
• Sintaxe
• Utilização
• Exemplo
• Consulte

Propósito

Determinar a presença ou não do cursor na tela.

Sintaxe

SET CURSOR ON | off

Utilização

Em procedimentos que desenham telas para que o cursor não seja exibido.

Existem alguns terminais onde o cursor não pode ser desligado. Recomenda-se consultar o manual do fabricante de seu terminal.

Deve-se tomar cuidado para que o cursor não esteja desligado nos comandos @ ... GET, @ ... PROMPT, função ACHOICE( ) e outros porque não se saberá em qual campo está o foco.

Exemplo

O exemplo a seguir mostra-nos a utilidade deste comando. Note a ausência do cursor durante o desenho da moldura e no primeiro comando GET.

PROG

SET CURSOR OFF

var = ""

@ 01,01 TO 10,10 DOUBLE

@ 05,05 SAY "Set Cursor OFF" GET var PIC "XXXX"

READ

SET CURSOR ON

@ 06,06 TO 20,20 DOUBLE

@ 08,08 SAY "Set Cursor ON " GET var PIC "XXXX"

READ

Consulte

@ ... BOX, @ ... GET, @ ... SAY, @ ... TO, CONF( ), RESTSCREEN( ), INKEY( ) e SAVESCREEN( ).