Travar comando copiar CTRL+C

Delphi

17/07/2012

Olá pessoal,
Tenho um campo senha que está com um TPasswordEdit e ao digitar no lugar dos caracteres aparecem ***
Acontece que se o usuário clica em COPIAR (CTRL + C) e cola em um bloco de notas, por exemplo, ele consegue ver.
Alguém sabe como travar ?
Vlw!
Powerlog Tecnologia

Powerlog Tecnologia

Curtidas 0

Respostas

Dionei Selonke

Dionei Selonke

17/07/2012

Olá, usando o TEdit, se a propriedade PasswordChar estiver ativa, o próprio Delphi bloqueia a cópia do conteúdo do campo.

Que versão do Delphi voce utiliza?
GOSTEI 0
Powerlog Tecnologia

Powerlog Tecnologia

17/07/2012

Uso Delphi 7
GOSTEI 0
Powerlog Tecnologia

Powerlog Tecnologia

17/07/2012

Encontrei a resposta no fórum do Facebook:

if ActiveControl is TbsSkinPasswordEdit then
  begin
    if Key in [#11, #43] then
    begin
      Key := #0;
      exit;
    end;  
  end;


[url]https://www.facebook.com/groups/DelphiBrasilforever/[/url]
GOSTEI 0
Wesley Yamazack

Wesley Yamazack

17/07/2012

Olá powerlog, obrigado por partilhar a solução com o pessoal!

Um abraço
GOSTEI 0
POSTAR