Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

É 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)

...

titleImportante

...

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: 

Image Added






 

04. DEMAIS INFORMAÇÕES

        Características do parâmetro:

...