Descrição
VTGet - Cria um novo objeto VTGET e o coloca em exibição na tela
|
Sintaxe
| VTGet( <xVar>, <cPic>, <lWhen>, <lValid>, <lPass>, <cF3> ) |
Parâmetros
| Par |
Nome |
Tipo |
Descrição |
Default |
Obg |
Ref |
| 01 |
xVar |
Indefinido |
Variável |
|
X |
|
| 02 |
cPic |
Caracter |
Marcara de Exibição |
|
|
|
| 03 |
lWhen |
Lógico |
Se habilita cursor |
|
|
|
| 04 |
lValid |
Lógico |
Validação ao sair |
|
|
|
| 05 |
lPass |
Lógico |
Se get é do tipo Password |
|
|
|
| 06 |
cF3 |
Caracter |
Consulta Padrão |
|
|
|
Retorno
Exemplo
#INCLUDE "TOTVS.CH"
#INCLUDE "APVT100.CH"
User Function VTGet()
Local nNumber := 0
@ 0, 0 VTSAY "Digite um numero" VTGET nNumber VALID nNumber > 0
VTRead
VTCLEAR
@ 0, 0 VTSAY "Digitou: " + cValtoChar(nNumber)
VTPAUSE
Return( Nil )
Resultado
Informação Adicional
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
