4.報(bào)表在設(shè)計(jì)時(shí)明明可以打印，可一安裝到其它機(jī)器或重裝系統(tǒng)后，就會(huì)出現(xiàn)“XXX 帶區(qū)太大不能放入頁(yè)中”等提示，而且無(wú)法正常退出（尤其是對(duì)自定義紙張大小的程序），這是為什么呢？　　我們用報(bào)表設(shè)計(jì)器設(shè)計(jì)的打印程序，保存退出后，磁盤上就會(huì)出現(xiàn) .frx和.FRT文件，我們的所有設(shè)計(jì)均保存在這兩個(gè)文件中。在VFP中 .frx相當(dāng)于.DBF表，.FRT相當(dāng)于.FPT備注型文件，我們用USE XXX.frx 可以象打開.DBF文件一樣打開.frx文件，在.frx文件中有個(gè)Expr備注型字段名，在這個(gè)字段名中有如下內(nèi)容：其中()內(nèi)是我所加的譯文

RIVER=winspool
DEVICE=Epson LQ-1600K
OUTPUT=LPT1:
ORIENTATION=0 　　
PAPERSIZE=256 　　 　　 (紙張大小)
PAPERLENGTH=1000 　　 　(紙張長(zhǎng)度)
PAPERWIDTH=1600 　　 　 (紙張寬度)
DEFAULTSOURCE=8　　 　　(默認(rèn)來源)
PRINTQUALITY=180 　　 　(打印質(zhì)量)
COLOR=2
YRESOLUTION=180
TTOPTION=1

從這個(gè)Expr備注型字段里可以看出：PAPERSIZE=256 這里的256表示是自定義紙張，如果：
PAPERSIZE=9 為A4、11為A5 具體數(shù)據(jù)見VFP幫助的Printfo()一節(jié)， 而：
PAPERLENGTH=1000 　(紙張長(zhǎng)度)
PAPERWIDTH=1600 　 (紙張寬度)
則分別代表自定義紙張的長(zhǎng)度和寬度。 之所以會(huì)出現(xiàn)上面提到的問題，是因?yàn)橄到y(tǒng)重新安裝打印機(jī)后，WIN系統(tǒng)一般默認(rèn)的是A4打印紙，與我們?cè)O(shè)計(jì)時(shí)保存在.frx文件里的紙張不符，因而造成這種情況。 那么如何避免出現(xiàn)這個(gè)問題呢？
　　下面是一段檢測(cè)紙張類型的代碼，供您參考：
這段代碼必須放在執(zhí)行report form ... 命令前。

use xxx.frx in 0 ALIAS mPrint 　　　&&在空閑工作區(qū)以mPrint別名打開xxx.frx文件
x=atcline('PAPERSIZE',mPrint.Expr)　&&取得PAPERSIZE在Expr字段中的行
sSIZE=subs(mline(mPrint.Expr,x),11) &&取得設(shè)計(jì)時(shí)保存的紙張類型
mSIZE=allt(str(Prtinfo(2))) 　　　　&&取得當(dāng)前打印機(jī)默認(rèn)的紙張類型
x=atcline('PAPERLENGTH',mPrint.Expr) &&取得紙張長(zhǎng)度在Expr字段中的行
sLEN=subs(mline(mPrint.Expr,x),13) 　&&取得紙張長(zhǎng)度
x=atcline('PAPERWIDTH',mPrint.Expr)　&&取得紙張寬度在Expr字段中的行
sWIDTH=subs(mline(mPrint.Expr,x),12) &&取得紙張寬度
use in 'mPrint' 　　　　　　　　　&&關(guān)閉xxx.frx文件
if sSIZE=mSIZE 　　　　　　　　　&&如果相符，則正常打印
　report form xxx.frx to printer
else
　Messagebox('請(qǐng)?jiān)O(shè)定打印機(jī)紙張為自定義：長(zhǎng)='+sLEN+',寬='+sWIDTH,0+48+0,'提示')
　report form xxx.frx to printer prompt &&打印前先打開打印機(jī)設(shè)置對(duì)話窗口
endi

　　5.不讓打印的結(jié)果顯示在屏幕上
report form xxx.frx to printer Noconsole

　　6.打印或打印預(yù)覽時(shí)，如何使系統(tǒng)打印工具條不出現(xiàn)　　系統(tǒng)提供的打印工具條，我們無(wú)法檢測(cè)其各按鈕的事件，不能掌握用戶當(dāng)時(shí)操作的情況，那如何不讓它出現(xiàn)呢？
　首先您得做一個(gè)表單(最好是模式表單)，用于代替系統(tǒng)的預(yù)覽窗口(Preview)，然后：
do form dybd　　　　　　　　　　&&打開這個(gè)表單
report form xxx.frx windows dybd
　　這樣系統(tǒng)提供的打印工具條就不會(huì)出現(xiàn)了。
　　當(dāng)然如果自己再做個(gè)類似于打印工具條的類，既可掌握按鈕事件又美觀就更好了，注：經(jīng)查VFP3.0可能沒有windows子句。

上一頁(yè)  [1] [2]