* replaced non-ascii characters to #XXX equivalents

git-svn-id: branches/unicodekvm@48866 -

packages/fv/src/dialogs.inc

@@ -2109,7 +2109,7 @@ BEGIN
 {$ifdef FV_UNICODE}
           c:=#$2584;
 {$else FV_UNICODE}
-          c:='Ü';
+          c:=#220;
 {$endif FV_UNICODE}
           MoveChar(Db,c,Bc,1);
           WriteLine(Size.X-1, 0, 1, 1, Db);
@@ -2119,7 +2119,7 @@ BEGIN
 {$ifdef FV_UNICODE}
       else c:=#$2580;
 {$else FV_UNICODE}
-      else c:='ß';
+      else c:=#223;
 {$endif FV_UNICODE}
       MoveChar(Db[1],c,Bc,Size.X-1);
       WriteLine(0, 1, Size.X, 1, Db);

packages/fv/src/inplong.inc

@@ -120,7 +120,7 @@ const
 
 Implementation
 
-{
-----------------TInputLong.Init}
+{-----------------TInputLong.Init}
 constructor TInputLong.Init(var R : TRect; AMaxLen : Sw_Integer;
         LowerLim, UpperLim : LongInt; Flgs : Word);
 begin

packages/fv/src/menus.inc

@@ -1062,7 +1062,7 @@ Const
 {$ifdef FV_UNICODE}
      (#$250C#$2500#$2510,#$2502#$0020#$2502,#$251C#$2500#$2524,#$2514#$2500#$2518);
 {$else FV_UNICODE}
-     ('ÚÄ¿','³ ³','ÃÄ´','ÀÄÙ');
+     (#218#196#191,#179#32#179,#195#196#180,#192#196#217);
 {$endif FV_UNICODE}
   Procedure CreateBorder(LineType : FrameLineType);
   Begin

packages/fv/src/outline.inc

@@ -460,7 +460,7 @@ function Toutlineviewer.getgraph(level:SmallInt;lines:longint;
                                  flags:word):string;
 
 begin
-  getgraph:=creategraph(level,lines,flags,3,3,' ³ÃÀÄÄ+Ä');
+  getgraph:=creategraph(level,lines,flags,3,3,#32#179#195#192#196#196#43#196);
 end;
 {$endif FV_UNICODE}