请问各位老师，如何将VFP报表（另存）转换.tif格式文件？谢谢老师帮忙！

网上有，自己找

拜渡一下

举例：适用VFP9

CREATE CURSOR Test (f1 I)
APPEND BLANK
o报表监听器 = CREATEOBJECT("MyTiffListener")
o报表监听器.tifffilename = "c:\temp\Test.tif"
REPORT FORM 报表1.frx OBJECT o报表监听器
RETURN

DEFINE CLASS MyTiffListener AS ReportListener
    tifffilename = ""
    listenertype = 2    && 按页提供报表结果，不打印输出

        * 重载 OutputPage 方法
    FUNCTION OutputPage(nPageNo, eDevice, nDeviceType)
        IF (nDeviceType == -1) and !EMPTY(THIS.tifffilename)
            IF (nPageNo == 1)   && 为第一页报表建立 TIFF 文件
                THIS.OutputPage(nPageNo, THIS.tifffilename, 101)
            ELSE                && 向已建立的 TIFF 文件添加剩余的报表页
                THIS.OutputPage(nPageNo, THIS.tifffilename, 201)
            ENDIF
            NODEFAULT
        ENDIF
    ENDFUNC
ENDDEFINE

给你一点参考资料：
http://baike.baidu.com/link?url=KhnSsBrgDQeh6htUHJlssPyOxe7vkBXRiTx66gcbJheTHUV0i8vKwEjf3JckwG1XikVtVX-NFnck9xyyRW1-ZZPmIE7R0F53JSzBSAq0lhTZajv_TCnvQgeftvFkZvLQMdluM1Yt-VXUfaijulMb_K


注意最后一节：既然Word可以生成tif格式图像文件，那么就可以通过ole调用Word来处理，回头看看资料前面的介绍，tif文档的兼容性相当成问题，所以最好不要自己处理特殊的格式，让成熟的生成器来做。

[ 本帖最后由 TonyDeng 于 2014-12-10 13:47 编辑 ]

几天没在网上，看到老师的热情回复，非常感谢，抽空我按老师方法试试。

_ReportListener 类支持报表动态格式，连接 _GDIPLUS.vcx 绘图功能，是功能的强大提高。但是生成 tif,jpg 等图像时，常规状态的报表格式，字段内的汉字并不显示。需要设置 SET REPORTBEHAVIOR 80，或加宽报表字段的高度来解决。

直接输出PDF格式文件就行了

如何输出PDF格式呢？谢谢！

安装一个PDF虚拟打印机，报表输出时，输出到PDF虚拟打印机(原来输出到打印机)。
去网上找一个<PDF简体中文增强套装版3.0>的软件，安装到你的电脑上就行了。安装了这个软件，电脑未连接打印机，也能浏览文件，并打印输出到PDF文件。

[ 本帖最后由 sdta 于 2014-12-11 21:32 编辑 ]