DELPHI 表格控件DBGridEh史上最全使用资料

所需积分/C币:50 2013-03-31 10:55:23 8.72MB PDF
20
收藏 收藏
举报

DELPHI 表格控件DBGridEh史上最全使用资料 DELPHI 表格控件DBGridEh史上最全使用资料
白波九道整理直用版 1)页即合计… 2)定制表格底〔 tooter)区域的汇总统计行.38 3) TDB Sumlist说明-… 4)如何工作以及为什么有时 Sumlist的集合值计算不正确? 5) dbgrideh列求和..39 5.数据功能… 40 1)査我字段点击某列值的下拉按紐弹出一^从数据库取值下拉列表…40 )使用 DBGrid自动过滤实现方法…..4 3)使用 DBGrideh自动过滤实方法2 4) DBgridEh控件中使用过滤功能(适用ehib52chb53)42 5)支持模糊查询..111-43 6) ehlib4.4.50牛支持模糊匹配的修改方法… 4““““私山4缸4“““ 7)EhLi5.Buld50.13的过滤字串郭是模过滤倦改…1045 8)滚动条滚动时选择不变,还有自动过滤功能的实现…----45 9)增量溲索…… “““ 10) ehlib总是按两次ctn4f才出来查找框,怎么办?46 l1)如何改良 dbgrideh的文字过滤.1:46 12)改进 DBGrideh表头点击自动排序实现双击状态轮流.47 13)改灵Ehib的排序功能加快排厅速度 14)在 DbGndeh中显示 Tree view数果50 15) DE gride- Keylist、 Picklist.…..151 16)主从表设置 .,---+---+---- 53 17)在 DbGridEh中显示表中表.55 6.输入/出... 56 1)导入导出数据.1---1-1111256 2)从多冲格式导入/导出数据到 TDBGrideh 翻和ga 3) DBGRID生成 EXCEL报表 444444.44444E44444444∴2 4)使用 TPrintDBgrideh组件.61 5)打印时确定Ehib定义的报表表头颜色261 6)Ehb中的 PrintDBgridEh如呵印页码,即第儿共儿页…… 62 7)怎么让 PrintDBgrideh只打印 DbGridEh中指定的列…62 8)怎样进行横向打印/打印预览? “心“““私““““私“以回“ 7.将存在的 DBGrid组件转换为 DBGridEh组件 …652 、 ElI h安装问题…-64 1. Ehlib安装步骤 2. Ehlib安装问〔 dbsumlst, dcu出错), 3.安装提示找不到BPL文件 四、 De I p hi下的优秀表格(Grid)显示控件----65 L TextGrid 2. TopGrid3.01....... 65 3. XLGrId.….111111111111111166 4. DevExpress Express QuantumGirid .aa. 5. TMS Grid Pack 6. Ehlib-..11-171 第3页 白波九道整理自用版 白波儿道整理自用版 7. Profgrid 444“““““ 8. Easy Grid ..... L暮 ……71 五、 del phi中配置文件的使用(a,ini) 六 窗口动画效果 Animatewindow应用 Delphi Excel to Sql Server. 八、 Delphi控制Exce的经验如下: 76 一、 DBGrideh(增强型表格组件)功能详解 DEGRI DEE是Enib3.0组件包中的组件之一。Enib3,0组件包是一位俄国人为增强 borland系列开发工具功能而开发的笃三方红件,它具有界面友好、功能强大、开发效率高、、 快速制作预览打臼简单中国式报表等特点。因此,一推出即受到广大Br1and程序员的青 睐:目前这个版本支持 Borland Del phi versions4,5,6&?和 Borland c+ Builder VersIons4&5,可极大地提高数据库应用系统客户端的性能。许多商品敦件如《速达200》 等都使用了该组件。下面本人将使用亥组件在实际系统开发过程中的经验总结如下。 NEGri d點h组件无论在外观上还是功能上都非常类似Br1and开发工具中现有的 nhgri d组 件,它除了提供 dbgrid組件的全部功能外,还增加了下列新功能 ●任意选择多行、列或矩形区域的数据 ●为多列标题设定共同的父标题行 ●表格底部(Pa:er)区显示求和、汁数和其它统计信息 自动调整组件宽度与客户区域等宽 ●设置标题行、数据行的高度 ●超长的标题行、数据行文本自动折行处理 ●标题行可作为按钮使用,并可选择是否显示排序标志符(V降序△升序 ●点击列标题可对当前列自动排序而无需编写代码 ●能够自动设置除超长文本显示不下的多余部分,并以省略号(…)代替 ●自动搜索字段(Lkp)数据单元格以单、多列字段下拉列表形式显示 鲁自动搜索字段(Lkp)数据单元格可进行增量搜索 ●可锁定任意列数在屏幕水平方向不滚动 鲁日期时间控件 Date li me picker可支持 TDate field and TDat e ti me field两种日期格式 鲁根据字段不同值显示关联的1 ma ge li s t对象图片组中的图片, 隐藏任意列 鲁显示3D风格的数据区、表尾区和鲎定滚动列,制作3D外观表格 ●显示№m类型宁段值 除B00LEAN型数据外,其它数据类型也可以检查框( checkbox)形式显小数据 使用专门的函数和过程来存取以rg或ini文件格式保存的表格布局(包含各数据列表、 数据列访问顺序、列宽、索引标识、行高等信息〉文件 ●通过设置数据单亓格的hnt和 Teal Ti ps属性,当移动鼠标到该单元格时,可以显示单 元格容纳不下的文本内容 第4页 白波九道整理自用版 白波儿道整理自用版 ●将组件中数据导入导出到Text,Cs,ⅢM,RTF,S和内部数据答多种格式的文件 中 、应用实例 nib3.0组件包安装成功后,在系统的组件面板中会显示“ enli h”组牛包标签,添加 NEGri deh到窗体的方法与其它组件一样。在窗体中添加该组件后,请跟我起来实现图2 的一些特殊效果,具体属性设置请参考属性表的说明。 1.定制标题行 1)制作复杂标题行 标题行可设为2行以上高度,并可以为多列创建一个共同的父标题行。为实现这个效果, 需在各个列标题属性中以“|”分隔父砾题和一标题,如办公用品包括代码和名称两部分, 具体属性设置如下: semi tititile=true: timelines=2 nEGri dehe. Col ums01. Title. Caption:='办公用品代码; NEGri deh, Col us1. Title, Caption:='办公用品|名称 2)按钮式标题 设置Colm, Title. litle but tor为Ile可以强制标题单元为按钮式。写 0 nti Ti e Bt n click事件来控制用户单亡标题单元时的操作 标题行显示图片 实现图2中的购买人标题行显示效果。首先添加一个 i magelis t组件im1并在其中添加 组bm,ic0格式的图片。然后将Drid的置 i elates设置为ing1.最后在需要显示图 片的列标题的 imageindex中设置需要显示的ing1+图片的序号。孩9执行一下程序,是 不是很酷! 4)如根据不同状态在数据单元格中显示相应图片 如根据库存材料的不同状态在数据单元略中显示相应图片,具体设置如下: 添加个 imagelist组件img1并在其中深加组bmpc格式的图片,然后将需要显示图片 的列的 imagelist属性设置为img1;在 keylist属性中添加实际数据存储值,一行为一个值, 第5页 白波九道整理自用版 白波九道整理自用版 切记一定要与 imagelist中图片顺序对应,否则会张冠李戴,面目全非。还可在 picklist 中添加提示信息,也要求是一行为个值。并设toi为tue,那么,运行时当鼠标移动 到该数据单元格时在显示图片的同时不显示提示信息,怎么样,功能够强大吧!可使用空 格键或鼠标切换下一张图片,图片切奂的同吋乜改变了实际存储数据值。也可通过 shift+ 空格或鼠标切换为上一张图片。这样就实现了上下个方向图片切换。 5)自动显示标题行的升降排序标志符(V降序△升序)并做相应排序 DEGri deh组件可以在标题行单元格中显示小三角形升、降排序标志符图片,在运行时可点 击标题行,图片自动切换許做相应排序。具体属性设置如下: Options Eh=-dghiu: o Sort Ma ki ng Col amn, title, tit. e Button=true Sort marked col amns为当前排序列可车运行时使然后在该列的 tItle e k事件中添 加代码: rocedure TForm. Query DB Gr i dEhITitleBt nCli ek( Sender: TOhjec1: ACol: Integer; Col amn: TCol umEIl 乱r s0 rt s t ring: string;H/排序列 /进行排序 with Cul amn do if Fi el dName then Exit: case title, Sort Marker af Title. Sort marker ;= s mDo wnEh s4rfstring : Coi unn, Fi e I dNa. AsC i end smDonEh: sortstriug:= Col umm Fiel d Na me +AsCt smUp Eh: sortstriag : CoI umn, Fi el dNa me DESC /进行排序 trT dat aset.Sort:= sortstri ng/ dataset为实际数据集变量名 except end: 第6页 白波九道整理自用版 白波九道整卫白用版 end: end 切记 I workup型字段不可做上述设置,套则系统会提示错误 另外,组件说明书屮提到不需嬰编写代码即可自动排序,但是不缩写代码自动排序方法我 还没找到,有知道的眀友烦请告诉我一古啊!让我也对程序代码进行“减肥” 3.2定制表格底部( woter)区域的汇总績行 DEGri deh组件可以在表格底部显示汇总行,如记录数合计、列字没累加和等信息。在 ter RowCount中设置底部显示的行数:然后在Ftr;编辑器屮添加一个或多个显示列, 显示列可以是字段值累加和、记录数合计、字段值或静态文件等集合类型,可以在设计时 在 Val ue ty pe属性中设置,也可在运行时通过设置Fers[il, Val ne type指定其类型。其 含义见下表 切记设置 DBR i dely. Sumli st, Acti v为Irue,才会进行汇总統计运算。带注意的是,如显 示类型为不是当前列的累加和,则需车 fieldname属性中指定汇总列,其它类型则无此要 求 点 dbgrideh标题排序 在网上看了许多这方面的技术资料,啰索而麻烦,其实就这么几行搞定: procedure Sortigrid: TDBGri dEh]: Grid Options Eh Grid Opt Eh [dgh Aut oOrt Mar ki ng I Grid. CuI umn Def Va nes, Tit t, Title Button s True Grid Options Eh Grid Opt ions Eh +[dghhlti Sort Marking]: Grid, Sort Local: =T /功能:设定助id政h合计行信息 /参数:p助 )h Gr i4: TDBGri deh; pc Fields string i 字段列表,字段用逗号分隔 / prt Type: FOoter val ue Type;统计类型 FOoter Typu=(fηtNn, f rt Su皿 fytAvg, fvt Count, ivt Fitl dVal ue, fst St atic Test); /引用: str Tostringlist /例如: Dbgri t( Dh Gri dehl, Number,Sum, f rt sum):设定数量和金额字段为 合计统计 Procedure Db Gri dEh Foot( pDb Gri d: TDi Gri dEh; peFields: string: pvt Type: Looter Val ue Type y 第7页 白波九道整理自用版 白波儿道整理自用版 var nFldLuop integer ciel dName i str: ny I mp Fl dList Tatri1ys p Dh Gr i d. Footer ro ncount;=1;定网格尾部统计行行数 p Db Gr i d. Sumlist,scit:=true;活統计 p Db Gr i d. Footer ol or;= ( Bt face;指定统计行颜色 t mp Fl dLi st TSiringlist, Creat e: Str ToSt ringList( Uppercase(peril ds),',', t mp FI dLi s t};//将字符串转换为串列表 For nfl dLoop to pDb Gr id Col tmns Count 1 do c Fi el d Na me:= p) Gri d, Columns[nfl dLoop]. Fiel dname;//网格列字段名 if t mp FI dLi st, Indexof( uppercased ( Fiel dNa me))>=0 thei p Dh Gr i d, Col ums afl dLoopl. Footer. Val ueType: prt lype;/统计类型 end i t mp Fl dList. Free “= //功能:将指定分隔符分隔的字符串转换为字符串列表。 /此函数在需要将 /参数: / pe St ring: string;字符串 pe Char: string;分隔符 p Des Li s t:rs: ringLi s t字符串列表 /例如 // ar t mp Fl dLi s:: TStr ing / tmp FI dLi st:: TSt ng Li st Create / StrToStringlist: Lpptrease(pefitlds),',', tmp Fl dList / tmp Fl dLi st Fre 第8页 白波九道整理自用版 白波儿道整理自用版 Procedure Str ToS ringList( prStrins, pe Char: string: p De s List TString Li st y overload; var cAddStr, cSreStr string nPos integer i g In p De s List. Clear r Str peStering i while true do nPos:= pos( pc Caar, tSrcstr )i if apos=自then p De s List. Add( cSicitr)i Exit i el se begin cAd dStr : cop( cSrestr p Desli st. Add( cAddStr)i Deletel eSrcstr, L, nPos +length( pe Char ).1); /Splits a deli mited text line into IStrings (dues not account far stuff in quotes but it shoal d) procedure Split(aval ue: string; a Del i mi ter: Char; var Re sal1: STrings); X: Integer s: string: if result nil , han Res alt s Stri s t /! Res ul t, Clear S:= for X:=I ta Lengt h( a val if a value[ x] < aDli miter then a eIse 第9页 白波九道整理自用版 白波九道整理自用版 Regal t, Add(s) hen salt. Add( s procedure Tf r mBd Det ail. DBGr i dEhl Dre wCol umm Ce ll( Sender: ROject const Reet: TRee:: Dat a col: Integer: Col amn: ICol umm Eh State: TGr i d Dra wst it e); if adoquery1. fie byname('合计数量!), As Integer adoquery1 fiel dbname('KC) As lnteseI t he n Sender as TDB Gr: dEH). Canvas. Brush Color : 5008080FF; end DBGri dEhI. De f aul: Dr a w Col umn Cel I( Rect, Dat a Col, Cal amn, St at) end 200711.1617:18:5)(*幸事卓南春南有本本故南幸春] 格式显示 版权所有(C)2407咏南工作室(陈新光) u Dat apr DR dure Set Di s l ay Format ADataset: TDat a se mp l e me nt at i an Set Di sl ayFormat( ADat aset: TData Set): TaI i: lat for i:=0 to dAtaset fieldcount 1 do bi with DAtaset do hagi n 第10页 白波九道整理自用版

...展开详情
试读 101P DELPHI 表格控件DBGridEh史上最全使用资料
立即下载 低至0.43元/次 身份认证VIP会员低至7折
一个资源只可评论一次,评论内容不能少于5个字
buyouyuan 谢谢,做起表格来可少走点弯路
2017-03-26
回复
plsemm 业余处理东西,正愁没有办法,雪中送炭呀
2016-11-15
回复
bamqj80 好资料,学习。 .
2016-05-07
回复
zhanggq101 挺好的,学习中,谢谢了。
2016-03-13
回复
mouxinbo 很好用。谢谢。
2016-01-12
回复
honsweat19840916 都快搞死人了,dbgrideh批量修改数据,提交后最后鼠标不点击到其他地方就不提交数据,哎,下载看看器功能
2016-01-04
回复
netlan 基本的功能介绍,但版本太古老了,还是很有帮助的
2015-11-26
回复
yfx626 版本有些老,但有一些参考价值
2015-07-09
回复
xxiangzi 讲解很细,比较全,很有用,感谢楼主。
2015-03-29
回复
honey747 这个文档在网上挺多的,不过这个版本是图片版的,比较大,可以在其他地方找下文字版的
2014-12-17
回复
  • 分享精英

    成功上传11个资源即可获取
关注 私信 TA的资源
上传资源赚积分or赚钱
    最新推荐
    DELPHI 表格控件DBGridEh史上最全使用资料 50积分/C币 立即下载
    1/101
    DELPHI 表格控件DBGridEh史上最全使用资料第1页
    DELPHI 表格控件DBGridEh史上最全使用资料第2页
    DELPHI 表格控件DBGridEh史上最全使用资料第3页
    DELPHI 表格控件DBGridEh史上最全使用资料第4页
    DELPHI 表格控件DBGridEh史上最全使用资料第5页
    DELPHI 表格控件DBGridEh史上最全使用资料第6页
    DELPHI 表格控件DBGridEh史上最全使用资料第7页
    DELPHI 表格控件DBGridEh史上最全使用资料第8页
    DELPHI 表格控件DBGridEh史上最全使用资料第9页
    DELPHI 表格控件DBGridEh史上最全使用资料第10页
    DELPHI 表格控件DBGridEh史上最全使用资料第11页
    DELPHI 表格控件DBGridEh史上最全使用资料第12页
    DELPHI 表格控件DBGridEh史上最全使用资料第13页
    DELPHI 表格控件DBGridEh史上最全使用资料第14页
    DELPHI 表格控件DBGridEh史上最全使用资料第15页
    DELPHI 表格控件DBGridEh史上最全使用资料第16页
    DELPHI 表格控件DBGridEh史上最全使用资料第17页
    DELPHI 表格控件DBGridEh史上最全使用资料第18页
    DELPHI 表格控件DBGridEh史上最全使用资料第19页
    DELPHI 表格控件DBGridEh史上最全使用资料第20页

    试读结束, 可继续阅读

    50积分/C币 立即下载 >