VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

成功解決(吉吉)等異體字,輸入unicode變成?,不需使用補完計畫
前往頁面 上一頁  1, 2, 3
 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
css



註冊時間: 2004-12-31
文章: 17


第 31 樓

發表發表於: 星期二 九月 15, 2020 11:49 am    文章主題: 引言回覆

這話題說到這裡就有些「離題」了。
CPS0204幾年前提出問題:
試圖解決在VFP中,「F、i、腄v等罕用字錄入、顯示的問題。
這個問題其實一直困擾著VFP。全球範圍內最標準也最簡單的解決方案是:
採用Unicde來錄入、存儲與顯示輸出。
結果討論了半天,兄台突然來一句:
「也就沒有非用VFP 搞UNICODE 的情況」

這就相當於,我們一群人熱烈地討論:
「炎炎夏日人們要去哪裡旅遊消暑最省錢、最好玩、最浪漫?」
得出一個初步的結論:
「去馬爾代夫嬉水,性價比較高!」
結果syntech兄總結一句:
「其實,也就沒有非要在炎炎夏日外出旅遊的情況,在家裡在電玩吧,最省錢、最好玩、雖然不那麼浪漫而已啦!」
Laughing

syntech 寫到:

我記得站長的UNICODE DEMO已經做過這樣的示範.

我在幾年前按照同樣的做法,
把 GOOGLE 搜尋的資料以UTF8的形式存在 DBF,
(方便公司內做挖資料的參考)

有商業的VB6 UNICODE 套件可以用在 VFP 中
只是要花錢的問題,
那時 WEB ERP 已經開始興起
也就沒有非用VFP 搞UNICODE 的情況
回頂端
檢視會員個人資料 發送私人訊息
syntech



註冊時間: 2003-05-16
文章: 3932
來自: Taipei,Taiwan

第 32 樓

發表發表於: 星期二 九月 15, 2020 4:39 pm    文章主題: 引言回覆

因為我是走實用主義

該用殺雞刀就用殺雞刀,
該用屠龍刀就用屠龍刀
不會為了討論殺雞刀能不能屠龍,
就硬要想一個方法用殺雞刀屠龍
就算是我知道怎麼用殺雞刀屠龍

_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問

請聯絡我們,也許我們幫得上忙
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 AIM Address
css



註冊時間: 2004-12-31
文章: 17


第 33 樓

發表發表於: 星期一 九月 21, 2020 11:18 pm    文章主題: 引言回覆

一旦踏入Unicode的領地,這世界馬上會變得「喪心病狂」!
比方說,在同一行之內,錄入幾種不同國家的文字,並正確存檔,正確地顯示出來,這完全是「滅絕師太」的手段,慘絕人寰——

https://wws.lanzous.com/idHp3gtw7gf
回頂端
檢視會員個人資料 發送私人訊息
黃澤民



註冊時間: 2003-09-08
文章: 56
來自: 新竹

第 34 樓

發表發表於: 星期二 九月 22, 2020 1:13 pm    文章主題: 引言回覆

請問先進:
這裡面的unitree,unilabel,unitext,unicmd
都是ole物件嗎?如何取得?


css 寫到:
syntech 寫到:
不管哪種方案,
只要需要花錢,那就不是好方案


此觀點有些偏激啦!
畢竟兄台提供給客戶的解決方案,都是要收錢的啊。
「己所不欲,勿施於人」……呵呵呵呵。
Unicode支援,可能並非困難事,人家15年前就解決了,可憐我們搞VFP,被微軟拋棄了。

附件是一個VFP製作的Demo,下載位址:
https://wws.lanzous.com/if2MQgkrosf

用到一個DBF表:Unicode.dbf,只有一個字段:Unicode C (50),存放表單顯示用到的18條Unicode字符。
表單源碼也很簡單,大致如下:

代碼:

PUBLIC oform1

oform1=NEWOBJECT("form1")
oform1.Show
RETURN


   **************************************************
*-- Form:         form1 (e:\vfp_treeview\formunicode.scx)
*-- ParentClass:  form
*-- BaseClass:    form
*-- Time Stamp:   09/12/20 10:09:08 AM
*
DEFINE CLASS form1 AS form


   Top = 0
   Left = 0
   Height = 629
   Width = 367
   DoCreate = .T.
   Caption = "Unicode Demo"
   Name = "Form1"


   ADD OBJECT unitree1 AS olecontrol WITH ;
      Top = 46, ;
      Left = 8, ;
      Height = 288, ;
      Width = 344, ;
      Name = "UniTree1"

   ...
   ...


   PROCEDURE Load
      CLOSE ALL
      USE unicode
   ENDPROC


   PROCEDURE unitree1.NodeClick
      LPARAMETERS node
      Thisform.UniText1.Text="You clicked Node: " + Node.Text
   ENDPROC


   PROCEDURE unitree1.Init
      This.LineStyle= 1  && tvwRootLines
      This.Style= 7  && tvwTreelinesPlusMinusPictureText
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      This.Nodes.Add(,,"Unicode1", "Unicode String 1")
      This.Nodes.Add(,,"Unicode2", "Unicode String 2")
      This.Nodes.Add(,,"Unicode3", "Unicode String 3")

      FOR i=1 TO 3
         l__cparent = "Unicode" + ALLTRIM(STR(i))
         SCAN NEXT 6
            This.Nodes.Add(l__cparent,4,, TRIM(unicode.unicode))
         ENDSCAN
      ENDFOR
   ENDPROC


   PROCEDURE unicmd1.Click
      Thisform.UniText2.Text="You clicked button: " + this.caption
   ENDPROC


   PROCEDURE unicmd1.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      SELECT unicode
      GO 3
      This.caption = TRIM(unicode.unicode)
   ENDPROC


   PROCEDURE unilabel1.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      This.caption = FILETOSTR("unicode.txt")
      this.Enabled = .f.
   ENDPROC


   PROCEDURE unitext1.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      This.text = "You clicked Node: "
   ENDPROC


   PROCEDURE unitext2.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      This.text = "You clicked Button: "
   ENDPROC


   PROCEDURE unicmd2.Click
      Thisform.UniText2.Text="You clicked button: " + this.caption
   ENDPROC


   PROCEDURE unicmd2.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      SELECT unicode
      GO 4
      This.caption = TRIM(unicode.unicode)
   ENDPROC


   PROCEDURE unicmd3.Click
      Thisform.UniText2.Text="You clicked button: " + this.caption
   ENDPROC


   PROCEDURE unicmd3.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      SELECT unicode
      GO 10
      This.caption = TRIM(unicode.unicode)
   ENDPROC


   PROCEDURE unicmd4.Click
      Thisform.UniText2.Text="You clicked button: " + this.caption
   ENDPROC


   PROCEDURE unicmd4.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      SELECT unicode
      GO 11
      This.caption = TRIM(unicode.unicode)
   ENDPROC


   PROCEDURE unicmd5.Click
      Thisform.UniText2.Text="You clicked button: " + this.caption
   ENDPROC


   PROCEDURE unicmd5.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      SELECT unicode
      GO 1
      This.caption = TRIM(unicode.unicode)
   ENDPROC


   PROCEDURE unicmd6.Click
      Thisform.UniText2.Text="You clicked button: " + this.caption
   ENDPROC


   PROCEDURE unicmd6.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      SELECT unicode
      GO 16
      This.caption = TRIM(unicode.unicode)
   ENDPROC


   PROCEDURE unicmd7.Click
      Thisform.UniText2.Text="You clicked button: " + this.caption
   ENDPROC


   PROCEDURE unicmd7.Init
      This.FontName = "Microsoft JhengHei"
      This.FontSize = 12
      SELECT unicode
      GO 14
      This.caption = TRIM(unicode.unicode)
   ENDPROC


ENDDEFINE
*
*-- EndDefine: form1
**************************************************

回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件
css



註冊時間: 2004-12-31
文章: 17


第 35 樓

發表發表於: 星期三 九月 23, 2020 11:43 am    文章主題: 引言回覆

黃澤民 寫到:
請問先進:
這裡面的unitree,unilabel,unitext,unicmd
都是ole物件嗎?如何取得?


這些確實是第三方公司封裝好的ActiveX控件。
VFP標準控件皆為ANSI版本,無法正確顯示Unicode編碼文字。
至於哪些控件適合在VFP中使用,需要自己嘗試——如神農嚐百草,好在我們嘗試過程中,不會中毒。呵呵。
回頂端
檢視會員個人資料 發送私人訊息
kojanlai0823



註冊時間: 2011-12-02
文章: 72


第 36 樓

發表發表於: 星期六 九月 26, 2020 11:18 am    文章主題: 引言回覆

我想求救
客戶原本有裝UNICODE補完計劃
結果老闆決定讓客戶都以全字庫的字型來做難字解決
但我們只有註冊字型

我也有依全字庫來做unicode及big5的對照表
但客戶因為有裝unicode補完計劃所以對照出來的字不一樣
請他們移除補完計劃..但還是沒對成全字庫的對照表
是有漏了什麼嗎?!
回頂端
檢視會員個人資料 發送私人訊息
ckp6250



註冊時間: 2004-07-30
文章: 1552


第 37 樓

發表發表於: 星期二 九月 29, 2020 5:17 pm    文章主題: 引言回覆

為何需要對照表呢?
安裝完了【中文全字庫】後,難字就能打了呀,在 vfp 中。
不太明白您的問題,可以再詳細舉例說明嗎?
回頂端
檢視會員個人資料 發送私人訊息
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
前往頁面 上一頁  1, 2, 3
3頁(共3頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作