VFP 愛用者社區

小柯 · 註冊時間: 2003-11-27 文章: 78 第 1 樓

如標題所問.
雖曾有人解答:"把檔名存在暫存檔中,用報表印出去 ".
話雖如此可利用REPORT CONTROL的"PICTURE/ACTIVEX CONTROL",
在REPORT中顯示圖檔,但若處於未完全關閉VFP,以新檔取代暫存檔後再呼叫
REPORT時顯示的圖檔仍然是舊圖,須完全關閉VFP再開啟REPORT後圖檔才會以新圖取代.所以問題還是沒有解決!!!
請問先進們可否再指點迷津,感恩.

garfield · 發表於: 星期四九月 16, 2004 10:30 am 文章主題:

abcFileName="a.bmp"
CLEAR RESOURCES [abcFileName]

小柯 · 註冊時間: 2003-11-27 文章: 78 第 3 樓

對不起!是我描述的不清楚,我指的圖檔是經由REPORT PICTURE(PICTURE/
ACTIVEX BOUND CONTROL)的FILE指定的,而不是用FIELD指定,因為
GENERAL欄位無法放進A4般尺寸的圖檔.正因為僅能用FILE指定圖檔,所以如
何動態的將圖檔於程式執行期間代入,這才是我要問的重點,謝謝.

syntech · 發表於: 星期四九月 16, 2004 3:32 pm 文章主題:

在FILE 中用 (檔案路徑+檔案名稱)
EX: (ALLTRIM(xPATH_JPG)+'\'+ALLTRIM(MAF1.ITM_NO)+'.JPG')

然後在列印條件中增加 FILE(檔案路徑+檔案名稱)
EX: FILE(ALLTRIM(xPATH_JPG)+'\'+ALLTRIM(MAF1.ITM_NO)+'.JPG')

這樣就能在RUNTIME確認有無此圖檔再列印

hsf · 註冊時間: 2003-10-24 文章: 15 第 5 樓

樓上的這樣好像會出錯哦!

1.在 REPORT PICTURE(PICTURE/ACTIVEX BOUND CONTROL) 的 file 中填入如 getbmp() 之自定函數

2.在 call 報表的程式 or 主程式自定函數

function getbmp()
hsf='圖檔目錄'+trim(圖名欄位名稱)+'.jpg'
if .not. file(hsf)
hsf='無此圖時秀基本圖之目錄圖檔名'
endi
return(hsf)

syntech · 發表於: 星期四九月 16, 2004 5:25 pm 文章主題:

是嗎? 也許吧!

只是客戶沒反應有問題就是了.
這段我忘了從哪邊抄來的... Smile

忘了一點,
VFP 6.0 以上適用,VFP 5.0 沒用過不知道,
VFP 3.0 確定不能用,
不支援 () 動作

小桑‧無痕 · 發表於: 星期四九月 16, 2004 5:34 pm 文章主題:

建議：
方法一：在列印之前先判斷資料內所有的圖檔是否存在...有存在才列印呢...
方法二：檔案不存在時....就不列印該圖....或印[xx.BMP 不存在]

syntech · 發表於: 星期四九月 16, 2004 6:02 pm 文章主題:

原則上,我是採取方法一 ,
圖在就印,不在也不會印出一個打X的框.留白 Smile

hsf · 註冊時間: 2003-10-24 文章: 15 第 9 樓

如只印一張圖則採用方法一

如印圖及資料且很多筆則選方法二