关于表格打印(100分)

心心

Unregistered / Unconfirmed
GUEST, unregistred user!
我想用CANVAS来打印表格,但不知如何做,各位高手有何高见望知之!!另不用Form.print和其它的报表输出构件,各位还有什么高招??
 
不用FORM。PRINT 也不用报表输出控件, 你要打什么?
打DBGRID?
要是DBGRID 的数据 当前CANVAS没显示完全可不好掌握

实验实验我的 EReport吧, 只增大你的程序1K就完成任务了

http://decode.163.net/main.html
 
继承一个TCustomGrid控件, 加上一个 IsPrinting 属性和一个 Print 方法, 当
print 的时候, 将 Paint 的 Canvas 用 Printer 的 Canvas 代替.
 
Printer.begin
Doc;
with Printer.Canvasdo

begin

//.... 放你要执行的功能,画表格或任何东西
//SetMapMode();
//如果要按照实际尺寸画,要设置影射模式
MoveTo(0,0);
LineTo(100,100);
//...
end;

Printer.EndDoc;
 
Huizhang和王寒松、zhaoyipeng三位老兄,
Huizhang你提供的方法不十分明白,象如在表格中加斜线、表格不规则时,好象不十分好处理。也许是我不十分清楚你说的方法。而王寒松提供的方法,我的数据文件本身是自定义格式,你说的Ereport我也下了一个,试用下来结果好象不大理想。我的数据之所以要用自定义型,是为了使我的程序组更小。我不用BDE,也不用数据库,整个程序加系统数据也没超过180K,三位老兄还有高招吗?其它高手呢??很希望得到解答。^-^zhaoyipeng的回答我已试过了,你的表格好像是画线,在DELPHI中,打印表格是画线吗,在FOXPRO的程序中,我是用制表符做的。DELPHI刚才学,所以不知道在程序中打印表格是什么样了。三位我都谢了,但不太满意,是否还有高招???
心心
 
QREPORT直接画不行了?PRINTER.CANVAS(好象有),QRPTIMAGE也可以画,画完打
 
Delphi中打印表格当然要画线,你用的制表符方法已经是DOS下的淘汰的方法,看
一下新版的FoxPro也决不是再使用制表符打印表格了,如果仍用老方法的话Windows
GDI起不是没用了?看一下QReport,它用的是同样的方法,只是做的更复杂、更通用
罢了。
不用犹豫了,加分吧。
 
这一百分大家平分了吧!谢谢大家!
 

Similar threads

S
回复
0
查看
956
SUNSTONE的Delphi笔记
S
S
回复
0
查看
779
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
顶部