MD5 Hash einer Datei ermitteln

[Nicolai1234]

Hallo,
auf der suche danach, wie so etwas geht, bin ich auf diesen Beitrag in der Code-Lib gestoßen:
http://www.delphipraxis.net/internal...ct.php?t=53095

Der Code ist aber für .NET. Ich nutze aber Win32 (D6). Wie kann ich dann den Hash ermitten?

Vielen Dank
Nicolai

[dahead]

indem du dir z. b. dieses thema ansiehst:
http://www.delphipraxis.net/internal...ct.php?t=60487
(am ende hat negaH eine MD4 routine gepostet).

alternativ:
- http://www.fichtner.net/delphi/md5.delphi.phtml
- bzw. mit der suche nach DEC hier im forum.

[Luckie]

Es gibt auch noch Google. ;) Ich benutze allerdings die MD5 Implementierung von [ueser]Olli[/user] zu finden auf seiner Homepage.

[bigg]

moin,

in meinem Editor gibt es einen MD5-Dialog mit Progressbar.

[dahead]

@bigg: was bringt ihm der screenshot?

soweit ich mich erinnere verwendest duch auch fichtners implementation von md5, oder?

edit: nehme alles zurück. hätte mir den screenshot mal ansehen sollen. dachte du redest von filedup.

[bigg]

Zitat:

soweit ich mich erinnere verwendest duch auch fichtners implementation von md5, oder?

ja, in all meinen Anwendungen, schlimm?

[dahead]

Zitat:

schlimm?

nö, warum? ich hab ihm halt im ersten beitrag auch den link zu dieser implementation genannt, daher fand ich es etwas sinnlos, dass du ihm einen screenshot postest.

[bigg]

omg, jetz zick hier nich so rum :mrgreen:
kann ja auch nix dafür :lol:

[Nicolai1234]

Danke ich mache das jetzt so (basierend auf der md5.pas):

Delphi-Quellcode:

function MD5Hash(quelle: string): string;
begin
result := MD5Print(MD5File(quelle));
end;

[bigg]

Ich dachte du willst das für Dateien haben.