多語言版vfp程式設計簡單實現 (轉)

多語言版vfp程式設計簡單實現 (轉)[@more@]

增加資料表:
langTxt.f  //共五個欄位,textno--編號;mod_type--模組代號;tchinese--繁體文字;schinese--簡體文字;english--英文;  用來儲存label的各種語言要顯示的文字
langType.dbf  //語言型別,設1為繁體,2為簡體,3為英文;兩個欄位,一個欄位為型別,一個欄位為語言說明
langValue.dbf  //儲存當前語言型別,一個欄位就夠,設預設值為'1'

新增加一個label類,在init屬性中加入以下程式碼:
sele langtxt
locate for allt(textno)==allt(this.name)
if allt(langValue.lang_no)=='1'
 this.caption=allt(tchinese)
else
 if allt(langValue.lang_no)=='2'
 this.caption=allt(schinese)
 else
 this.caption=allt(english)
 endif
endif

然後在中用這個新類增加label,label的name值定義和langTxt.textNo的值相對應,這時只要修改langValue.lang_no的值,就可以實現三種語言切換了~~

相同的方法,在langTxt.dbf中增加幾個表示語言的欄位,init程式碼稍加更改,就可以實現更多種語言的程式設計;文字維護並不會很復雜~

設計不是很好,但相信實用,大家如有更好的方法,不妨提出^_^

(以上方法在繁體2000,簡體98,繁體98/vfp6.0繁體 中測試透過.)