不难呀!没人会吗?pailier你在哪? (100分)

  • 主题发起人 主题发起人 lxh90101
  • 开始时间 开始时间
L

lxh90101

Unregistered / Unconfirmed
GUEST, unregistred user!
现在说明白点:我在form上放上一个timage,装入一个bmp图像(allclient),再放上一个透明的label(看见了,图像在底下呢),在图像上美女的头部注上几个字“我漂亮吗”,当然是用label.canvas.textout输出了。现在我要将form上显示的图像加注记一起打印出来(别告诉我用form.print),这回明白了吗?pailier,别让我失望哟!
 
直接在图象上输入出文字,再打印不行吗?
如果不想这样,可以将要打印的图象及标签放到适合大小的form中,
用form1.Canvas在打印上输出。
 
不能改变我的程序设计初衷!
 
你的初衷是什么?
fei_l的办法就行了吧?
 
首先在timage上输出字移屏有闪烁;程序也不能都在form上显示呀,能实现打印但不实用。
 
折衷的方法是:
另建一个image2属性隐藏,将LABEL上的字写到上面,使这个image2与显示的效果同步
打印就已经合成的image2打印就行了。
 
有没有专业点的建议呀!各位大侠们
 
是你没有说明白,是做报表还是图象处理,图象处理我做过,有两种方法!!你把问题说明白了,我才能回答
 
就没高手指点呀?还是分不够?
 
用 image.canvas.textout(2,2,'我漂亮吗')即可
 
有两种办法:
1种通过图象截取的方法,COPYRECT的应用,这种方法的问题就是,如果你把鼠标放在上面的话也会给截取下来。
2做个空间,就是用API,DRAWTEXT系列函数,设置个CAPTION属性,和POSITION属性,就可以进行文字的定位和打印,这个空间要用双缓冲!!!,就是空间里定义三个TBITMAP类型,文字部分的要求通明!,第三个是TBIMAP空间是用来放合成后的BITMAP;对于如何合并图象很多代码中都有,你可以参考一下!
其他与图象相关的函数继承就可以了
老兄很不好意思,近来在做一个程序,所以没有时间把你需要的从新写给你!!原来我的代码不在手上,在家里的电脑里,我现在住公司
 
分不够:)
 

Similar threads

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