说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

筛选数据-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
筛选数据-Delphi资料

·设定范围·

所谓范围,就是指定一个上下界,筛选出落在上下界内的一组连续记录。为方便说明,我们先生成一个

项目,并在Form1中放入如下组件:

组件名 属性

Table1 DatabaseName:=DBDEMOS

TableName:=Customer.db

DataSource1 DataSet:=Table1

DBGrid1 DataSource:=DataSource1

本例中我们使用了Delphi自带的别名'DBDEMOS'下的一个数据库:Customer.db,这是一个记录顾客基

本信息的数据库。当我们把Table1的Active属性置为True时,在DBGrid1中会显示出该库的内容。下面我们

往Form1中放入一个Button1,编写Button1的OnClick事件如下:

procedure TForm1.Button1Click(Sender: TObject);

begin

with Table1 do

begin

KeyExclusive:=True;// 为True时不包括边界值,为False时包括边界值,缺省为False;

SetRangeStart;

Fieldbyname('CustNo').AsString:='1000'; //设定范围上界

SetRangeEnd;

FieldbyName('CustNo').AsString:='2000'; //设定范围下界

ApplyRange; //使范围生效

end;

end;

以上是设定范围的很典型的一组语句。运行程序,单击按钮后,顾客号在1000至2000之间的顾客记录被

筛选了出来。范围一旦被设定,在整个应用程序执行过程中都是有效的。当然,我们可以调用CancelRange

方法来暂时使范围失效,以后需要范围生效时,可直接调用ApplyRange方法,而不需要再次设定范围的上下

界。另外,我们可以调用EditRangeStart和EditRangeEnd的方法来改变范围的上下界。

使用范围的唯一条件是,设定范围的字段必须已建索引。对没有建立索引的字段使用范围是不允许的。

·使用过滤器·

过滤器筛选出来的记录可以是连续的,也可以是非连续的。过滤器不受索引的限制,而且即使有索引,

过滤器也不依赖,也就是说,过滤出来的记录是未经排序的。过滤器的使用非常简单,可以直接在Table组

件的Filter属性中写入包含过滤条件的字符串,并把Filtered属性置为True来启动过滤器。在上例中,我

们可以在Table1的Filter的属性框内写入:(CustNo>1000) and (CustNo<2000)

当我们把Table1的

Filtered属性置为True时,DBGrid1内将显示出顾客号在1000至2000之间的顾客记录。当过滤条件比较复

杂时,我们可以通过编写Table1的OnFilterRecord事件来实现。例如:

procedure TForm1.Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);

begin

Accept:=(DataSet[′CustNo′]>1000) and (DataSet[′CustNo′]<2000) and (DataSet[′

Country′]=′US′);

end;

运行程序,所有CustNo在1000至2000之间并且Country='US'的顾客记录被筛选了出来。在

OnFilterRecord事件中,我们可以使用条件分支语句或者循环语句,因而非常灵活,便于完成条件很复杂

的记录筛选工作。和范围一样,过滤器一旦设定,就将维持到应用程序的结束。当然,我们可以将Filtered

属性置为False来使过滤器失效。

和范围相比,过滤器方便灵活,而且不受索引限制,但正是因为没有索引支持,当记录数量比较大时,

过滤器的速度会受影响。因此

范围和过滤器各有各的适用场合。

·使用查询·

即通过TQuery组件来使用SQL语句实现记录的筛选。大家可能对这种方法比较熟悉,这里只做简单说明

,如上例中的记录筛选用一条很简单的SQL语句就能实现:

Select * from Customer

Where (CustNo>1000) and (CustNo<2000)

使用SQL语言可以实现条件很复杂的筛选,当记录数量很大或条件很复杂时,应尽量使用SQL语言来查询

和前两种方法相比,使用查询更加灵活多变,适应性更强,而且也不受索引的限制。但这种通过SQL语

句的筛选是一次性的。当调用TQuery的Open方法(或Active:=true)后,TQuery返回查询结果集,之后就

失去了对结果集的范围限制。当结果集中的某些记录发生改变(如某条记录的Custom变为3000),不满足筛

选条件时,这种方法不能马上察觉,必须再次调用TQuery的Open方法才能实现。

有胆你就来!11个在线编码大赛 CTO如何避免决策失控:第一步-定义角色 后机械硬盘时代,那些引领风骚的闪存初创公司 致远文杰:传统企业如何实现移动化转型? 记华为HCC2013 Day2:SDN开放编程系统OPS打造生态圈 HCC2013:华为FusionCube融合至简,性能至优 已确认Stephen Elop候选微软下任CEO 英语对于软件开发者来说到底有多重要? SDCC 2013中国软件开发者大会成功落幕 新浪微博宋琦:PHP在微博优化中的“大显身手” 8月份浏览器份额:IE浏览器PC端出现反弹 移动端跌出前五 如何让Ruby项目速度提升10倍 跨平台进行到底:Facebook发布Unity SDK 云薪资管理初创公司ZenPayroll:年处理薪资超1亿美元,获多位知名CEO力挺 Twitter开源Summingbird:近原生编码下整合批处理与流处理 亚马逊推Matchbook 欲将顽固纸质书读者拉向电子书 Broadcom为可穿戴设备推新开发平台WICED 再战江湖 New Kodak还牛不牛? 郭理靖:公、私有云架构异同点与难点 美化代码的15个代码语法高亮工具 你所不知道的虚拟化和云计算 [开源推荐]Effeckt.css项目:CSS交互动画应用集锦 针对Google Glass应用的四大UX设计原则及典型应用 Google收了摩托罗拉,微软收了诺记,黑莓又将花落谁家? 十亿月PV网站秘诀:Reddit自失败中总结的25条经验 粉碎5个NoSQL流言:各司其职,NoSQL的出现比关系型更早 豌豆荚发力移动游戏平台,推出SDK 2.0 BlackBerry Jam Asia 2013即将在香港隆重召开,免费门票限量提供 小米发布会高潮迭起:米3、电视、Hugo大牛 谷歌放在Windows上的特洛伊木马:Chrome Apps应用平台 解析:Google基于数据驱动的招聘面试程序 TObject和integer之间的转换问题 数据库简单问题 文本文件的最后一行怎末去掉换行符,用程序实现。 善良的程序员,当心QQ骗子啊! 谁有Qamonitor,小弟急用! 不要笑偶 转分 有会打印对象编程的吗?printer对象怎样打印横线??怎样打印带风格的报表?? 表分区的数量有上限吗 ASP 0178 (0x80070005) 各位高人,请一定帮个忙吧 !! SetCellImage 利用C# 读取系统当前进程的出现问题,帮忙!! 请教高手:怎样在一个窗口里能够输入文本文件(按回车键) 另一个窗口显示出同样的文本 高手在何方 (大力请进)sql字符串处理的问题 上哪能下到exchange 2000,下到马上给分! ado问题? 数据迁移问题??? 怎么把列名选出来? [在线求助]:有什么好的方法可以使得鼠标放上有链接的地方状态栏不显示真实地址? 高手在哪!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 各位大哥﹐何為微创软件开发管理﹖﹖﹖﹖ 3com switch 3300 xm 有网管的功能吗? 关于窗口大小的问题,快来捡分~~~ 为什么2001年前的提问的问题、得分的问题、信誉分变化纪录都不见了。 无法在人才频道上提交简历。。。 请问:wsad4支持滚轮鼠标的插件哪里有下载??? 自动锁定计算机? 请问如何终止一个正在运行的应用程序 无法在人才频道上提交简历。。。 后面数据库为ms sql server2000的时间问题? DoEvents 怎么用?(不好意思,只有这么多分了!) CSDN真让我失望,大家都喜欢回答无聊的问题(不要回复) jdbc中LIKE条件如何使用prepareStatement? 请问,如果想报考系分的话,需要先过高程吗? 请问怎么把Excel形式的表结构导入到Oracle … 请问数据窗口中如何自动记录资料修改的帐户? 我倒要看看谁有本事让javac输出这样的信息? ADSL 可以直联吗? linfeng1216 (林枫) 请来领分。 在java中的暴露事件如何处理? 求PowerDesigner电子书籍资料!急! 有关_SERVER["HTTP_CONNECTION"] 两个窗体 带有setup程序和一堆代码的电子书怎么看? 这个web控件谁能介绍的详细一点 DCOM的配置问题 三国经典故事(女性,18岁以下者勿进) TIME_WAIT问题(100分!!!) linfeng1216 (林枫) 请来领分。 逻辑的力量怎么样 今天晚上 在西班牙几点能看到流星雨?今天晚上 在西班牙几点能看到流星雨?要说清楚是国内时间还是西班牙时间.今晚在西班牙到底能不能看到流星雨(除去天气因素)? 设实数√5的整数部分为a,小数部分为b,求√5×(a+a×b)的值. 逻辑中真包含关系与真包含于关系的区别逻辑推理确实难推敲啊 两向量方向相反怎么表示 设实数根号15整数部分是a,小数部分是b ,求(b-a)平方+(b+a)平方+12b的值 与、或逻辑具备什么特性 你愿意给我多少时间,就证明你有多在乎我~这句话的意思?RT, 某村将48亩的耕地该种果树(如图),如果枣树与梨树的种植面积一样大,则梨树的占地面积为( )亩桃树120° 李树90 思维是什么?如何拥有“逻辑”? 古代楷书四大家哪一位是元朝人? 方形椭圆面积计算如图.长70mm,宽55mm,4个圆角均为21.请问这样的椭圆面积怎么计算。 说话没有逻辑我该怎么办 为什么古代中国皇帝不去打世界比如说元朝 唐朝 明朝 椭圆的圆环面积计算.就椭圆的圆环.要截取12平方米.该怎么计算. Are you,let me know how the warm embrace的意思? 如图,已知AB,AC边上的中点分别为 D,E,试说明DE平行且等于于二分之一BC,请根据 下列各图如图,已知AB,AC边上的中点分别为 D,E,试说明DE平行且等于于二分之一BC,请根据 下列各图所添的辅助线分别 “一战”后的战胜国怎么“调整”德国殖民地的? 为什么梦是没有逻辑的? "两个条件同时满足的情况下结论才能成立"相对应的逻辑运算是___运算 a加法 b逻辑加 c逻辑乘"两个条件同时满足的情况下结论才能成立"相对应的逻辑运算是___运算a加法b逻辑加c逻辑乘d 已知2a-b分之a+2b=5分之9则a:b=———— 、下列句中“之”字用法归类正确的一项是:( ) ①缘溪行,忘路之远近.②渔人甚异之③莲之出淤泥而不染甚蕃⑥箬篷覆之⑦盖简桃核修狭者为之⑧宋孟浩然之广陵A ①⑤\②③\⑦④⑧\⑥ B db平行于ac,db等于二分之一ac,e为ac中点,证bc等于de 已知2a-b分之a+2b=五分之九,则b分之a= 什么是逻辑 db平行ac,且de=二分之一ac,e是ac的中点,求证bc=de 高数,级数,如果后项小于前项,则一般项一定趋近于0吗? 我为什么写作文那么没有逻辑呢?要怎么写啊? 请问us的对应词是什么?急. 梨树下可以套种什么蔬菜 圆面积计算如图,半圆的直径AB为2,AC垂直AB于A,BD垂直AB于B且AC=1,BD=3,P为半圆上任意一点,则封闭图形ABDPC面积最大为—————— Warm as you,all the 通往广场的路不止一条仿写300字作文 圆形面积计算一个圆形面积之比是9:1,直径之比是多少? 下列各组句子中之的用法与"渔人甚异之"相同的一项是A莲,花之君子者也B老人引杨氏入山之大穴C杨谢而从之D何陋之有 模仿李叔同《送别》的填词,自己创作一首,急求!谢谢!~ 果园里桃树占总树数的1/3,李子树占总树数的1/9,其余的是苹果树.写出这个果园的桃树和李子树的棵树比. 土字旁加个山字怎么打 唐代楷书名家有哪些人?各有怎样的艺术风格? 果园里桃树的棵数占果树总数的3/2,李子树的棵数占果树总数的9/1,其余的是苹果树.写出这个果园的桃树和李子树的棵数比 提土旁加一个"龙"怎么读, 写一个你自己的例子来说明通往广场的路不止一条250字 大棚蔬菜种植可以一起栽种的蔬菜搭配有哪些? 以环保为题用什么题目好? 写一个科学事例,证明一个名言的故事(200字) 看到此网的请快速回答 果园里有桃树三分之八亩,苹果树六分之十三亩,李子树八分之十五亩,请问该果园有多少亩, 指出下列加点字的用法:渔人甚异之 之:处处志之 志:欲穷其林 穷:复前行 前: 美国为什么没有瓜分德国殖民地? 当当问:“香港割让给英国是永久割让吗?” The most warm affection 一战后,美国为何关注德国赔偿问题 Did you know?How many time have you been late for school?(合并为一个宾语从句)怎么改有提示 Did you know how many times ____ ____ ____ late for school? 怎样做才能我们环保更加优美 有没有收梨树的(大约10几亩梨树)哪个场子做家具的收梨树 有知道的吗 知道的说下谢谢 Q416355023 科学发展对人类的利大于弊还是弊大于利(原因)(辩论) 【高一英语】I don't mind___the decision as long as it is too late.A.you to delay makingB.your delaying makingC.you delaying to makeD.you delay to make每个选项求详解还有哇,我在有道词典里查 delay doing 和 delay to do 都是有 凡尔赛和约中美国为什么没有瓜分德国殖民地 The world's most pitiable the! Is forever Only Love you apromise 如图AF=DB,BC=EF,AC=ED求证CB=EF 桃花红村种桃树的棵树是梨树的7/10,桃树有350棵.梨树有多少棵? 奥巴马医改核心举措漏洞频出接受国会质美田纳西州海军基地又发枪击案 2人受土耳其已用中国导弹试验 硬顶美国别买中国画家潘义奎获艺术界\"诺贝尔\"德国就默克尔手机或被美监听一事召见美美方称无迹象显示两美国人遭绑架是恐怖小贝携全家看比赛 父爱爆棚吞小七胖手星巴克星巴克创始人回应“在中国高定价专家:中国已有5大类17种转基因生物芝加哥农产品期价24日全线下挫美国总统呼吁年内通过移民改革法案美国13岁少年持玩具AK-47 遭两印度少女回家途中遭轮奸 事后遭歹徒焚美国情报机构被爆监听35名国际政要电美遭盟友“愤怒围城” 昔日帝国实力大美媒称土购中国导弹或是把特洛伊木马塞法国之后是德国 媒体调侃下一个愤怒盟李雪主成为朝第一夫人 传因长得像金正叙政府军占领大马士革郊区重镇默克尔私人手机可能遭监听 德媒怒称最菲催促尽早完成南海仲裁 妄言中国主权四川绵阳:男子闯入高速路致车祸珠海100名教育卫生人才赴阳江工作A股马市走牛市迹象明显 节后多空首次兰州代课女教师在电梯内遭陌生男子割喉3岁女神童智商堪比爱因斯坦 太聪明父36岁吴佩慈未婚剖腹产女 重5斤5两青奥开幕倒计时180天 杨卫泽:创造安徽农妇用爱唤醒“植物人”丈夫 18日本华报:中日渔船相撞案 日本想索要最想交往的男明星排名2014:樱井翔大野智将出演80年代人气漫画《死神君春运安保连续奋战 山西临汾一铁警累倒借办大额信用卡设陷骗财 警方提示勿轻首批四大专题在广州启动 打造华南医疗穗170万中小学生今返校园 马年开学海珠区组织青少年圆梦行动:家庭微梦想广州市公安消防局提醒:天气越寒冷火灾广府庙会舞动异域风情 名盛广场每天设香港女露宿者被“邻居”打劫 欲报警手俄新型轰炸机研制合同签订 或配高超声刘永灼:刘健或赴海外踢球 足协定在明
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘