Como ativo os Valores das teclas don Inkey.ch

[jc101]

Ola Pessoal..
estou migrando do xharbour para o harbour, ainda em modo console..
dai me deparei com um impecilho...
eu quero capturar os valores de teclas Shift+Enter
no hbinkey.ch e
#define HB_K_ENTER 13
#define HB_K_ALT_ENTER 412
#define HB_K_CTRL_ENTER 10
#define HB_K_SHIFT_ENTER 668
dai no xharbour, vc adicione a diretiva -DHB_INKEY_EXT
no harbour oque ativo??

[Itamar M. Lins Jr.]

Penso que basta linkar a lib xhb junto.
Obs: Eu não testei.

https://github.com/harbour/core/blob/ma ... hbinkey.ch

Ou testar se, sem nada disso qual é o valor da SHIFT+ENTER retorna, penso que pode depender de qual GT está usando.

Saudações,
Itamar M. Lins Jr.

[jc101]

Ok Itamar..
vou aguardar os teus testes... eu tb vou ver se tem como testar

[jc101]

Itamar,
acho que se usa um dos arquivos... q retornam esse valores
hbinkey.ch
#define HB_K_SHIFT_ENTER 668

ou o q vc indicou..xhbinkey.ch
#define XHB_K_SH_RETURN 434 /* Shift-Enter */
#define XHB_K_SH_ENTER 434 /* Shift-Enter */

eu quero usar esse hbinkey.ch.. pois não desejo compatibilidade nenhuma com o clipper.. quero puro harbour.
no caso do xharbour, eu acrescentei a diretiva de compilação(HB_INKEY_EXT) nessa variavel ambiental:
set HARBOURFLAGS=-v -m -w1 -es2 -l -DHB_INKEY_EXT
que valeu pra todas as libs que eu gerava...

Att,
JC

[jc101]

desculpe um equivoco...
não quero compatibilidade com clipper, e sim com xharbour.
Att,
JC