起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 139|回复: 9

【搞定】如何代码控制区域中换页“区域结束后”属性**

[复制链接]
发表于 2007-12-4 15:58:06 | 显示全部楼层 |阅读模式
如何代码控制区域中换页“区域结束后”属性

1.jpg

38 KB, 下载次数: 87

回复

使用道具 举报

发表于 2007-12-4 17:47:35 | 显示全部楼层
TDataSheetArea(Tsheetdoc(DocView1.Doc).Sheet.Areas[0]).ForceNewPageOptions :=[TForceNewPage.npAfterArea];
  DocView1.Doc.Close;
  DocView1.OpenView(TDocMode.dmEdit)
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-12-5 10:02:16 | 显示全部楼层

如何表示区域

像图中,我有四个数据集区域,我想用代码表示第二个子数据集区域和第三个子数据集区域,应该是Areas[?]呢?

2.jpg

47.66 KB, 下载次数: 82

回复 支持 反对

使用道具 举报

发表于 2007-12-5 11:41:04 | 显示全部楼层
根据数据集区域定义来排的,从0开始,1、2、3
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-12-5 14:34:47 | 显示全部楼层
不行,我设了1
报错:List index out of bounds (1)
回复 支持 反对

使用道具 举报

发表于 2007-12-5 16:59:09 | 显示全部楼层
见附件图
红色框是 Areas[0]、Areas[1];蓝色框是 SubAreas[0]、SubAreas[0]

如果要访问图中的绿色框,应该是
TDataSheetArea(Tsheetdoc(DocView1.Doc).Sheet.Areas[0].SubAreas[1])

1.gif

3.5 KB, 下载次数: 73

回复 支持 反对

使用道具 举报

发表于 2007-12-7 08:53:11 | 显示全部楼层
楼主,ok没有?请反馈一下
回复 支持 反对

使用道具 举报

发表于 2007-12-11 14:16:03 | 显示全部楼层
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-12-13 17:48:57 | 显示全部楼层
出差了,不好意思,刚刚试验了,可以实现,谢谢,结帖
回复 支持 反对

使用道具 举报

发表于 2007-12-13 17:55:50 | 显示全部楼层
o ,谢谢反馈
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-2 09:12 , Processed in 0.045139 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表