VFP 愛用者社區

Ruey · 註冊時間: 2003-03-12 文章: 1698 來自: tunglo 第 1 樓

來源:童心未泯
http://www.vfp80.net/dvbbs7/dispbbs.asp?boardID=13&ID=494&page=1

如何讓用戶能隨意修改報表中的字體大小？
Q：如何讓用戶能隨意修改報表中的字體大小？
A：以下代碼在系統中可運作，供參考：　

&& 通過GETFONT( )得到以下參數：
&& M_FONTFACE='細明體'
&& M_FONTSIZE=14
&& M_HEIGHT= 2500.000
&& M_WIDTH= 2187.500
&& M_VPOS= 39895.833 　

SELE 0
USE REPORTS\report1.FRX AGAIN
LOCA FOR UPPER(ALLTRIM(EXPR))='M_DEED' &&報表表達式
IF FOUND()
REPL FONTFACE WITH M_FONTFACE
REPL FONTSIZE WITH M_FONTSIZE
REPL HEIGHT WITH M_HEIGHT
REPL WIDTH WITH M_WIDTH
REPL VPOS WITH M_VPOS
ENDIF
USE

syntech · 發表於: 星期三四月 21, 2004 10:56 am 文章主題:

沒測過,
但是我很懷疑,
應該還少了一點東西,步驟,作用事件等等,
才能順利運作吧

Ruey · 發表於: 星期四四月 22, 2004 6:46 pm 文章主題:

若是替換報表裏頭的字型/大小/位置
我認為是可行的.

目前我測試過.他這範例有點問題!!
改天我找資料.寫出正確的方法...~_~

syntech · 發表於: 星期五四月 23, 2004 9:20 am 文章主題:

我也同樣認為,
我曾經作過換picture的動作,
基本上也是用 expr 或是 '相對於頂端的top 值'判斷(因EXPR判斷字串太複雜),
然後再 replace掉某些欄位值(我當時是用 update -SQL)

但是要說到'隨意',
那就得要在MODIFY REPORT時,
能夠自由叫出 FONT Dialog Box,
所以應該是朝'自訂編輯報表畫面'著手吧