Re: [Hwgui-developers] Richedit and cyrillic

[vatzct <va...@po...>]

12.11.2009 12:47, vatzct написав(ла):
> Hi!
>
> First run the func viewfile() shows correct cyrillic but second is not,
> see sample below:
>
>
Hi!

Can anyone test the sample and show the result:

#include "hwgui.ch"

FUNC main()

LOCAL strview
private ii := 0
HWG_SETUTF8()
strview := "Тестовая строка кирилица"
viewfile( strview )
strview := "Тестовая строка кирилица"
viewfile( strview )

RETURN nil

FUNC viewfile( strview )

LOCAL odlgedit, oedit1, bt_cl, bt_print
ii++
init dialog odlgedit title "" at 0, 0 size 700, 400 ON init {|o|o:center() }
@ 01, 01 OwnerButton bt_cl Size 50, 24 TEXT "Exit" ON click 
{||odlgedit:Close() }
@ 01, 31 RichEdit oEdit1 TEXT str(ii)+" test: "+strview SIZE 689, 351
odlgedit:activate()

RETURN nil

my result is:
1 test: Тестовая строка кирилица
2 test: Òåñòîâàÿ ñòðîêà êèðèëèöà

Thanks

Regards,
Alexey Myronenko