Xbrowse keychar to post Chinese words into edit /tget ?

[ShumingWang]

Hi,
If input A Chinese words like "国家" at one time by ms windows (at one time like input a 'a' at one time,not done 4 times )

xbrowse keychar()
local cstr:=""
do case
case nkey ==...
...
otherwise
...

oserver:query("insert into aaa (mem) values('"+char(nkey)+"'")
cstr+=chr(nkey)
ocol:edit(nkey)
// edit(nkey() lost the right("国家",3), only post the first char left("国家",1) into edit/Tget
return

select mem from aaa

185
250
188
210
// chr(185)+chr(250)+chr(188)+chr(210)=="国家"==cstr

So ,I want :

xbrowse keychar()
local cstr:=""
do case
case nkey ==...
...
otherwise
...
while nkey>0
::cstr+=chr(nkey)
nkey:=lastkey()
// or by super keyboard
end


ocol:edit(cstr) and post cstr to tget
...
return


How to do this:
while nkey>0
::cstr+=chr(nkey)
nkey:=lastkey()
// or by super:keychar(),setkey(),...
end

Best reagrds!

Shuming Wang