GET de senha

Mensagem por **JoséQuintas** » 25 Fev 2014 00:16

Procurei mas não consegui encontrar:
Lembro de ter visto algo sobre um GET pra senhas.
Tem isso ou estou enganado?

Mensagem por **alxsts** » 25 Fev 2014 01:05

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().

Mensagem por **JoséQuintas** » 25 Fev 2014 11:09

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:" )

Mensagem por **janio** » 25 Fev 2014 12:03

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