Fórum PassWordChar no TEdit mostrar/esconder senha #488470
10/08/2014
0
to com uma questão.
em run-time, em tempo de execução meu programa tem um icone para mostrar e esconder senha.
para esconder a senha, ele coloca um asterisco no lugar, uso esta linha de comando.:
edit1.passwordchar:='*';
porém, para mostrar a senha novamente, o certo seria colocar
edit1.passwordchar:='#0';
Até porquê #0 é o padrão do password char no TEdit.
Porém, nota-se que char é do tipo que armazena apenas um caractere, com isso, não posso executar o comando que citei acima.
O que fazer para mostrar a senha?
Alexandre
Curtir tópico
+ 0Post mais votado
11/08/2014
Retire os apóstrofos do comando para voltar a mostrar os caracteres.
Edit1.PasswordChar:= #0;
Valquiria Silva
Gostei + 1
Mais Posts
10/08/2014
Alexandre
Gostei + 0
11/08/2014
Alexandre
desculpe o Spam, não quero fazer gambiarras no programa!
até mais!
Gostei + 0
11/08/2014
Alexandre
Grato!
Gostei + 0
16/04/2025
Willian Bortolini
procedure Tfrm_PessoaVenda.btnOcultarSenhaClick(Sender: TObject);
begin
edtSenha.Properties.PasswordChar := '*';
edtSenha.Properties.EchoMode := eemPassword;
end;
procedure Tfrm_PessoaVenda.btnVisualizarSenhaClick(Sender: TObject);
begin
edtSenha.Properties.PasswordChar := #0 ;
edtSenha.Properties.EchoMode := eemNormal;
end;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)