Carregar Dbedit executando uma funcao !!!

[vagucs]

Rubens, o codigo é -4 porem se vc usar CHR(-4) nao existe o caractere -4 na tabela asc, o que a função CHR faz, é algo como subtrair tipo 256+(-4) = 252 entende. ele tenta avaliar o valor para que vc nao tenha problemas ao executar o programa. No xHarbour você pode simular estes valores de teclas, no clipper nao sei qual rotina você poderia usar, mas com certeza deve ter algo disponivel, entendeu porque funciona assim?

Se você usasse por exemplo: chr(300) o Caractere 300 nao existe para ser incluido no buffer do teclado, ai ele calcularia o seguinte 300-256=44 vai jogar o caractere 44 no lugar.

[Clash]

Nuuuu Vagucs... valeu mesmo...

Tava quebrando cabeça como o Rubens.

Precisava do F2 [ Chr(-1) ] no dbEdit()

Resolvi assim:

Código: Selecionar todos

Keyboard Chr(255)
dbEdit(xx,xx,xx,xx,"FC_Produtos"..........)
.
.
.
Function FC_Produtos(MODO)
Case Modo = 4
        Case Lastkey()=255 .or. Lastkey()=-1 &&--> ou tb K_F2
                ...........
EndCase
.
.
.