本文整理自网络,侵删。
ADOQuery.Sql.Text := 'select * from tab1 where key ='''+maykey+''' ';ADOQuery.Open();if ADOQuery.RecordCount <> 0 then //如果重复则返回重复IDbeginShowMessage(adoquery1.FieldByName('编号').AsString);end;
相关阅读 >>
Delphi webservice 中采用 tsoapattachment 传输文件
Delphi sccoloredid,星际争霸彩色 id 修改器 v0.2.0,支持 windows vista
Delphi gethomepath - 获取用户程序数据目录
更多相关阅读请进入《Delphi》频道 >>