社区
Delphi
帖子详情
请教备注打印的问题
hhzqf1980
2003-08-20 11:54:03
我有一个报表要打印,需求是这样的:
因为备注有长有短,我在设置的时候把DETAIL带设置的比较宽-----
这样不会有备注显示不出来。
但是用户的的要求是如果某条记录的备注比较少,下面的空白太多要把空白给
紧缩掉,我没有什么办法,请哪为帮我?
...全文
84
13
打赏
收藏
请教备注打印的问题
我有一个报表要打印,需求是这样的: 因为备注有长有短,我在设置的时候把DETAIL带设置的比较宽----- 这样不会有备注显示不出来。 但是用户的的要求是如果某条记录的备注比较少,下面的空白太多要把空白给 紧缩掉,我没有什么办法,请哪为帮我?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
13 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
hhzqf1980
2003-08-22
打赏
举报
回复
谢谢
hhzqf1980
2003-08-22
打赏
举报
回复
可是并不能随着记录的改变而改变;
高度是在制作报表时候的默认值。
依然谢谢微斯人,
还有谁能帮我解决这个问题呢?
swayi21
2003-08-21
打赏
举报
回复
DBMemo 設計時取默認的高度與適當寬度,如
DBMemo.Heigth := 21;
DBMemo.Width := 150;
后設置
DBMemo.AutoSize := False;
DBMemo.AutoStretch := True;
在BeforePrint 寫如下代碼
qrbMemo.Heigth := DBMemo.Heigth + 20; // QRBand 加高
qrshpLine.Top := DBMemo.Top + DBMemo.Heigth + 3; // QRSharp 下移
再試試。
hhzqf1980
2003-08-21
打赏
举报
回复
TO:HP0773()
就是不知道有内容时候的MEMO的高度如何记呢?
因为它的高度是随着所取记录改变的啊?
谁能帮忙啊
qwertyasd
2003-08-21
打赏
举报
回复
http://www.csdn.net/cnshare/soft/15/15471.shtm
swayi21
2003-08-21
打赏
举报
回复
對不起,這是我的命名而已,實際控件是 QRMemo1 與 QRBand1。
在Delphi6 安裝盤里你可以找到的QuickReport 安裝程序。
好運.
hhzqf1980
2003-08-21
打赏
举报
回复
微斯人你好:
我想你明白我想要实现的功能:
但是在DELPHI中没有DBMEMO,和QRBMEMO控件啊
而且qrbMemo.Heigth := DBMemo.Heigth + 20:
你是把高度增加20,但是我想它的高度应该是随着取出来的高度而定的;
而且我还不明白DBMEMO,和QRBMEMO控件到底有什么关系呢?
我的DELPHI6中没有这两个控件啊?
谢谢你,非常感谢!!!!!
hhzqf1980
2003-08-20
打赏
举报
回复
这样是不可以的,因为我划了表格,表格的框架依然是许多空白;
我的意思是如何把表格中的空白紧缩掉
swayi21
2003-08-20
打赏
举报
回复
AutoSize := False;
AutoStretch := True;
對中文可能不支持,英文會表現得很好。
hp0773
2003-08-20
打赏
举报
回复
beforeprint记下memo的高度
再记下有内容时的MEMO高度
然后SHARP根据MEMO的高度调整
SHARP.HEIGHT:=SHARP.HEIGHT-高度差
不知道行不行
hhzqf1980
2003-08-20
打赏
举报
回复
我的意思是:两条记录之间用了SHARP控件,做成具有表格形式的报表;
由于备注字段的原因现在每条记录都很宽(最长备注的高度);
如果碰到了比较短的备注我想把表格的高度调整,这样打印的话界面没有太多的空白
而且节省纸张。明白了吗?
gboy2003
2003-08-20
打赏
举报
回复
up
swayi21
2003-08-20
打赏
举报
回复
我不是太懂你的意思。
這樣吧,把保存 Detail信息的 DBMemo放到一個獨立的Band 里,
再加上我上面說的方法,
在Band 的BeforePrint里修改Band 的高度為 DBMemo的高度。
Python训练营103期开班典礼直播回放
#《5天Python闯关训练营》学习计划#挑战周期:12月16日—12月20日直播安排:开班典礼:12...完成相应的软件安装及环境搭建学习服务:12.16-12.20日为本课正式服务周期期间遇到学习
问题
可社群
请教
,群内安排助教老师答疑
在做自动化测试断言失败时,如何成功
打印
中文字符。
在做自动化测试断言失败时,如何成功
打印
中文字符。 因为刚学习python,很多编码
问题
不是很明白,因此在断言失败时,不能成功
打印
中文字符困扰了我很久,我在网络上也找了很多的方案,也是无法解决我的
问题
。 突然灵光一闪,尝试改变一下中文的编码写法,于是解决了我的
问题
,但是我不知道其中原因,后来我
请教
了大神,大神推荐了一篇文章解决了我的疑惑。下面我来讲讲我遇
如何用Python批量
打印
PDF文档、Word文档、Excel表格、图片呢?
如何用Python批量
打印
PDF文档、Word文档、Excel表格、图片呢?
打印
机每天都要重新连接
打印
机每天都要重新连接
打印
机每天都要重新连接 各位大侠
请教
一个菜鸟
问题
LAN中一台电脑连接
打印
机并共享 但只要作为
打印
服务器的这台电脑关机或者重启 其他电脑出现
打印
机无响应 必要要重新连接
打印
机才能使用 检查
打印
机服务器如下设置: 工作组共享
问题
详细解决方案 前提:请确认不是"Windows 98"或"Windows ...
EXCEL常见
问题
五十
问题
解答
001。用命令按扭
打印
一个sheet1中B2:M30区域中的内容?我想在Sheet2中制件一个命令按扭,
打印
表Sheet1中的[B2:M30] 区域中的内容?解答:可以将
打印
区域设为b2:m30,然后
打印
,如:sheets("sheet1").printarea="b2:m30"sheets("sheet1").printout随手写的,你可以试试看。最简单的方法是:你先 录制宏,在录制宏过程中...
Delphi
5,392
社区成员
262,731
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章