Delphi XE7 用indy開發微信公衆平臺（3）- 驗證消息真實性

加我微信：Leedege一起交流Delphi開發經驗 uses IdHashSHA, IdGlobal; function SHA1(Input: String): String; begin   with TIdHashSHA1.Create do     try       Result := LowerCase(HashBytesAsHex(TidBytes(Bytesof(Input)))

>>阅读原文<<