Teclado Virtual p/enganar KeyLogger�s

Question

J� usaram Internet Banking ?Sabem aquele teclado virtual, que substitui a digita��o e consequentemente impede os programas espi�es de capturar as teclas pressionadas?Pois �... Algu�m j� fez isso em De...

Deus · Answer

Olha, eu n�o cheguei a testar, mas tem um componente gratuito que faz o trabalho de Teclado virtual:

[url]http://www.jazarsoft.com/products/count.php?dlid=43[/url]

Espero que seja o que voc� est� procurando. :) Abra�os, dEUS!

F�bio Borges · Answer

Ol� elitonon coloque 3 buttons no form e um edit e na propriedade PasswordChar coloque *. Veja como fica e depois continue para os outros caracteres.

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.text:=Edit1.text + �A�;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Edit1.text:=Edit1.text + �B�;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
Edit1.text:=Edit1.text + �C�;
end;