FiveTech Support Forums

Hi,
//1 Only for test lost 2 bytes word input.
METHOD KeyChar( nKey, nFlags ) CLASS TXBrowse
...
do case
...
case nKey == VK_ESCAPE
memowrit("aaa.txt",::ckeychar )
::ckeychar:=""
// a temparary data 'ckeychar' add to xbrowse class
...

    otherwise

     ::cKeyChar += Chr( nKey )  
    ...

We open log file aaa.txt,we can found 2bytes Chinese word inputed lost some chars.
While xbrowse keychar() of modal dialog works fine.

// 2 for test connect to xbrowse ocol:edit

METHOD KeyChar( nKey, nFlags ) CLASS TXBrowse
...
do case
...
case nKey == VK_ESCAPE
memowrit("aaa.txt",::ckeychar )
::ckeychar:=""
// a tempary data 'ckeychar' add to xbrowse class
...

    otherwise

     ::cKeyChar += Chr( nKey )  
    ...
     elseif ( ::lFastEdit ...
       SysRefresh()
       oCol:Edit()
     ...

method edit() class TXBrwColumn
...
if ::lEditBorder
WndBoxIn( ::oBrw:GetDC(), nRow-1, nCol-1, nRow + nHeight + 1, nCol + nWidth + 1)
::oBrw:ReleaseDC()
endif

       ckey:=::obrw:ckeychar
       for nI := 1 To Len( cKey )

         PostMessage( ::oEditGet:hWnd, WM_CHAR, Asc(  Substr( cKey, nI, 1 )) )           
        next ni

Best regards!
Shuming Wang

Here is How to install Chinese word diaplay and input module in XP :

viewtopic.php?f=19t=22705

&