Histórico da Página
...
É possível adicionar novas teclas de atalho por meio do ponto de entrada VTDFKEY.
| Nota |
|---|
No SIGAACD TelNet/VT100, o atalho limita-se a CTRL+ (qualquer letra do alfabeto latino) |
Para o uso correto da letra na função VTSetKey, é necessário informar um código ASCII do caractere que deseja utilizar, porém é necessário informar a diferença a partir do valor 65. Ou seja:, respectivamente:
Nº | Letra
----|-------
01 | A
02 | B
03 | C
04 | D
05 | E
06 | F
07 | G
08 | H
09 | I
10 | J
11 | K
12 | L
13 | M
14 | N
15 | O
16 | P
17 | Q
18 | R
19 | S
20 | T
21 | U
22 | V
23 | W
24 | X
25 | Y
26 | Z
Ao utilizar o setkey(03) ele soma a 65, resultando em 68 que é responsável pela a letra C
Exemplo 1: Adicionando uma função customizada a tecla de atalho U
B
l
o
c
o
Não é possível remover a tecla CTRL de qualquer atalho. (ver com a ani documentação)
...
| title | Importante |
|---|
...
Ou:
K_CTRL_A
K_CTRL_B
K_CTRL_C
.
.
.
Exemplo 1:
| Bloco de código |
|---|
#INCLUDE "TOTVS.CH"
#include "apvt100.ch"
User Function VTDFKEY()
VTSetKey(25,{|| U_ACDATENC()},"Nova Msg") //Atribuindo a letra Y
Return NIL
User Function ACDATENC()
VTAlert("Funcao U_ACDATENC()","Atencao",.T.,2500)
Return NIL
|
Exemplo 2:
| Bloco de código |
|---|
#INCLUDE "TOTVS.CH"
#include "apvt100.ch"
User Function VTDFKEY()
VTSetKey(K_CTRL_Y,{|| U_ACDATENC()},"Nova Msg") //Atribuindo a letra Y
Return NIL
User Function ACDATENC()
VTAlert("Funcao U_ACDATENC()","Atencao",.T.,2500)
Return NIL
|
Resultado:
04. DEMAIS INFORMAÇÕES
Características do parâmetro:
...