delphi 写的MD5和SHA1加密程序