From adcc3c6129660e18de5e94f1f9f43920116425bd Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 2 Jan 2015 17:43:00 +0000
Subject: [PATCH] Fix Delphi <= 2007 compilation (Thanks Juha)

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3858 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 wst/trunk/wst_delphi.inc | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/wst/trunk/wst_delphi.inc b/wst/trunk/wst_delphi.inc
index 87d818c78..530f4b53f 100644
--- a/wst/trunk/wst_delphi.inc
+++ b/wst/trunk/wst_delphi.inc
@@ -11,13 +11,16 @@
     DWORD = LongWord;
     PByteArray = ^ByteArray;
     ByteArray = array[0..$effffff] of Byte;
-    {$IF Declared(NativeUInt)}
+  {$IFDEF CompilerVersion}
+    {$IF ( CompilerVersion > 19.0 )}   //Delphi 2007=18.5; Delphi 2009 = 20
       PtrInt  = NativeInt;
       PtrUInt = NativeUInt;
-    {$ELSE} // old delphi
+    {$IFEND}
+  {$ENDIF CompilerVersion}
+  {$IF Not Declared(PtrInt) }
       PtrInt = Integer;
       PtrUInt = Cardinal;
-    {$IFEND}
+  {$IFEND}
     SizeInt = PtrInt;
     UnicodeChar = WideChar;
 {$ENDIF DELPHI}