SoulBerkas
Novato XPZ
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;
pronto! agora seu conversor esta funcionado perfeitamente bem...
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;
pronto! agora seu conversor esta funcionado perfeitamente bem...
