VFP 愛用者社區

gracefj623 · 註冊時間: 2012-03-13 文章: 4 第 1 樓

請教各位大大，VFP 6.0如何在Run Time動態的改變報表物件的顯示格式？
或者在Design Time時如何下指令能讓1,234.9900及1,234.9990在顯示時皆省略小數點後最右邊的零，
感謝幫忙~

garfield · 發表於: 星期二三月 13, 2012 6:15 pm 文章主題:

報表裡的欄位直接用函數來顯示資料

? '='+trano0(1234.1234)+'='
? '='+trano0(1234.5)+'='

func trano0
lpara mnumber
return trimzero(tran(mnumber,'@R 999,999.9999'))
*******
func trimzero
lpara mstr
return iif(right(mstr,1)='0',trimzero(left(mstr,len(mstr)-1))+' ' , mstr)

gracefj623 · 註冊時間: 2012-03-13 文章: 4 第 3 樓

感謝garfield大大的回覆,
不好意思,問題沒有說明清楚,因為一張報表裡會需要顯示不同小數位數的數值欄位,希望同一列欄位下的數值都能對齊,但又不能事先固定每一列欄位要顯示的小數位數,所以才想問問看可否在Run Time控制報表欄位的顯示格式,不知是否有解??

soonli · 註冊時間: 2005-08-05 文章: 10 第 4 樓

拆成整數部分和小數部分

syntech · 發表於: 星期三三月 14, 2012 9:39 am 文章主題:

按我做報表這麼多年來看,
沒有固定同一列的小數位數會造成客戶識別不易.
例如:
　　２．３６５
１１２４０００
２２５６．６３
７７８８９．４

正常我們會做
　　　　　　２．３６５
１１２４０００．０００
　　　２２５６．６３０
　　７７８８９．４００

這就是二樓的答案
若是你要在不同分組的情況做成不同的小數位數,
其實變化二樓的做法就可以了.
可能沒有好好想過提示的重點在哪邊.

另外,如果你把欄位設成右邊對齊,應該就會出現不管小數位數都對齊的情況吧.

ckp6250 · 註冊時間: 2004-07-30 文章: 1645 第 6 樓

按我做會計這麼多年來看,
沒有固定同一欄的小數位數會造成客戶識別不易.

gracefj623 · 註冊時間: 2012-03-13 文章: 4 第 7 樓

更正一下我的描述,我的同一欄 = 同一列欄位.
因為報表要顯示什麼欄位是使用者自行挑選的,所以沒辦法預先設定使用者在何欄位要顯示何資訊,而不同意義的數值要顯示的小數位不同,所以才會有如此的煩惱.

ckp6250 · 註冊時間: 2004-07-30 文章: 1645 第 8 樓

使用者自行挑選欄位，並不少見。

用AFIELDS去判斷該欄位的小數位數
再用garfield的方法

garfield · 發表於: 星期三三月 14, 2012 2:39 pm 文章主題:

假設同一個位置可能有4種欄位, 每個欄位都有不一樣的小數位數,
那你可以在報表裡同一個位置疊上4個物件, 4個物件可以設定唯一列印條件即達成你的需求.

gracefj623 · 註冊時間: 2012-03-13 文章: 4 第 10 樓

目前已經是使用堆疊物件的方法,因為後續若要維護比較麻煩,所以想詢問看看是否還有別的方法,感謝各位大大的指導,謝謝.

syntech · 發表於: 星期三三月 14, 2012 5:00 pm 文章主題:

二+八樓就可以了,

或是另外準備一個格式table用來替換transform()中的格式字串再套二樓的方法

二樓的方法就是標準化格式輸出了,哪有什麼不行?