delphi 获取文件md5码

delphi 获取文件 md5 吗，带源代码，放心使用。