Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!

SET Cursor

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 visto tracejando a tela.

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.

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, ACCEPT, CLEAR, INPUT, TEXT, WAIT, CONF( ), RESTSCREEN( ), INKEY( ) e SAVESCREEN( ).

Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!