我没有做过,但我想是不是这样:
首先根据打印机页面设置计算出一个数值prPageHigh,
然后逐行获取Richedit1的每行字体最大高度值的字符所用字体,根据这个字体在Windows中查到其高度值reFontHigh[行数],
reFontHigh[0]+reFontHigh[1]...>=prPageHigh时这一页就到未尾了。
当然还得记算上页脚等占去的高度.
首先根据打印机页面设置计算出一个数值prPageHigh,
然后逐行获取Richedit1的每行字体最大高度值的字符所用字体,根据这个字体在Windows中查到其高度值reFontHigh[行数],
reFontHigh[0]+reFontHigh[1]...>=prPageHigh时这一页就到未尾了。
当然还得记算上页脚等占去的高度.
解决方案 »
- 求Delphi高手写个DLL封装
- delphi的isapi程序如何发布到 server 2003的 iis6中, xp 下iis5 已经可用,但按照同样的办法在2003的iis6下不行
- 同样的程序在台式机上可以得到硬盘序列号,而在笔记本电脑就得不到硬盘的序列号了,而通过其它方式就又可以得到硬盘的..
- 问一个关于OpenPictureDialog的问题
- 语音卡
- 请教ADO问题
- 在写软件注册过程中的问题!?
- 请问大家有谁知道彩票中提到旋转矩阵工作原理是什么?
- 做财务软件遇到的麻烦问题,各位帮帮忙。
- 窗体背景颜色渐变,在FMX中有没有简单的办法?
- 怎样在delphi的image控件中显示jpg或gif图形?
- 高手请进!小弟程序最后一关了,请帮忙!!!
16等,象行间距、字间距、段落、行等在RTF中匀有相应的标签,把这个搞清楚了,一切都解决了
我曾用这编过一个排版系统,如需帮助,请发email:[email protected]