Copy/Paste no get/read do Harbour

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

Moderador: Moderadores

lugab
Colaborador
Colaborador
Mensagens: 843
Registrado em: 19 Mai 2009 15:58

Copy/Paste no get/read do Harbour

Mensagem por lugab »

Olá pessoal..

Compilando com Harbour tem como passar um conteúdo (com ctrl-c) pra o get /read (com ctrl-v) ?
exemplo:

Código: Selecionar todos

<Ctrl+c> pegar "Maria"
e 
<Ctrl+v> descarregar "Maria" no campo nome:   @ 1,1 Get Nome pict "@X"  ;  read 
lugab
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20453
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP
Curtiram: 1 vez

Copy/Paste no get/read do Harbour

Mensagem por JoséQuintas »

José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (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/
lugab
Colaborador
Colaborador
Mensagens: 843
Registrado em: 19 Mai 2009 15:58

Copy/Paste no get/read do Harbour

Mensagem por lugab »

Valeu, mestre,

A função compilou sem erro, mas como que usa ela no aplicativo ?

Como faz pra ela preencher o campo do get ativo ?
lugab
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20453
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP
Curtiram: 1 vez

Copy/Paste no get/read do Harbour

Mensagem por JoséQuintas »

Setar o filtro para o Inkey.

Código: Selecionar todos

#include "hb_gtinfo.ch"
   hb_gtInfo( HB_GTI_INKEYFILTER, { | nKey | MyInkeyFilter( nKey ) } )
Confirme se vai querer as outras teclas, senão retire desse filtro.
Rodinha do mouse, tab, shift-tab, fechar no x equivalente a ESC, e botão contrário do mouse pra ESC.
José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (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/
lugab
Colaborador
Colaborador
Mensagens: 843
Registrado em: 19 Mai 2009 15:58

Copy/Paste no get/read do Harbour

Mensagem por lugab »

Acho que vc quis dizer
#include "hbgtinfo.ch
não foi, mestre ?
lugab
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20453
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP
Curtiram: 1 vez

Copy/Paste no get/read do Harbour

Mensagem por JoséQuintas »

Isso mesmo. acabei olhando o HB_GTI_INKEYFILTER e digitando igual kkkk
José M. C. Quintas
Harbour 3.2, mingw, multithread, gtwvg, fivewin 25.12, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui), (hmg3), (hmg extended), (oohg), PNotepad, ASP, (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/
Responder