Browse Source

* updated unicode example string

git-svn-id: branches/unicodekvm@48738 -
nickysn 4 years ago
parent
commit
1b27a955fa
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fv/examples/testuapp.pas

+ 1 - 1
packages/fv/examples/testuapp.pas

@@ -40,7 +40,7 @@ begin
   R.A.Y := R.B.Y - 1;
   R.A.Y := R.B.Y - 1;
   new(StatusLine, Init(R,
   new(StatusLine, Init(R,
       NewStatusDef(0, $EFFF,
       NewStatusDef(0, $EFFF,
-          NewStatusKey({'~F1~ 打开'}'F1 По п' + 'ъ́' + 'тя', kbF1, cmHelp,
+          NewStatusKey({'~F1~ 打开'}'~F1~ По пъ́тя', kbF1, cmHelp,
           NewStatusKey('~F3~ Отваряне', kbF3, cmOpen,
           NewStatusKey('~F3~ Отваряне', kbF3, cmOpen,
           NewStatusKey('~F4~ Νέος',  kbF4, cmNew,
           NewStatusKey('~F4~ Νέος',  kbF4, cmNew,
           NewStatusKey('~Alt+F3~ Zavřít', kbAltF3, cmClose,
           NewStatusKey('~Alt+F3~ Zavřít', kbAltF3, cmClose,