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: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

Copy/Paste no get/read do Harbour

Mensagem por JoséQuintas »

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/
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: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

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, 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/
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: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

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, 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/
Responder