String To MD5

16 de Outubro de 2016
2
1
3
19
#1
Bom um Breve Tutorial de Como fazer um Conversor de Texto to MD5...


Primeiro crie um Projeto No Delphi. e Adicione :

2 Edits
1 Butao

todos ficam em standard



adicione na uses do Unit1.pas

IdHashMessageDigest




Agora Clique duas vezes no Botão e faça o seguinte!

crie essas variaveis:

HashMD5: TidHashMessageDigest5;
Texto: String;
Resultado : String;




apos isso abaixo do Begin:

HashMD5:=TidHashMessageDigest5.Create;
Texto := Edit1.Text;Resultado :=HashMD5.HashStringAsHex(Texto);
Edit2.Text := Resultado;

upload_2016-10-17_0-37-23.png

pronto! agora seu conversor esta funcionado perfeitamente bem...:)

upload_2016-10-17_0-38-42.png
 
Curtidas: Alyen