The Programming Works | Delphi programming and more

Let us consider a common problem: calculate MD5 and SHA1 digests of a file. The simplest way to do it is: program HashFile; {$APPTYPE CONSOLE} uses SysUtils, Classes, tfTypes, tfHashes; procedure CalcHash(const FileName: string); begin Writeln('MD5 ...

sergworks.wordpress.com