Bruce,
I'm reseaching and learning.
Someone send me the following code to be use in a win32 C6 app
SetTheFonts Routine
Case Local:FontType
Of 1 ! russian
SetFONT(?Browse:1,'Arial Unicode MS',,,,CHARSET:CYRILLIC)
! SetFONT(?CUS:Name,'Arial Unicode MS',,,,CHARSET:CYRILLIC)
Of 2 ! greek
SetFONT(?Browse:1,'Arial Unicode MS',,,,CHARSET:Greek)
! SetFONT(?CUS:Name,'Arial Unicode MS',,,,CHARSET:Greek)
End
Setwindowfont Routine
Case Local:FontType
Of 1 ! russian
SetFONT(0,'Arial Unicode MS',,,,CHARSET:CYRILLIC)
Of 2 ! greek
SetFONT(0,'Arial Unicode MS',,,,CHARSET:Greek)
End
Update
Display
Is this of any help?
Thanks
Alberto