From 6aacb9696184f25755a7a0c51041eb953c60808c Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Tue, 2 Mar 2021 12:29:57 +0000
Subject: [PATCH] * replaced non-ascii characters to #XXX equivalents

git-svn-id: branches/unicodekvm@48866 -
---
 packages/fv/src/dialogs.inc | 4 ++--
 packages/fv/src/inplong.inc | 2 +-
 packages/fv/src/menus.inc   | 2 +-
 packages/fv/src/outline.inc | 2 +-
 4 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/packages/fv/src/dialogs.inc b/packages/fv/src/dialogs.inc
index c353b8c513..de4eb2f0c9 100644
--- a/packages/fv/src/dialogs.inc
+++ b/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);
diff --git a/packages/fv/src/inplong.inc b/packages/fv/src/inplong.inc
index 77fd2077d0..49c47a2abb 100644
--- a/packages/fv/src/inplong.inc
+++ b/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
diff --git a/packages/fv/src/menus.inc b/packages/fv/src/menus.inc
index a0daa1f397..265984af31 100644
--- a/packages/fv/src/menus.inc
+++ b/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
diff --git a/packages/fv/src/outline.inc b/packages/fv/src/outline.inc
index e668496aae..296f0a2c9f 100644
--- a/packages/fv/src/outline.inc
+++ b/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}