From 1c4a8462c7d31de3f3f6b9baac45297445f2b51e Mon Sep 17 00:00:00 2001
From: vincents <vincents@lazarus-ide.org>
Date: Tue, 8 Mar 2005 11:24:05 +0000
Subject: [PATCH] fixed 1.9.9 compilation (rtlconst -> rtlconsts)

git-svn-id: trunk@6927 -
---
 components/rx/placement.pp | 7 ++++++-
 components/rx/strholder.pp | 4 ++++
 lcl/propertystorage.pas    | 3 ++-
 3 files changed, 12 insertions(+), 2 deletions(-)

diff --git a/components/rx/placement.pp b/components/rx/placement.pp
index fba07fd92d..31c79c6381 100644
--- a/components/rx/placement.pp
+++ b/components/rx/placement.pp
@@ -205,7 +205,12 @@ type
 
 implementation
 
-uses SysUtils, AppUtils, RTLConst;
+uses SysUtils, AppUtils,
+{$IFDEF VER1_9_8}
+  RTLConst;
+{$ELSE}
+  RTLConsts;
+{$ENDIF}
 
 const
 { The following strings should not be localized }
diff --git a/components/rx/strholder.pp b/components/rx/strholder.pp
index 22f27dcf9a..6c72f45ec7 100644
--- a/components/rx/strholder.pp
+++ b/components/rx/strholder.pp
@@ -145,7 +145,11 @@ Procedure Register;
 implementation
 
 uses
+{$IFDEF VER1_9_8}
   RTLConst;
+{$ELSE}
+  RTLConsts;
+{$ENDIF}
 
 Procedure Register;
 begin
diff --git a/lcl/propertystorage.pas b/lcl/propertystorage.pas
index 62e90ccec5..796b8101d3 100644
--- a/lcl/propertystorage.pas
+++ b/lcl/propertystorage.pas
@@ -25,7 +25,8 @@ interface
 
 {$IFNDEF VER1_0}
 uses
-  Classes, SysUtils, RTLConst
+  Classes, SysUtils,
+  {$IFDEF VER1_9_8}RTLConst{$ELSE}RTLConsts{$ENDIF}
   {$IFDEF EnableSessionProps}, RTTIUtils{$ENDIF};
 
 Type