VFP 愛用者社區

[初學者]

謝謝,
再請教...有沒有pdfcreator的使用說明呢?
以及怎麼編譯呢?

[garfield]

使用說明書在 google

[初學者]

嗯嗯..謝謝囉

[初學者]

請問可以使用dos的copy file.doc 到這個虛擬列表機嗎?
該怎麼下指令呢?
謝謝

[garfield]

google 用 dos type 印表機
找到的資料, 但不知是否可用

　　如果你需要打印*.doc或*.wps文件，但本機卻沒有安裝打印機，而安裝了打印機的電腦上卻沒有安裝Microsoft Word或WPS Office，重新安裝應用程序當然不是一個好辦法，其實我們可以利用COPY命令將文件打印出來。

　　例如，我們需要將一份*.wps文件打印出來，首先在本機上安裝打印機的驅動程序（打印機型號必須與真實打印機保持一致），然後在WPS Office程序中打開需要打印的文件，從「文件」菜單下打開「打印」對話框，在這裡選中「打印到文件」復選框，很快會自動生成一個擴展名為prn的打印文件。將這個文件複製到軟盤或優盤中，在安裝了打印機的電腦中進入DOS環境，鍵入如下命令：copy *.prn prn/b。

　　這裡的「*.prn」是打印文件的文件名，而「prn」參數表示將輸出設備指定為打印機，「/b」參數是指定以二進制方式輸出，否則將無法正確打印圖片信息。

[初學者]

謝謝...但這....和我想要的有點距離耶...
我是想說,
如果我在不同的主機上編輯文件不論文件是doc.txt或是hml...
然後直接把文把放到列印的主機上就能利用PDF creator 轉為圖片檔囉..

如果用您所說的方法..變成每一台要先灌PDF creator然後再按列印為prn...
問題來了....如果我的朋友或不認識的人不會灌PDF creator的話...就不能用囉...

[初學者]

另外這裡所說的 " 安裝打印機的驅動程序（打印機型號必須與真實打印機保持一致) "
是指要本機和遠端打印機的驅動程式和印機型號都要一樣嗎?
或是可以用任何一種的驅動程式呢

[garfield]

在這裡討論的功能是利用 vfp 來控制輸出到 pdf 或 圖檔,
如果要用程式控制, 就必須每台電腦都要安裝 PdfCreator ,
在server裡裝 PdfCreator 只能由 windows 控制印表轉向Server 而已.

[thornbird313]

用VFP9可以很方便地把报表输出到各种图片格式：BMP、JPEG、GIF、PNG、TIFF等。

下面这段代码可以把报表输出为JPEG格式：

loReportListener = CREATEOBJECT("JPEGListener")
loReportListener.FileName = "report"
REPORT FORM "report1.frx" OBJECT loReportListener


DEFINE CLASS JPEGListener AS ReportListener

PROCEDURE Init
THIS.AddProperty("FileName", "temp")
THIS.ListenerType = 2
ENDPROC

PROCEDURE BeforeReport
ERASE (THIS.FileName + "*")
ENDPROC

PROCEDURE OutputPage(nPageNo, eDevice, nDeviceType)
IF (nDeviceType = -1)
nDeviceType = 102
THIS.OutputPage(nPageNo, THIS.Filename + ALLTRIM(STR(nPageNo)), nDeviceType)
NODEFAULT
ENDIF
ENDPROC

ENDDEFINE


ReportListener类OutputPage方法中nDeviceType参数的其他几种输出类型：

100
This value specifies a filename, to be saved as image of EMF type.

101
This value specifies a filename, to be saved as image of TIFF type.

102
This value specifies a filename, to be saved as image of JPEG type.

103
This value specifies a filename, to be saved as image of GIF type.

104
This value specifies a filename, to be saved as image of PNG type.

105
This value specifies a filename, to be saved as image of BMP type.

201
This value specifies a page to be saved additively into a previously-created TIFF, generating a multi-page TIFF file.

[goto-dream]

這個真是經華
能使用vfp9產生∼
收入我的腦中

[impotence]

thx a lot ~~~

[hsiung03]

試試以下方法

#define OutputNothing -1
#define OutputTIFF 101
#define OutputTIFFAdditive (OutputTIFF+100)

LOCAL oReportListener
oReportListener = NEWOBJECT("MPTiffListener")
oReportListener.Filename = "Multi"

WAIT WINDOW "正在处理报表到 TIFF 文件...." NOWAIT
REPORT FORM ? OBJECT oReportListener
WAIT CLEAR

DEFINE CLASS MPTiffListener AS ReportListener

PROCEDURE Init
this.AddProperty("Filename", "temp")
this.ListenerType = 2
ENDPROC

PROCEDURE BeforeReport
ERASE this.Filename
ENDPROC

PROCEDURE OutputPage(nPageNo, eDevice, nDeviceType)
IF (nDeviceType == OutputNothing)
IF (nPageNo == 1)
nDeviceType = OutputTIFF
ELSE
nDeviceType = OutputTIFFAdditive
ENDIF
THIS.OutputPage(nPageNo, this.Filename, nDeviceType)
NODEFAULT
ENDIF
ENDPROC

ENDDEFINE

[hclee]

要列印成 PDF 格式只要下载 PRIMO 就可以了,这是一个免费的确 PRINTER DRIVER, 可将任何文件列印成 PDF 格式

[蔡文華]

在列印到PDFCREATE產生的列表機時,如何由VFP去指定要儲存的檔名嗎?

[garfield]

參考這篇: http://www.experts-exchange.com/Databases/MS_Access/Q_21743186.html
或看PDFCreator所附的demo程式