Delphi
SambaGao
迈和(北京)信息科技公司
云计算开发 Form.com 平台
coder
展开
-
delphi md5加密算法
在Uses单元中引用 IdHashMessageDigest,IdGlobal, IdHash 单元,再写如下代码即可以达到MD5的实现。 procedure TForm 1.Button1Click(Sender: TObject); var MyMD5: TIdHashMessageDigest5; Digest: T4x4LongWordRecord; beginMyMD5 := T原创 2010-03-22 10:18:00 · 418 阅读 · 0 评论 -
delphi 加字符串相加
procedure TForm1.Button2Click(Sender: TObject);varname:String ;begin name := edit2.Text ; name := % + name ; query1.Close ; query1.SQL.Clear ; query1.SQL.Add(select * from gjh_t where nam原创 2010-04-29 17:29:00 · 1586 阅读 · 0 评论 -
异常处理
try query1.Close ; query1.SQL.Clear ; query1.SQL.Add(insert into gjh_t values(+name+)) ; query1.ExecSQL ; query1.SQL.Clear ; query1.SQL.Add(select * from gjh_t) ; query1.原创 2010-04-29 18:03:00 · 196 阅读 · 0 评论