将数据添加到listbox1如何跳过重复数据? s1 := self.ADOQuery1.FieldByname('名称').AsString;//将s1添加到listbox1如何跳过重复数据? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 if ListBox1.Items.IndexOf(s1) = -1 thenbegin //do nothingendelse begin //do somethingend;ADOQuery1.next ListBox1.Items.IndexOf,返回-1表示不存在 c/s系统如何升级支持Internet访问呢 求一汇总sql语句 有没人用过TMS Workflow Studio Access的DSN配置如何实现自动配置? 如何将编译到EXE中的资源文件释放并生成一个文件? 如何编程使在桌面任意地方双击都在该地方弹出开始菜单? 那位高手知道在delphi中如何播放real格式的音乐或视频?? 关于canvas 使用如何用代码控制ADOConnection连接数据库超时? [Delphi中,如何得知用户点击了DBGrid中的那一行??]送分了! delphi 处理数据库 概率问题(送80分)
if ListBox1.Items.IndexOf(s1) = -1 then
begin
//do nothing
end
else begin
//do something
end;
ADOQuery1.next