$hash = hash_hmac("sha1", ('GET&'.rawurlencode($Url).'&'.rawurlencode($CanShu)), $SecretOAuthKey.'&', TRUE);php 有hash_hmac函数 求delphi 版
解决方案 »
- cxgrid打印用dxComponentPrinter的一个问题
- 高手进来看看这个软件是用什么实现的
- 求视频语音传输开发控件,,,比如 Directshow控件 或者 ACMWaveIn控件 和 安装说明 !!!
- 请问谁有NMUDP控件下载地址?
- sql sever 导出的问题
- 最蠢的问题:高手不要进,如何制作delphi的可执行程序?
- 高分求教!如何在DELPHI程序中加入背景音乐,MP3的音乐或是FLASH音乐。
- RS232问题?
- mdi的windowsmenu和 PageControl动态联系起来 在线求一实例
- delphi dbgrid列的拖動
- DELPHI 表单控件的应用求助
- DBGridEh 的Checkboxes 选择记录问题?
请查阅indy组件
function TBaseApp.HashSha1Str(const AStr: string): string;
var
bs: TBytes;
i : Integer;
begin
with TIdHashSHA1.Create do
try
bs := HashString(AStr);
finally
Free;
end; Result := '';
for i := Low(bs) to High(bs) do
Result := Result + IntToHex(bs[i], 2);
Result := LowerCase(Result);
end;
是data 和 key 两个参数 并非单纯的sha1加密php官方: http://php.net/manual/en/function.hash-hmac.php
=========================================
PHP 有 sha1加密函数: sha1();delphi 也有sha1加密
我要的是这个hash_hmac()函数的delphi版
=====================================
hash_hmac() 是有两个参数的 data 和 key