VFP 愛用者社區

leejack1024 · 註冊時間: 2007-12-08 文章: 2 第 1 樓

各位foxpro大大高手
小弟有一個很難解決的問題,希望有人可以想想怎樣設計?
在dbf中有五個分數,a1,b1,c1,d1,e1,列印時要判斷a1~e1這五個欄位
最大和最小的數,並且在報表預覽中每筆都顯示最大和最小的數均被標
上刪除線,我找了好多報表的說明都沒有這樣的解答,希望有高手能
幫幫忙,感謝各位大大!

nelsonchuang · 發表於: 星期二十二月 25, 2007 8:41 am 文章主題:

1.你有試過用最大及最小值嗎?
2.報表中有直線這個物件,你有試著控制它嗎?

syntech · 發表於: 星期二十二月 25, 2007 8:59 am 文章主題:

腦子越用越靈活,

因為我不是高手,所以我先把我的答案收起來.

朱育興 · 發表於: 星期二十二月 25, 2007 12:31 pm 文章主題:

這是用 VFP9 SP2 (5815 版)

1.CREATE CURSOR Test1 (A1 I, B1 I, C1 I, D1 I, E1 I)
INSERT INTO Test1 VALUES(22,10,55,9,85)
INSERT INTO Test1 VALUES(55,10,23,9,1)

2.報表檔中的(如下圖)
在 A1 欄位控制項中，於 [Dynamics] 頁中
1.按下 [ADD] 按鈕，輸入 MaxOrMin (這隨便取得名字)
2.MaxOrMin 就會在此出現
3.在 [Apply when this condition is true:] 中輸入 (如 4)
INLIST(A1,MAX(A1,B1,C1,D1,E1),MIN(A1,B1,C1,D1,E1))
最後將 Strikethrougt 打勾 (如 5，這是你要求的)

同樣的 B1, C1, D1, E1 等欄位控制項也如法炮製
只是 INLIST(A1,MAX(A1,B1,C1,D1,E1),MIN(A1,B1,C1,D1,E1)) 中的 INLIST(A1,... 要各自改為 INLIST(B1,...　　...

nelsonchuang · 發表於: 星期三十二月 26, 2007 8:53 am 文章主題:

朱先生這招不錯,我倒是沒想到~

leejack1024 · 註冊時間: 2007-12-08 文章: 2 第 6 樓

非常感謝朱先生的解答,但若是使用foxpro6.0
好像沒有這些控制項,但好像可以從報表檔的資料庫
下手,不知是否可以提供解決的方法,再次謝謝,
想到要重學foxpro,這裡有好多高手,就感到很溫暖!

朱育興 · 發表於: 星期四十二月 27, 2007 12:39 am 文章主題:

沒錯，6.0 是沒此功能，但這類問題仍是老掉牙的問題，此問題若一定要用 VFP 的報表處理的話，我一般都是用堆積木的方式。

同樣是用上述的那些欄位控制項，只是把 A1 中 INLIST(A1,MAX(A1,B1,C1,D1,E1),MIN(A1,B1,C1,D1,E1))，B1 中 INLIST(B1,... 這些條件各自改寫到它們自己的 [列印條件] 中，符合的，其字型就加上刪除線；另外將這 5 個欄位控制項都在各自複製出一個，並將每一組(A1 對 A1,B1 對 B1,...)都疊在一起，但要把複製的 A1 中 [列印條件] 改寫為 !INLIST(A1,MAX(A1,B1,C1,D1,E1),MIN(A1,B1,C1,D1,E1))，B1 中 [列印條件] 改寫為 !INLIST(B1,...，且其字型是不加刪除線的。

這樣，它的結果就跟我上面的 [預覽列印] 是一模一樣的東西。

在 VFP9 SP2 (5815 版) 還未提供 [Dynamics] 的功能前，若有上述需求時，我大致上都是如此處理的。