VFP9.0报表打印图片问题？

s3056774 2009-02-11 08:14:30

VFP9.0报表，其中有个Image控件，显示一幅简单的小图片，数据来源是在某个表的某个字段记录着这个小图片的路径，如何在打印报表时，将这个小图片也打印出来？请教各位？

...全文

918 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

zxcvbnm000009 2009-10-08

打赏
举报

在报表文件里加一个图片控件，设置到你要的大小，在图片上右击，在文件还是字段来源选择字段，把你在表中的字段名输上就行了。

bushlin163 2009-02-12

打赏
举报

你好，你是不是只想要打印图片呢？如果是，为什么不直接域控件呢？

十豆三 2009-02-12

打赏
举报

报表打印图片(非通用字段)



*-------------------------------

方法一：



在报表中建立一个显示图片的控件

如果是VFP6，在报表控件中选择“图片/ActiveX 绑定控件”

如果是VFP9，点击“报表（英文版为Report）”菜单中，指向“插入控件（Insert Control）”，然后点击“图片/ActiveX 绑定控件（Picture/OLE Bound Control）”，

这时“图片/ActiveX 绑定控件（Picture/OLE Bound Control）”属性对话框打开了，

选择“常规（General）”选项卡，

在“控件源（Control source type）区”有三个选项，

如果是VFP9，选择最后一种，即“表达式或变量名（xpression OR variable name）”

并在下面的“控件源（Control source）”处输入：

（如果是VFP6，选择第一种，即“文件”并在“文件”后面输入）

表名.存放图片路径的字段名



此方法要保证字段名中所指向的图片必须存在，否则就报错







方法二：



如果有可能有些文件路径存放错误或文件不存在或有空记录，就用如下方法：



1、报表设置(假设报表名为reportpho1.FRX)

在报表中建立一个显示图片的控件

如果是VFP6，在报表控件中选择“图片/ActiveX 绑定控件”

如果是VFP9，点击“报表（英文版为Report）”菜单中，指向“插入控件（Insert Control）”，然后点击“图片/ActiveX 绑定控件（Picture/OLE Bound Control）”，

这时“图片/ActiveX 绑定控件（Picture/OLE Bound Control）”属性对话框打开了，

选择“常规（General）”选项卡，

在“控件源（Control source type）区”有三个选项，

如果是VFP9，选择最后一种，即“表达式或变量名（xpression OR variable name）”

并在下面的“控件源（Control source）”处输入：LcFileName(RECNO())



如果是VFP6，选择第一种，即“文件”

并在“文件”后面输入：LcFileName(RECNO())







2、用画图建一个空白的图片，

   大小与你其它图片差不多就可以，

   我建的为NullPho.bmp

   并把此文件放在当前目录下。



3、打印按钮的CLICK事件：

*假设你的表名T1,存放图片路径的字段名为PhoPath

IF !USED('T1')

	USE T1

ELSE

	SELECT T1

ENDIF

PUBLIC lcfilename(RECCOUNT())

SCAN

	IF FILE(ALLTRIM(T1.PhoPath))

		lcfilename(RECNO())=ALLTRIM(T1.PhoPath)

	ELSE

		lcfilename(RECNO())='NullPho.bmp'

	ENDIF

ENDSCAN

GO TOP

REPORT FORM reportpho1 PREVIEW