diff --git a/Packages/D2007/X2Utils.dpk b/Packages/D2007/X2Utils.dpk
index 065a37c..a568773 100644
--- a/Packages/D2007/X2Utils.dpk
+++ b/Packages/D2007/X2Utils.dpk
@@ -57,6 +57,7 @@ contains
X2UtPersistXML in '..\..\X2UtPersistXML.pas',
X2UtPersistXMLBinding in '..\..\X2UtPersistXMLBinding.pas',
XMLDataBindingUtils in '..\..\XMLDataBinding\XMLDataBindingUtils.pas',
- X2UtCursors in '..\..\X2UtCursors.pas';
+ X2UtCursors in '..\..\X2UtCursors.pas',
+ X2UtDelphiCompatibility in '..\..\X2UtDelphiCompatibility.pas';
end.
diff --git a/Packages/D2007/X2Utils.dproj b/Packages/D2007/X2Utils.dproj
index 43835ff..8242121 100644
--- a/Packages/D2007/X2Utils.dproj
+++ b/Packages/D2007/X2Utils.dproj
@@ -6,7 +6,7 @@
Debug
AnyCPU
DCC32
- ..\..\..\Bpl\D2006\X2Utils2007.bpl
+ %DELPHIBIN%\X2Utils2007.bpl
7.0
@@ -32,14 +32,6 @@
Package
FalseTrueFalseX2UtilsTrueFalseTrue2007TrueFalse1000FalseFalseFalseFalseFalse104312521.0.0.01.0.0.0
-
-
-
-
-
-
-
-
Microsoft Office 2000 Sample Automation Server Wrapper Components
Microsoft Office XP Sample Automation Server Wrapper Components
@@ -49,9 +41,13 @@
MainSource
+
+
+
+
@@ -74,8 +70,5 @@
-
-
-
\ No newline at end of file
diff --git a/X2UtDelphiCompatibility.pas b/X2UtDelphiCompatibility.pas
index 402c23f..f01040e 100644
--- a/X2UtDelphiCompatibility.pas
+++ b/X2UtDelphiCompatibility.pas
@@ -13,7 +13,7 @@ implementation
{$IF CompilerVersion < 20}
uses
Windows;
-{$ENDIF}
+{$IFEND}
function CharInSet(C: Char; const CharSet: TSysCharSet): Boolean;
diff --git a/X2UtNamedFormat.pas b/X2UtNamedFormat.pas
index a04d12e..b71a3e0 100644
--- a/X2UtNamedFormat.pas
+++ b/X2UtNamedFormat.pas
@@ -44,7 +44,9 @@ type
implementation
uses
- Windows;
+ Windows,
+
+ X2UtDelphiCompatibility;
{$I X2UtCompilerVersion.inc}