找回密码
 立即注册

QQ登录

只需一步,快速开始

好难注册

初级会员

24

主题

89

帖子

217

积分

初级会员

积分
217

活字格认证

QQ
好难注册
初级会员   /  发表于:2014-10-22 09:03  /   查看:7294  /  回复:7
用控件时遇到一个问题在有表格的病历中,如果有设这个表格的下边框,现在想在打印时把这个边框去除不打印出来。但在正常显示时是要显示的。所以要在代码中修改表格的边框隐藏。如附件图片,请教一下要怎样设定用哪个函数或属性(我们用的是PB开发的),谢谢!!!

pic.JPG

19.97 KB, 下载次数: 230

为了健康,得远离HIS.

7 个回复

倒序浏览
Alice
社区贡献组   /  发表于:2014-10-22 10:29:00
沙发
回复 1楼好难注册的帖子

打印默认是所见即所得,这个需要自己写代码控制。
基本思路:
在打印的时候将下边框隐藏,然后打印,打印完成后再恢复原样。
请点击评分,对我的服务做出评价!  5分为非常满意!

葡萄城控件服务团队

官方网站: http://www.gcpowertools.com.cn
回复 使用道具 举报
好难注册
初级会员   /  发表于:2014-10-24 08:05:00
板凳
思路我知道,现在的问题就是怎样在代码中设定这个下边框隐藏。
要请教用哪个函数或属性请告知。谢谢!!!
为了健康,得远离HIS.
回复 使用道具 举报
Alice
社区贡献组   /  发表于:2014-10-24 09:55:00
地板
回复 3楼好难注册的帖子

我这边测试的版本是Tx TextControl21.0
环境是VB6.0
可以使用TXTextControl1.TableDeleteLines删除表格里选择的线或是特定位置的线。
很抱歉我这边没有PB的开发工具,所以是在VB6.0下验证的。
请点击评分,对我的服务做出评价!  5分为非常满意!

葡萄城控件服务团队

官方网站: http://www.gcpowertools.com.cn
回复 使用道具 举报
好难注册
初级会员   /  发表于:2014-10-24 13:57:00
5#
TXTextControl1.TableDeleteLines 这个我有试过,效果是把这个表格行删除,而不是指边框线。
还有其他函数或属性吗?
为了健康,得远离HIS.
回复 使用道具 举报
Alice
社区贡献组   /  发表于:2014-10-24 17:52:00
6#
回复 5楼好难注册的帖子

你的意思是想保留Cell但是不想画cell之间的线?
那么可以使用:
TXTextControl.TableCellAttribute方法,里面的Attribute的类型可以传递参数为:txTableCellBottomBorderWidth。[Value】设置为0.
语法:TXTextControl.TableCellAttribute(TableId, Row, Column, Attribute) [= value]

根据你的需求,需要将每个Cell的下边框宽度设置为0.
使用这个方法需要注意的是:它只对Border起作用,对Table的Gridline是无效的。若是你的Table上画的有Gridline,TableGridLines设置为False,然后每个cell画border,再用这个方法将你的Border下线设置为0.
请点击评分,对我的服务做出评价!  5分为非常满意!

葡萄城控件服务团队

官方网站: http://www.gcpowertools.com.cn
回复 使用道具 举报
好难注册
初级会员   /  发表于:2014-10-25 10:02:00
7#
好了,可以实现了,真的非常感谢!
为了健康,得远离HIS.
回复 使用道具 举报
Alice
社区贡献组   /  发表于:2014-10-27 13:56:00
8#
回复 7楼好难注册的帖子

好的。谢谢你的反馈。
此贴完结。如果有新问题欢迎开新帖讨论。
请点击评分,对我的服务做出评价!  5分为非常满意!

葡萄城控件服务团队

官方网站: http://www.gcpowertools.com.cn
回复 使用道具 举报
您需要登录后才可以回帖 登录 | 立即注册
返回顶部