Procurei mas não consegui encontrar:
Lembro de ter visto algo sobre um GET pra senhas.
Tem isso ou estou enganado?
GET de senha
Moderador: Moderadores
- JoséQuintas
- Administrador

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

- Mensagens: 3092
- Registrado em: 12 Ago 2008 15:50
- Localização: São Paulo-SP-Brasil
GET de senha
Olá!
Sim, diante da necessidade, na época criaram algumas coisas com o pré processador (#command), gerando o @ row,col GET xVar PASSWORD... Tem até um exemplo do Toledo aqui no fórum. Tem um exemplo no Oasis (arquivo de nome pass.zip e mais dois outros).
Na CA-Tools, tem a GetSecret().
Sim, diante da necessidade, na época criaram algumas coisas com o pré processador (#command), gerando o @ row,col GET xVar PASSWORD... Tem até um exemplo do Toledo aqui no fórum. Tem um exemplo no Oasis (arquivo de nome pass.zip e mais dois outros).
Na CA-Tools, tem a GetSecret().
[]´s
Alexandre Santos (AlxSts)
Alexandre Santos (AlxSts)
- JoséQuintas
- Administrador

- Mensagens: 20267
- Registrado em: 26 Fev 2007 11:59
- Localização: São Paulo-SP
GET de senha
Valeu. Vou usar GetSecret() da hbct que faz parte do Harbour padrão.
Código: Selecionar todos
LOCAL cSenha := Space(10)
cSenha := GetSecret( cSenha, 10, 20, , "Digite senha:" )
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/
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/
GET de senha
Ha anos eu uso assim:
Código: Selecionar todos
vSenha := Space(06)
@ 10,05 GET vSENHA PICT "@!"
ATAIL(GETLIST):READER := {|BL1|GETSEN(BL1)} // Pega csenha e mostra *
READ
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql