Funcao atual de Set Key

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Eduardo Pinho
Colaborador
Colaborador
Mensagens: 72
Registrado em: 13 Jun 2014 19:30
Localização: Niteroi

Funcao atual de Set Key

Mensagem por Eduardo Pinho »

Alguém poderia me dizer como faço pra ver o nome da funcao que atualmente está direcionada para uma determinada tecla por "set key".
F10, por, exemplo. Como faço pra saber pra qual função direcionei no ultimo "set key -9 to [nome_que_quero_saber] ?
syslink
Usuário Nível 3
Usuário Nível 3
Mensagens: 132
Registrado em: 20 Fev 2018 13:13
Localização: joinvile/sc

Funcao atual de Set Key

Mensagem por syslink »

na minha opinião depende .
se for modo gráfico é ON KEY
se for console ainda é SET KEY TO

abraços!
Eduardo Pinho
Colaborador
Colaborador
Mensagens: 72
Registrado em: 13 Jun 2014 19:30
Localização: Niteroi

Funcao atual de Set Key

Mensagem por Eduardo Pinho »

Obrigado pela atencao. Mas nao é isso. A tecla já está direcionada, mas os fontes estao muito confusos entao quero saber pra qual funcao tá indo, pra armazenar numa variavel, direcionar pra outra, e depois direcionar de novo pra antiga.
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Funcao atual de Set Key

Mensagem por JoséQuintas »

Eduardo Pinho escreveu: quero saber pra qual funcao tá indo, pra armazenar numa variavel, direcionar pra outra, e depois direcionar de novo pra antiga.
Então não precisa saber do nome.
É pegar o codeblock e depois retornar.

Código: Selecionar todos

bCode := SetKey( K_F9 )
...
SetKey( K_F9, bCode )
Se quiser salvar/restaurar várias de uma vez:

https://github.com/JoseQuintas/JoseQuin ... eysave.prg

aConf := SaveSetKey( K_F9, K_F10, K_F11 )
...
RestoreSetKey( aConf )
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Eduardo Pinho
Colaborador
Colaborador
Mensagens: 72
Registrado em: 13 Jun 2014 19:30
Localização: Niteroi

Funcao atual de Set Key

Mensagem por Eduardo Pinho »

Valeu Quintas Obrigado.
Nao entendo muito desse negocio de CodeBlock, mas funcionou show.
Já tinha tentado usar essa funcao SetKey mas como ela nao retornava uma string com o nome da funcao (era o que eu esperava que acontecesse) aí desisti dela.
Mas é como voce falou. Nao precisa saber o nome.
Abcs
Eduardo Pinho
Colaborador
Colaborador
Mensagens: 72
Registrado em: 13 Jun 2014 19:30
Localização: Niteroi

Funcao atual de Set Key

Mensagem por Eduardo Pinho »

Valeu. Obrigado.
alxsts
Colaborador
Colaborador
Mensagens: 3092
Registrado em: 12 Ago 2008 15:50
Localização: São Paulo-SP-Brasil

Funcao atual de Set Key

Mensagem por alxsts »

Olá!

Usando a busca do fórum, é possível encontrar os tópicos abaixo:
Codeblock para String, tem como? - Harbour
Como pegar o Literal de um codblock

Descobri também que não conheço quase nada sobre o pré-processador de comandos das linguagens xBase. Muito poderoso...

Os artigos a seguir, dos autores Gutierrez, Dan D e Spence, Rick, também são interessantes: Code Blocks

CodeBlock
[]´s
Alexandre Santos (AlxSts)
Responder