Thema: Delphi Textdatei Md5

Einzelnen Beitrag anzeigen

capo

Registriert seit: 7. Jul 2006
453 Beiträge
 
Delphi 11 Alexandria
 
#7

Re: Textdatei Md5

  Alt 29. Mai 2008, 00:52
Hat es evtl was mit dem Memo zu tun?
ich bekomme e58aea67b01fa747687f038dfde066f6 raus?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  i: integer;
begin
  for i := 1 to memo1.lines.count do begin
    Memo2.lines.Add(MD5Print(MD5String(Memo1.lines[i])))
  end;
end;
Hotte
  Mit Zitat antworten Zitat