From 0a876981213bea4a27ec99eaa16a7675c624c707 Mon Sep 17 00:00:00 2001
From: geby <geby@7c85be65-684b-0410-a082-b2ed4fbef004>
Date: Wed, 12 Jan 2022 19:07:32 +0000
Subject: [PATCH] synafpc.pas - required ansistring functions are avaiable in
 XE4+

git-svn-id: https://svn.code.sf.net/p/synalist/code/trunk@247 7c85be65-684b-0410-a082-b2ed4fbef004
---
 synafpc.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/synafpc.pas b/synafpc.pas
index ee464ca..3bcc32e 100644
--- a/synafpc.pas
+++ b/synafpc.pas
@@ -102,7 +102,7 @@ type
    {$ENDIF}
   {$ENDIF}
 
-  {$IFDEF VER100}
+  {$IFDEF DELPHI3}
    LongWord = DWord;
   {$ENDIF}
 
@@ -154,7 +154,7 @@ begin
   {$IfDef FPC}
    Result := SysUtils.StrLCopy(Dest, Source, MaxLen);
   {$Else}
-   {$IFDEF DELPHI25_UP}
+   {$IFDEF DELPHIXE4_UP}
     {$IfDef NEXTGEN}
      Result := PAnsiChar( System.SysUtils.StrLCopy(PWideChar(Dest^), PWideChar(Source^), MaxLen)^ );
     {$Else}
@@ -171,7 +171,7 @@ begin
   {$IfDef FPC}
    Result := SysUtils.strlcomp(Str1, Str2, MaxLen);
   {$Else}
-   {$IFDEF DELPHI25_UP}
+   {$IFDEF DELPHIXE4_UP}
     {$IfDef NEXTGEN}
      Result := System.SysUtils.StrLComp(PWideChar(Str1^), PWideChar(Str2^), MaxLen);
     {$Else}