社区
Delphi
帖子详情
如何限制dbgrid行数
xgydelphi
2000-04-04 10:49:00
如何限制dbgrid行数,如只显示结果的前5条,
(不能用sql的set rowcount 5)
...全文
130
2
打赏
收藏
如何限制dbgrid行数
如何限制dbgrid行数,如只显示结果的前5条, (不能用sql的set rowcount 5)
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
fyje
2000-04-04
打赏
举报
回复
yjq说的对,你可以使用stringgrid,当然,如果你不想麻烦也可以使用DBCTRLGRID只显示5条也行.或者,你干脆吧DBGRID的宽度定死,只让他显示5条.
渤海海峡
2000-04-04
打赏
举报
回复
用stringgrid.一切尽在掌握。 :-)
RePrint表格打印控件(打印 datasource,
db
grid
,string
grid
)
功能更加强劲,增加多行表头的功能,新增更多事件,加强了打印期间对报表样式 的控制,可随意改变打印内容。 reprint 使用说明 本控件可打印 datasource,
db
grid
,string
grid
. 一 、控件属性: 1、colstitle 设置报表的列标题属性 (1) Print:boolean;;是否打印 (2) Font:tfont;;字体 (3) Rowsline:tpen;;横线样式 (4) Colsline:tpen;;竖线样式 (5) Alignment:talignment;;对齐方式 (6) Rowspace:integer;;行间距 (7) EveryPage:boolean;;是否每页打印 (8) EveryRow:boolean;;是否每行打印 (9) titlearray:tstrings;;怎加标题组 (使用方法见附带demo) (10) rows:integer;;设置默认列标题打印
行数
2、datasource 绑定 datasource 3、
db
grid
绑定
db
grid
4、string
grid
绑定 string
grid
PrintObject 选择打印的对象(datasource 、
db
grid
、 string
grid
) 5、pagefooter 页脚 pageheader 页眉 (1) Text:string;;内容 (2) Font:tfont;;字体 (3) Print:boolean;;是否打印 (4) Alignment:talignment;;对齐方式 6、detail 设置要打印的明细数据属性 (1)arrange 设置明细字段排列方向 Horizontal 横向打印(默认的一般打印) Vertical 竖向打印(字段竖向排列适合打印字段内容较长的报表如“会议纪录”) (2)aotureturn 打印明细字段时,如果字段超过列的宽度是否允许自动换行 (3)colsline 设置竖线属性引用tpen类 (4)footer 设置明细尾 (设置同pagefooter 页脚 pageheader 页眉) (5)frame 设置明细边框属性引用tpen类 (6)head 设置明细头(设置同pagefooter 页脚 pageheader 页眉) (7)rowsline 设置横线属性引用tpen类 (8)rowspace 设置明细行的高度 (9)top 明细与标题的距离 (10)Alignment对齐方式 7、page 设置纸张 (1) leftmargin:real;;左边距 (2) rightmargin:real;;右边距 (3) topmargin:real;;顶边距 (4) bottommargin:real;;底边距 (5) pagesize:TPageSize;;纸张类型 (6) Height:real;;高度 (7) width:real;;宽度 (8) Orientation:TPrinterOrientation;;打印方向 注意:设置纸张的宽度和高度需把pagesize设为Custom 8、title 设置标题 (1) Print:boolean;; 是否打印 (2) Text:tstrings;; 内容可设置多行 (3) Font:tfont;;字体 (4) Alignment:talignment;;对齐方式 (5) top:integer;; 距纸张顶部距离 (6) Rowspace:integer;;行距 (7) EveryPage:boolean;;是否每页打印 二 、控件方法: (1) preview 预览 (2) print 打印 (3) SaveToFile() 保存为报表文件 (4) SaveToStream() 保存为流(然后就可把整个报表存到数据库了很方便哦! ~_~) (5) PrintFile() 打印报表文件 (6) PrintStream() 打印流(流的数据库存取就不用多说了吧) (7) PreviewFile() 预览文件 (8) PreviewStream() 预览流 (9) OptionToStream() 报表的属性保存为流 (10) OptionFromStream() 从流中得到报表属性 (11) OptionPost()在打印期间改变了报表属性,要想立即生效调用此方法。 (12) PaintText(Text:string) 覆盖原有打印的字符,一般在能返回当前打印的内容的事件中使用。(见控件事件) 三、 控件事件: (1) AfterPrint 打印后 (2) BeforePrint 打印前 (3) OnPrintDetail(RecordNumber: Integer)在打印每一栏明细前触发此事件, 返回参数:RecordNumber返回当前打印
行数
。 (4) OnPrintDetailField(RecordNumber,FieldIndex: Integer;; FieldText: String);; 在打印明细的每个字段都会触发此事件。 返回参数:RecordNumber返回当前打印
行数
。 FieldIndex 字段索引 FieldText字段内容 (5) OnPrintTitle(Row: Integer;; Text: String)打印每行标题都会触发此事件。 返回参数:row当前打印的行 Text当前打印的内容 (6) OnPrintColsTitleField(Row, FieldIndex: Integer;; FieldName: String);; 打印列标题字段时触发此事件 返回参数:row当前打印的行 FieldIndex当前打印的字段索引 FieldName当前打印的字段名称 (7) OnPrintColsTitle(Row: Integer) 打印每行列标题时触发此事件 返回参数:row当前打印的行 四、注意事项 (1) text 属性,输入“¦#¦”打印页码值,如果想打印页码可输入“第¦#¦页” 输入“¦RecordCount¦”打印 记录数 (2) 不同的打印机,打印和预览效果可能有一点点不同(保证数据打印完全正确一致)。本人用一台针式和一台激光打印机做测试, 开始差别较大后经过调试基本一致,不知其他打印机如何。 (3) 纸张大小以及横向、竖向自动适应系统默认也可设置。 (4) 各列的宽度按比例,适应纸张宽度打印。 程序设计:吴进昊 E-mail :jinhaowu@hotmail.com qq :54254770 2003.01.03
数据库技术VB编程小例子源码小合集打包下载.rar
数据库技术VB编程小例子源码小合集,共47个打包下载,包括:系统登录、操作员权限设置、连接加密的Access数据库(方法一)、将硬盘文件目录转为数据库数据、将数据库文件转换为文本文件、将Access导出成多种数据格式、将数据库文件转成HTML并设置超级链接、利用Word统计字数和检查拼写错误、将数据库数据传给Word、将Excel数据传给Access数据库、将数据库数据传给Excel、打印定单汇总、邮政汇款打印程序、自动分页的打印程序、打印
DB
Grid
表格里的数据、运用Mschat图表显示数据(方法二)、运用Mschat图表显示数据(方法一)、合并MSFlex
Grid
单元格、动态增减MSFlex
Grid
行数
、发行站点树状显示、如何在 MSFlex
Grid
中输入资料、在
DB
Grid
中实现下拉列表和单元格计算、在MSFlex
Grid
控件的网格中加背景图片、压缩数据库文件、利用拼音简码进
行数
据查询、锁住和解锁数据库、数据库数据备份、某一时间段内数据汇总、修复数据库文件、SQL使用技巧-数据查询、排序、SQL使用技巧-日期数据查询……
Delphi打印报表
一个简单的Delphi打印报表的小例子,可以控制打印每一页的
行数
,从而把
Db
Grid
中的数据显示出来,进行打印.
PReport
1 控件在eReport,CReport基础上修改,改动幅度很大,支持Delphi 72 如何从无到有新建一张报表:先将TPRExcute控件拖到窗口上,设置Datasources属性,然后双击TPRExcute控件即可开始创建报表过程3 支持普通列表,可以从
DB
Grid
直接生成报表支持主从(细)表,主从表中主表 必须以‘主表.‘开头,从表以‘细表.‘开头。可以很方便的在报表设计器选择数据字段设置数据源请按如下形式设置PRExcute1/Datasources属性:主表:QMaster细表:QDetail也可以用代码形式设置:PRExcute1.Datasources.Add(‘主表:QMaster‘); PRExcute1.Datasources.Add(‘细表:QDetail‘); 可以设置任何需要的单据格式,支持套打(报表设计器有"是否套打"按钮),可调节宽度高度,每页数据
行数
等(在报表设计器-报表属性中设置)4 PRToExcel用来将Dataset数据(不是
DB
Grid
)导出到Excel,速度极快,不需要已装Excel.5 TPRExcute新增BlobField属性,用来以数据库TBlobField类型形式产生和设计报表(而不是以前的文件形式),该功能应用效果见http://www.efile.com.cn/yangsai/jxc.rar(4.5M大小,运行前SQLServer2000必须已经启动)6 新增行号函数;代码作了很大优化,改进演示程序;email:eom@citiz.net,yangsai@tom.com 杨赛电话:0510-8809559
PReport中式报表
1 控件在eReport,CReport基础上修改,改动幅度很大,支持Delphi 72 如何从无到有新建一张报表:先将TPRExcute控件拖到窗口上,设置Datasources属性,然后双击TPRExcute控件即可开始创建报表过程3 支持普通列表,可以从
DB
Grid
直接生成报表支持主从(细)表,主从表中主表 必须以‘主表.‘开头,从表以‘细表.‘开头。可以很方便的在报表设计器选择数据字段设置数据源请按如下形式设置PRExcute1/Datasources属性:主表:QMaster细表:QDetail也可以用代码形式设置:PRExcute1.Datasources.Add(‘主表:QMaster‘); PRExcute1.Datasources.Add(‘细表:QDetail‘); 可以设置任何需要的单据格式,支持套打(报表设计器有"是否套打"按钮),可调节宽度高度,每页数据
行数
等(在报表设计器-报表属性中设置)4 PRToExcel用来将Dataset数据(不是
DB
Grid
)导出到Excel,速度极快,不需要已装Excel.5 TPRExcute新增BlobField属性,用来以数据库TBlobField类型形式产生和设计报表(而不是以前的文件形式),该功能应用效果见 http://free.efile.com.cn/yangsai/jxc.rar(4.5M大小,运行前SQLServer2000必须已经启动)6 新增行号函数;代码作了很大优化,改进演示程序;email:eom@citiz.net,yangsai@tom.com 杨赛电话:0510-8809559
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章