摘要:
在Delphi自带的Indy控件中其实是提供了MD2,MD4,MD5对象的,我们可以直接使用它们来完成MD5的签名算法。而不需要再去找其它的DLL或是Pas了。在Uses单元中引用 IdHashMessageDigest,IdGlobal, IdHash 单元,再写如下代码即可以达到MD5的实现。示例代码procedure TForm1.Button1Click(Sender: TObject);varMyMD5: TIdHashMessageDigest5;Digest: T4x4LongWordRecord;beginMyMD5 := TIdHashMessageDigest5.Creat 阅读全文
posted @ 2014-01-08 15:40
冰意 LceMeaning
阅读(254)
评论(0)
推荐(0)
摘要:
edt2.Text := FormatFloat('0.00',StrToFloat(edt1.Text)); //按格式输出Params.Add('c='+Utf8ToAnsi(UTF8Encode(trim(Memo1.Text)))); //将Memo1.text转为UTF8编码格式 阅读全文
posted @ 2014-01-08 15:37
冰意 LceMeaning
阅读(205)
评论(0)
推荐(0)
摘要:
Delphi中的“:”符合有特殊的用途,它表示参数的意思:就是比如如果9:30,系统会认为30是9的参数对象,这就是为什么系统报错“定义了不正确的参数对象”。而且Delphi有着很强的自检功能,要想SQL查询数据正常必须要先关闭控件的自检关闭,所以解决方案就是设置 MADOQuery.ParamCheck := False;然后如果怕有不好的效果的话就当程序运行完之后再设置回来 MADOQuery.ParamCheck := True。 阅读全文
posted @ 2014-01-08 14:51
冰意 LceMeaning
阅读(464)
评论(0)
推荐(0)