VFP 愛用者社區

[Rita]

(1)請問在vfp compiler 後, 要如何輸入簡體版的中文字
目前我在vfp 6.0繁體版輸入簡體字會變成 ? (大概是不認識)
(2) vfp 是否真有簡體版搞不清楚是否就市 vfp profession 7.0版
(3) 先進前輩門是否有類似經驗,可否幫忙提供意見

我的環境是
(a) 台灣總公司使用vfp 6.0繁體版,有現成database在運作
需求是將資料庫(例如產品檔)透過mail 到大陸
(b) 大陸員工可查詢產品或新增產品將異動產品mail回總公司(台灣)
(c) 前題是用同一套程式(或將form 改為簡體字皆已試過)都產生前述相同的問題?
(d) 台灣用的是windows 98 se
大陸用的是windows xp 簡體版(非unicode 已改為中文台灣)

[Ruey]

資料庫使用何種的??
1.在vfp 6.0繁體版輸入簡體字會變成 ? --->增加簡體語系
2.vfp profession 7.0是多國語系版
3.方法
大陸簡體版--->轉換成繁體---->存入台灣資料庫

[garfield]

declare string GBtoBIG5 in gb2big.dll string
declare string BIG5toGB in gb2big.dll string

messagebox( 'GB :恁寁斕腔砐醴垀婓腔醴翹' + chr(13)+'BIG5:'+GBtoBIG5('恁寁斕腔砐醴垀婓腔醴翹')+chr(13)+'big5==>GB:繁簡轉換的DLL==>'+BIG5toGB('繁簡轉換的 DLL') )

[Rita]

您好,
謝謝您的回覆!!可否再進一步請教:
1.資料庫使用何種的??
====>vfp 6.0
2.在vfp 6.0繁體版輸入簡體字會變成 ? --->增加簡體語系
===> a.請教要在何處增加簡體語系?
===> b.目前是兩岸各寫一套(表單及報表利用繁簡字體區別), 資料則共用,
廣州方面,在WindowsXP利用非UniCode設定中文繁體語系,
程式已可執行及顯示簡體字(使用者只會簡體), 但問題是只要一輸入中文字,
很多字(簡體)都會出現??無法辨識, 不知有什麼方法克服?
3.方法 大陸簡體版--->轉換成繁體---->存入台灣資料庫
=== > 請教要利用什麼工具才能轉換成繁體?
再次感謝您!

[Rita]

您好,
我已下載檔案測試, 謝謝您!
可是我不會使用dll檔案,
複製您的語法並解壓縮檔案,
但一執行就出現程式錯誤:無法載入32位DLL
才疏學淺, 請勿見笑!

[garfield]

我已在 vfp6+win98或winXP的環境下測試, 並不會出現你所說的那種情形, 可能是在下載過程中出了問題, 所以另寄一份給你, 再試一次吧!.

[Rita]

請問有人做過兩岸互傳的系統嗎?可否經驗相傳呢?
聽說*.dbf需一一轉為*.txt, 再透過轉碼工具轉為簡體碼或繁體碼,
再由*.txt轉為*.dbf, 真的要如此做嗎?沒有更好的方法了嗎?
想到那一大串的檔案真是惡夢......

[Ruey]

沒錯,寫一個自動檢查商品資料及新增.轉碼工具
定時去更新資料即可

[Rita]

綜合各位的幫忙, 總算接近完成的尾聲, 謝謝大家!
我採用的方法是:
1.資料庫用繁簡體二套, 利用上下傳及轉碼程式將資料互相轉換
(在www.google.com搜尋BIG5_GB可找到 整個目錄文字檔批次繁簡轉檔程式)
2.表單及報表程式的中文caption利用garfield提供的Gb2Big.DLL轉為簡體顯示

目前在WinXP已可顯示及輸入簡體字, 資料轉換也正常,
只是還有一個Bug想請教garfield:
我在主程式宣告
declare string BIG5toGB in gb2big.dll string
而在表單的init將各物件的caption=BIG5toGB(‘原來繁體Caption’)
程式執行有時正常有時又會出現:無法載入32位元DLL,
或Declare DLL call cause an exception;
不是固定某個地方會出現,
不知這樣的使用方式不對?或者….?
可否再次麻煩garfield, 謝謝!

[garfield]

請將declare string BIG5toGB in gb2big.dll string
放在主程式中一開始執行程式就會執行到的地方, 不要放在form.init( ) 內, 但請注意如果你有只要有執行 clear dlls 就會將 big5togb( )清除了. 試看看吧!

[garfield]

另外其實整個檔案要轉換內碼也不須要別的程式, big5toGB( ) 也可以做到, 方式如下:
myfilename='big5file.txt'
mwritestrlen = strtofile( big5toGB(filetostr( myfilename )) , 'tempfile' )
if mwritestrlen>0
dele file &myfilename
rename tempfile to &myfilename
endif

如果是整個目錄要變更, 請自行用adir( ) 加上迴路即可.

[Rita]

將declare string BIG5toGB in gb2big.dll string
放在主程式中一開始執行程式就會執行到的地方,
而form.init( ) 內是轉換該表單的 caption,
問題還是有時會出現?連續執行多次同一form即會出現?
除了clear dlls外, 是否有其他語法會不小心將dll給清除呢?
謝謝!!

[Ruey]

1.clear dlls改放到主程式結束的地方
一般我是沒有下達clear dlls,也沒有問題
2.建議你參考
http://vfp.sunyear.com.tw/viewtopic.php?t=98

[jakey]

請問一下
我依您的作法 做但在將Caption 轉換時

如 ThisForm.Caption=Big5toGb("進銷存系統") 卻出現

[ File 'big5togb.prg' does not exist. ]

不知是何原因...

[syntech]

100分的問題.