我想把窗体上的内容,包括edit,memo里的东西都打印出来我该怎么写代码呀,是一句form.print就可以吗??很急的(200分)

W

wsn

Unregistered / Unconfirmed
GUEST, unregistred user!
类似于打印一张卡片的功能

谢谢
 
如何实现预览呢???

 
我这儿有打印窗体上所有控件内容的打印控件。要的话我发给你。
 
谢谢
我暂时不想用第3方控件
因为我的 机器毛病太多了
实在不敢装
我想只是先预览以下打印时的效果
请问朋友
我该怎么做呀

 
是啊,你说的没有错,form.Print(),完全可以实现,不过你得调整好布局
尺寸,缩放比例等,很容易得
 
实际上Form.Print 是打印了一张FormImage: TBitMap
而这个FormImage这是通过Print函数中调用了一个
GetFormImage()获取了formimage到Clipboard中,并且打印出来得,所以很简单
就是这样。
你也可以获取到这个图象进行预览,而不是直接打印

procedure TForm1.ShowFormImage(FormImage: TBitMap);
var
FormImage: TBitMap;
begin

FormImage := Form1.GetFormImage();
Image1.Picture.Assign(FormImage);
//或者使用其他处理,进行预览等。。。。。
FormImage.Free;
end;

要直接打印 : 就是使用 Form1.Print();如果要保存则使用上述保存图片再打印

 
楼上老大
我很愚笨
请问如何写预览的语句呀

 
form自己就是预览呀~??
 
我的意思是
在打印之前的预览
我现在还没有打印机呢
只想看一下预览出来的样子
 
放个quickReport页面,QRimage控件,前面不是说了,可以通过GetFormimage得到
bmp图象吗? 把得到的这个bmp放入QrImage里,接着就可以使用quickreport提供的
现成的Preview, print, printset等等功能,你想怎么样都行了
自己动手一试便知道了
 
to :楼上大侠

我就是这么做的呀
可是preview之后打印窗体上什么也没有啊

:(
 
这个怎么可能,是后面得问题了吧。
既然你能得到 FormImage ,那还有什么不好说得,问题是你得到了
FormImage了吗, bmp := Form1.GetFormImage();

一张图片而已呀,你放在Image控件里,看看,是不是
 
何必麻烦......,下载一个FinePrint
带打印裕览,很好用,我就用这个调试程序。
soft.online.ha.cn有的
 
to :riverfeng
我已经就是在QRimage里放置了图片
在quickReport页面上能看到
就是Preview之后
预览窗体上什么也没有
我想可能是我什么地方的属性没设置
或设置不当
还请请教

:)
 
我也碰到过类似问题,可能是quickreport和其他控件得问题,
也请那位告诉一声,怎么回事,
不过我碰到得问题是偶尔预览显示不出,有时候又显示出来,当时我使用
Mapx开发,以及使用了formedit之类得控件,不知道究竟是什么原因
 
太简单了,按print screen 就的了,你的问题只能这样回答最有意义
 
楼上 的方法妙极了
这是 这张 图片 不是还是该有功能 -------预览吗???
 
再没人会了吗????????
 
这问题太久了

自己结束了

[:(]不甘心
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
673
import
I
顶部