Delphi通过查找字符定位TADOQuery数据的位置
通过TADOQuery的方法Locate,输入字符,查找到定位到对应的数据位置,优点快速定位,缺点是只匹配查找到的和第一个位置,无法连续定位下一个!
//定位
qrymembertype.Locate('Cname', Cname, [loCaseInsensitive]);
'Cname'列名
Cname 所匹配的值
loCaseInsensitive, loPartialKey] 不区分大小写,部分匹配
[loCaseInsensitive] 不区分大小写
[loPartialKey] 部分匹配
[] 完全相同
同进匹配多个属性:
if edtsearch.Text <> '' then
begin
if not qry1.Locate('Cid', edtsearch.Text, [loPartialKey]) then
begin
if not qry1.Locate('cname', edtsearch.Text, [loPartialKey]) then
begin
qry1.Locate('cago', edtsearch.Text, [loPartialKey]);
end;
end;
end;
好的代码像粥一样,都是用时间熬出来的
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步