FiveTech Support Forums

I use FWH 8.04 and xHarbour.com 11/07.
I would like to show menu in Chinese Language.
- Source code file must be which format ANSI or Unicode or ??????
- Can I copy Chinese Text from Google Dictionary to paste in Source Code?
- Can I use MingLiU (standard windows vista font file)?

Regards,
Dutch

Hi

I develop AP within Chinese in Taiwan

Regards,

Richard

Dear Richard,

Can you give me an idea about Chinese Language with FWH&xHarbour (as above posted)?

Thanks&Regards,
Dutch

Dear Richard,

Yes, exactly waht I want but I've got problem with source code file.
- Should It be ANSI format or Unicode or UTF-08?
- What kind of Font?
- Could you give me an example?

Thanks&Regards,
Dutch

HI Dutch:

Microsoft Applocal can make it.

I work for Both Chinese Code (cht&chs).

--
Best Regards

kokoo KAO

Dear kokookao & Richard,

I try Microsoft Applocale. I can try Chinese in notepad (ANSI format) but when I change keyboard to English, the Chinese word is appear. I don't know while.

What is source editor both of you use to type Chinese?

Regads,
Dutch

Dutch,
If your windows installed Chinese fonts, app.exe from ascii code source ,could show Chinese words with windows default fonts .
You can use any editors to write harbour/clipper/fwh source code prg,rc .
Best Regards!
Shuming Wang

ShumingWang wrote:Dutch,
If your windows installed Chinese fonts, app.exe from ascii code source ,could show Chinese words with windows default fonts .
You can use any editors to write harbour/clipper/fwh source code prg,rc .
Best Regards!
Shuming Wang

Hi

I use Multi-Edit and UEStudio work fine within Vista Chinese( CHT ).

Regards,

Richard

Dear Richard,

Do you mean you use UESTUDIO (Chinese Simplifield) version?

Regards,
Dutch

dutch wrote:Dear Richard,

Do you mean you use UESTUDIO (Chinese Simplifield) version?

Regards,
Dutch

dutch wrote:Dear Richard,

I try as this code but it still shows wrong charactor. Could you test this code and let me know the result pls. Does it show correctly?

Code: Select all Collapse

#include 'Fivewin.ch'

Function Main
local oWnd, oFont
local oTxtFile, nLines, n, cLines, aFonts

aFonts := {}

if file('FONT.INI')
   oTxtFile := TTxtFile():New('FONT.INI')
   nLines   := oTxtFile:RecCount()

   for n := 1 to nlines
        cLines := oTxtFile:ReadLine()
        if n = 6 .or. n = 7 .or. n = 8
            aadd( aFonts , if(cLines='.T.',.T.,.F.) )
        elseif n = 14
            aadd( aFonts , cLines )
        else
            aadd( aFonts , val(cLines) )
        end
       oTxtFile:Skip()
   next
   oTxtFile:Close()
   
end

   
DEFINE FONT oFont NAME "Microsoft JhengHei" SIZE 0, -12

   oFont:hFont := CreateFont( aFonts )


DEFINE WINDOW oWnd           ;
            FROM 0, 0 TO 38, 130      ; 
            TITLE "營運管理系統"        ; 
             MENU Build_FW_Menu() 

     oWnd:oFont := oFont

ACTIVATE WINDOW oWnd 
return nil
//-------------------------------------------------------------------------// 

Function Build_FW_Menu()

LOCAL oMenu 

      MENU oMenu 
    
         MENUITEM "基本管理" 
            MENU 
               MENUITEM "客戶類別資料維護"                   ;    && M000011001 
                         RESOURCE "MN_CUSTTYPE"              ; 
                         MESSAGE "執行客戶類別資料維護作業"  
                         
               MENUITEM "來電類型資料設定"                   ;    && M000011002 
                         RESOURCE "MN_CallPhoneMsf"          ; 
                         MESSAGE "執行來電類型資料設定作業"  
	ENDMENU
ENDMENU
return oMenu

Thanks&regards,
Dutch