From a0cdccce84b1b7ae3a82a119989b1b971a6e12af Mon Sep 17 00:00:00 2001
From: santiagoIT <sburbano@itworks.ec>
Date: Mon, 8 Jun 2020 15:41:26 -0500
Subject: [PATCH] Added support for Delphi 10.4 Sydney

---
 .gitignore                                    |   5 +-
 .../DataAbstract_Scripting_D27.dpk            |  43 ++++
 .../DataAbstract_Scripting_D27.dproj          | 169 +++++++++++++++
 .../DataAbstract_Scripting_D27.res            | Bin 0 -> 588 bytes
 Addon/RemObjects SDK/PascalScript_RO_D27.dpk  |  48 +++++
 .../RemObjects SDK/PascalScript_RO_D27.dproj  | 176 +++++++++++++++
 Addon/RemObjects SDK/PascalScript_RO_D27.res  | Bin 0 -> 680 bytes
 Source/PascalScript_Core_D27.dpk              |  78 +++++++
 Source/PascalScript_Core_D27.dproj            | 202 ++++++++++++++++++
 Source/PascalScript_Core_D27.res              | Bin 0 -> 684 bytes
 Source/eDefines.inc                           |  81 +++++++
 11 files changed, 801 insertions(+), 1 deletion(-)
 create mode 100644 Addon/DataAbstract/DataAbstract_Scripting_D27.dpk
 create mode 100644 Addon/DataAbstract/DataAbstract_Scripting_D27.dproj
 create mode 100644 Addon/DataAbstract/DataAbstract_Scripting_D27.res
 create mode 100644 Addon/RemObjects SDK/PascalScript_RO_D27.dpk
 create mode 100644 Addon/RemObjects SDK/PascalScript_RO_D27.dproj
 create mode 100644 Addon/RemObjects SDK/PascalScript_RO_D27.res
 create mode 100644 Source/PascalScript_Core_D27.dpk
 create mode 100644 Source/PascalScript_Core_D27.dproj
 create mode 100644 Source/PascalScript_Core_D27.res

diff --git a/.gitignore b/.gitignore
index 9b20757..145c72d 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,2 +1,5 @@
 *.dcu
-__history
\ No newline at end of file
+__history
+*.local
+*.skincfg
+*.identcache
diff --git a/Addon/DataAbstract/DataAbstract_Scripting_D27.dpk b/Addon/DataAbstract/DataAbstract_Scripting_D27.dpk
new file mode 100644
index 0000000..4eec125
--- /dev/null
+++ b/Addon/DataAbstract/DataAbstract_Scripting_D27.dpk
@@ -0,0 +1,43 @@
+package DataAbstract_Scripting_D27;
+
+{$R *.res}
+{$IFDEF IMPLICITBUILDING This IFDEF should not be used by users}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION OFF}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DEFINE DEBUG}
+{$ENDIF IMPLICITBUILDING}
+{$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  RemObjects_Core_D27,
+  DataAbstract_Server_D27,
+  PascalScript_Core_D27;
+
+contains
+  uDAPascalScript in 'uDAPascalScript.pas',
+  uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas',
+  DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas';
+
+end.
diff --git a/Addon/DataAbstract/DataAbstract_Scripting_D27.dproj b/Addon/DataAbstract/DataAbstract_Scripting_D27.dproj
new file mode 100644
index 0000000..880dcbf
--- /dev/null
+++ b/Addon/DataAbstract/DataAbstract_Scripting_D27.dproj
@@ -0,0 +1,169 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{0B9555CA-264E-4A91-A0D1-C431C84E617F}</ProjectGuid>
+			<MainSource>DataAbstract_Scripting_D27.dpk</MainSource>
+			<Base>True</Base>
+			<Config Condition="'$(Config)'==''">Debug</Config>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<ProjectVersion>19.0</ProjectVersion>
+			<FrameworkType>VCL</FrameworkType>
+			<Platform Condition="'$(Platform)'==''">Win32</Platform>
+			<AppType>Package</AppType>
+			<TargetedPlatforms>3</TargetedPlatforms>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
+			<Base_Win64>true</Base_Win64>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
+			<Base_Win32>true</Base_Win32>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''">
+			<Cfg_1>true</Cfg_1>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''">
+			<Cfg_2>true</Cfg_2>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win64)'!=''">
+			<Cfg_2_Win64>true</Cfg_2_Win64>
+			<CfgParent>Cfg_2</CfgParent>
+			<Cfg_2>true</Cfg_2>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace)</DCC_Namespace>
+			<DCC_UsePackage>rtl;$(DCC_UsePackage)</DCC_UsePackage>
+			<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
+			<VerInfo_Keys>CompanyName=RemObjects Software;FileDescription=;FileVersion=3.0.1.361;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=RemObjects SDK;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+			<VerInfo_Locale>1033</VerInfo_Locale>
+			<VerInfo_Build>361</VerInfo_Build>
+			<VerInfo_Release>1</VerInfo_Release>
+			<VerInfo_MajorVer>3</VerInfo_MajorVer>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<GenPackage>true</GenPackage>
+			<DCC_Description>RemObjects Data Abstract - Scripting Integration Library</DCC_Description>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_E>false</DCC_E>
+			<DCC_S>false</DCC_S>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenDll>true</GenDll>
+			<DCC_F>false</DCC_F>
+			<DCC_K>false</DCC_K>
+			<DCC_N>false</DCC_N>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base_Win64)'!=''">
+			<DCC_BplOutput>..\..\Dcu\D27\win64</DCC_BplOutput>
+			<DCC_UnitSearchPath>..\..\Dcu\D27\win64;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_DcpOutput>..\..\Dcu\D27\win64</DCC_DcpOutput>
+			<DCC_DcuOutput>..\..\Dcu\D27\win64</DCC_DcuOutput>
+			<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace)</DCC_Namespace>
+			<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+			<DCC_UsePackage>vcl;$(DCC_UsePackage)</DCC_UsePackage>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base_Win32)'!=''">
+			<DCC_BplOutput>..\..\Dcu\D27\win32</DCC_BplOutput>
+			<DCC_UnitSearchPath>..\..\Dcu\D27\win32;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_DcpOutput>..\..\Dcu\D27\win32</DCC_DcpOutput>
+			<DCC_DcuOutput>..\..\Dcu\D27\win32</DCC_DcuOutput>
+			<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
+			<DCC_UsePackage>vcl;DataAbstract_Scripting_D27;PascalScript_Core_D27;$(DCC_UsePackage)</DCC_UsePackage>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_1)'!=''">
+			<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
+			<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
+			<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+			<DCC_DebugInformation>false</DCC_DebugInformation>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_2)'!=''">
+			<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define>
+			<DCC_Optimize>false</DCC_Optimize>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_2_Win64)'!=''">
+			<DCC_RemoteDebug>true</DCC_RemoteDebug>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="$(MainSource)">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="RemObjects_Core_D27.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D27.dcp"/>
+			<DCCReference Include="PascalScript_Core_D27.dcp"/>
+			<DCCReference Include="uDAPascalScript.pas"/>
+			<DCCReference Include="uDAPSScriptingProvider.pas"/>
+			<DCCReference Include="DataAbstract_Scripting_Reg.pas"/>
+			<BuildConfiguration Include="Debug">
+				<Key>Cfg_2</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Release">
+				<Key>Cfg_1</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Source>
+						<Source Name="MainSource">DataAbstract_Scripting_D27.dpk</Source>
+					</Source>
+					<Parameters/>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="Comments"/>
+					</VersionInfoKeys>
+					<Excluded_Packages>
+						<Excluded_Packages Name="$(BDSBIN)\dcloffice2k170.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+						<Excluded_Packages Name="$(BDSBIN)\dclofficexp170.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+					</Excluded_Packages>
+				</Delphi.Personality>
+				<Platforms>
+					<Platform value="Win64">True</Platform>
+					<Platform value="Win32">True</Platform>
+				</Platforms>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+		<Import Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj" Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')"/>
+	</Project>
diff --git a/Addon/DataAbstract/DataAbstract_Scripting_D27.res b/Addon/DataAbstract/DataAbstract_Scripting_D27.res
new file mode 100644
index 0000000000000000000000000000000000000000..854028b29b9366d58ee41ef0c8ca6b036f70f1da
GIT binary patch
literal 588
zcma))%}T>S6ot>US+w2g!UyQWrIbp8Ac#_|KgC~S=vJauiP%KaiuiE8K_A1tZ(#gp
zhERVty>MslojLd1lRJ^5HeQzA34ht#RQIc3NU*M&K?RzdkZ`0cU9%o2A{y#K=j21y
zLt<<1!RMD`>+4F5-96Wyy~He`KXIvBHaIZw%~U8=rU%$kJ!uScrhDa}8V=J{h^lQo
zM1xgytTk%)!A$h51pFIn60))5j@Tz?yU`=jEj^}c(<_H}rdN=KLxyU>Q}rEjR)9>w
zWsaw(4qZFi#CzIemv*&6%_YcOcY1N`%k&=T#Bqjd{Hy=l+4i%2y-Ncs4KHAIS85ki
zlGfdXV{Yv%rc5#6I~U*43_gMy96NYfworenzGC-&k<N(vyzLRwjhT|SpZ`Ifqi<wx
BPFer}

literal 0
HcmV?d00001

diff --git a/Addon/RemObjects SDK/PascalScript_RO_D27.dpk b/Addon/RemObjects SDK/PascalScript_RO_D27.dpk
new file mode 100644
index 0000000..f058a4e
--- /dev/null
+++ b/Addon/RemObjects SDK/PascalScript_RO_D27.dpk	
@@ -0,0 +1,48 @@
+package PascalScript_RO_D27;
+
+{$R *.res}
+{$IFDEF IMPLICITBUILDING This IFDEF should not be used by users}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION OFF}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DEFINE DEBUG}
+{$ENDIF IMPLICITBUILDING}
+{$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK Integration'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  IndyCore,
+  IndySystem,
+  IndyProtocols,
+  PascalScript_Core_D27,
+  RemObjects_Server_D27,
+  RemObjects_Indy_D27,
+  dbrtl,
+  vcl,
+  vclx;
+
+contains
+  PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas',
+  uROPSServerLink in 'uROPSServerLink.pas',
+  uROPSImports in 'uROPSImports.pas';
+
+end.
diff --git a/Addon/RemObjects SDK/PascalScript_RO_D27.dproj b/Addon/RemObjects SDK/PascalScript_RO_D27.dproj
new file mode 100644
index 0000000..eff0a22
--- /dev/null
+++ b/Addon/RemObjects SDK/PascalScript_RO_D27.dproj	
@@ -0,0 +1,176 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+    <PropertyGroup>
+        <ProjectGuid>{5DF52809-FD88-4459-9EE6-7D9C833B66C6}</ProjectGuid>
+        <MainSource>PascalScript_RO_D27.dpk</MainSource>
+        <Base>True</Base>
+        <Config Condition="'$(Config)'==''">Debug</Config>
+        <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+        <ProjectVersion>19.0</ProjectVersion>
+        <FrameworkType>none</FrameworkType>
+        <Platform Condition="'$(Platform)'==''">Win32</Platform>
+        <AppType>Package</AppType>
+        <TargetedPlatforms>3</TargetedPlatforms>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
+        <Base_Win32>true</Base_Win32>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
+        <Base_Win64>true</Base_Win64>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''">
+        <Cfg_1>true</Cfg_1>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''">
+        <Cfg_2>true</Cfg_2>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win32)'!=''">
+        <Cfg_2_Win32>true</Cfg_2_Win32>
+        <CfgParent>Cfg_2</CfgParent>
+        <Cfg_2>true</Cfg_2>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win64)'!=''">
+        <Cfg_2_Win64>true</Cfg_2_Win64>
+        <CfgParent>Cfg_2</CfgParent>
+        <Cfg_2>true</Cfg_2>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Base)'!=''">
+        <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace>
+        <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
+        <VerInfo_Locale>1033</VerInfo_Locale>
+        <VerInfo_Keys>CompanyName=RemObjects Software;FileDescription=;FileVersion=3.0.6.442;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=Pascal Script;ProductVersion=3.0.0.0;Comments=;CompileDate=Tuesday, March 21, 2006 1:32 PM</VerInfo_Keys>
+        <VerInfo_MajorVer>3</VerInfo_MajorVer>
+        <VerInfo_Release>6</VerInfo_Release>
+        <VerInfo_Build>442</VerInfo_Build>
+        <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+        <DCC_ImageBase>00400000</DCC_ImageBase>
+        <GenPackage>true</GenPackage>
+        <DCC_Description>RemObjects Pascal Script - RemObjects SDK 5.0 Integration</DCC_Description>
+        <DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+        <DCC_S>false</DCC_S>
+        <GenDll>true</GenDll>
+        <DCC_F>false</DCC_F>
+        <DCC_E>false</DCC_E>
+        <DCC_N>false</DCC_N>
+        <DCC_K>false</DCC_K>
+        <SanitizedProjectName>PascalScript_RO_D27</SanitizedProjectName>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Base_Win32)'!=''">
+        <DCC_UnitSearchPath>..\..\Dcu\D27\win32;..\..\RemObjects SDK for Delphi\Dcu\D27\win32;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+        <DCC_BplOutput>..\..\Dcu\D27\win32</DCC_BplOutput>
+        <DCC_DcpOutput>..\..\Dcu\D27\win32</DCC_DcpOutput>
+        <DCC_DcuOutput>..\..\Dcu\D27\win32</DCC_DcuOutput>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Base_Win64)'!=''">
+        <DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace)</DCC_Namespace>
+        <VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName);ProductName=$(MSBuildProjectName)</VerInfo_Keys>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_1)'!=''">
+        <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
+        <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
+        <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+        <DCC_DebugInformation>0</DCC_DebugInformation>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_2)'!=''">
+        <DCC_Define>DEBUG;$(DCC_Define)</DCC_Define>
+        <DCC_Optimize>false</DCC_Optimize>
+        <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
+        <DCC_Description>RemObjects Pascal Script - RemObjects SDK Integration</DCC_Description>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_2_Win64)'!=''">
+        <DCC_RemoteDebug>true</DCC_RemoteDebug>
+    </PropertyGroup>
+    <ItemGroup>
+        <DelphiCompile Include="$(MainSource)">
+            <MainSource>MainSource</MainSource>
+        </DelphiCompile>
+        <DCCReference Include="rtl.dcp"/>
+        <DCCReference Include="IndyCore.dcp"/>
+        <DCCReference Include="IndySystem.dcp"/>
+        <DCCReference Include="IndyProtocols.dcp"/>
+        <DCCReference Include="PascalScript_Core_D27.dcp"/>
+        <DCCReference Include="RemObjects_Server_D27.dcp"/>
+        <DCCReference Include="RemObjects_Indy_D27.dcp"/>
+        <DCCReference Include="dbrtl.dcp"/>
+        <DCCReference Include="vcl.dcp"/>
+        <DCCReference Include="vclx.dcp"/>
+        <DCCReference Include="PascalScript_RO_Reg.pas"/>
+        <DCCReference Include="uROPSServerLink.pas"/>
+        <DCCReference Include="uROPSImports.pas"/>
+        <BuildConfiguration Include="Debug">
+            <Key>Cfg_2</Key>
+            <CfgParent>Base</CfgParent>
+        </BuildConfiguration>
+        <BuildConfiguration Include="Base">
+            <Key>Base</Key>
+        </BuildConfiguration>
+        <BuildConfiguration Include="Release">
+            <Key>Cfg_1</Key>
+            <CfgParent>Base</CfgParent>
+        </BuildConfiguration>
+    </ItemGroup>
+    <Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/>
+    <ProjectExtensions>
+        <Borland.Personality>Delphi.Personality.12</Borland.Personality>
+        <Borland.ProjectType>Package</Borland.ProjectType>
+        <BorlandProject>
+            <Delphi.Personality>
+                <Source>
+                    <Source Name="MainSource">PascalScript_RO_D27.dpk</Source>
+                </Source>
+                <Parameters/>
+                <VersionInfo>
+                    <VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+                    <VersionInfo Name="AutoIncBuild">False</VersionInfo>
+                    <VersionInfo Name="MajorVer">3</VersionInfo>
+                    <VersionInfo Name="MinorVer">0</VersionInfo>
+                    <VersionInfo Name="Release">6</VersionInfo>
+                    <VersionInfo Name="Build">442</VersionInfo>
+                    <VersionInfo Name="Debug">False</VersionInfo>
+                    <VersionInfo Name="PreRelease">False</VersionInfo>
+                    <VersionInfo Name="Special">False</VersionInfo>
+                    <VersionInfo Name="Private">False</VersionInfo>
+                    <VersionInfo Name="DLL">False</VersionInfo>
+                    <VersionInfo Name="Locale">1033</VersionInfo>
+                    <VersionInfo Name="CodePage">1252</VersionInfo>
+                </VersionInfo>
+                <VersionInfoKeys>
+                    <VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+                    <VersionInfoKeys Name="FileDescription"/>
+                    <VersionInfoKeys Name="FileVersion">3.0.6.442</VersionInfoKeys>
+                    <VersionInfoKeys Name="InternalName"/>
+                    <VersionInfoKeys Name="LegalCopyright"/>
+                    <VersionInfoKeys Name="LegalTrademarks"/>
+                    <VersionInfoKeys Name="OriginalFilename"/>
+                    <VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys>
+                    <VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+                    <VersionInfoKeys Name="Comments"/>
+                    <VersionInfoKeys Name="CompileDate">Tuesday, March 21, 2006 1:32 PM</VersionInfoKeys>
+                </VersionInfoKeys>
+            </Delphi.Personality>
+            <Platforms>
+                <Platform value="Android">False</Platform>
+                <Platform value="iOSDevice32">False</Platform>
+                <Platform value="iOSSimulator">False</Platform>
+                <Platform value="Win32">True</Platform>
+                <Platform value="Win64">True</Platform>
+            </Platforms>
+        </BorlandProject>
+        <ProjectFileVersion>12</ProjectFileVersion>
+    </ProjectExtensions>
+    <Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/>
+</Project>
diff --git a/Addon/RemObjects SDK/PascalScript_RO_D27.res b/Addon/RemObjects SDK/PascalScript_RO_D27.res
new file mode 100644
index 0000000000000000000000000000000000000000..1ea58a1c5d57b91aeec4cd154823f672fcb293e3
GIT binary patch
literal 680
zcmZXS%}T>S6opUPAhru};R9shq6;ap4T2(wSbqvuOAOs=ZK77}4{3|^4SXiSw{h<q
zSihMNT6Mxq?%X-|oO|z#BzermBAb}MMx~ISZ-Q~`nXi(YgDQmpv!ff`vYsl$YU)~7
z?3=7-*k*jVU*D36FY4V{vw!11G7G~HX6$xrmp2>^d{d?BYp6%q`g&0U^H2{Ofr>50
zS0G>e%zzwBMi<&5_5{p8V|BsL$)?LLvD_j50lD4l8LNlJL>^irc&B;=nObC^GCa9%
z2VV-Z4{m6A>Z+nz)gCk8tKmJ=1~F}rBgL9o_EqgR>=V3QYB8EUTi+O6!La@>_OEKL
zX>@&J?qFHgnsulF`_xt-MdXm67~`932XqT7MfVB2rd{i+!R1qj$NoTd{2n#5;BPP;
zZr8-*omk$0v~6!M;?(qcLRCh4*`t#C>GF)|i+N*ZSTA)<R_1MlC`9Z+opW;$-N?r3
I8!O`a0TIVrLjV8(

literal 0
HcmV?d00001

diff --git a/Source/PascalScript_Core_D27.dpk b/Source/PascalScript_Core_D27.dpk
new file mode 100644
index 0000000..8c8d112
--- /dev/null
+++ b/Source/PascalScript_Core_D27.dpk
@@ -0,0 +1,78 @@
+package PascalScript_Core_D27;
+
+{$R *.res}
+{$IFDEF IMPLICITBUILDING This IFDEF should not be used by users}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO OFF}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION OFF}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DEFINE DEBUG}
+{$ENDIF IMPLICITBUILDING}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/Source/PascalScript_Core_D27.dproj b/Source/PascalScript_Core_D27.dproj
new file mode 100644
index 0000000..fca676d
--- /dev/null
+++ b/Source/PascalScript_Core_D27.dproj
@@ -0,0 +1,202 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+    <PropertyGroup>
+        <ProjectGuid>{EA463298-00FA-42B3-87EB-DD289B924EA0}</ProjectGuid>
+        <MainSource>PascalScript_Core_D27.dpk</MainSource>
+        <Base>True</Base>
+        <Config Condition="'$(Config)'==''">Release</Config>
+        <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+        <ProjectVersion>19.0</ProjectVersion>
+        <FrameworkType>VCL</FrameworkType>
+        <Platform Condition="'$(Platform)'==''">Win32</Platform>
+        <AppType>Package</AppType>
+        <TargetedPlatforms>3</TargetedPlatforms>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
+        <Base_Win32>true</Base_Win32>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
+        <Base_Win64>true</Base_Win64>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''">
+        <Cfg_1>true</Cfg_1>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''">
+        <Cfg_2>true</Cfg_2>
+        <CfgParent>Base</CfgParent>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win64)'!=''">
+        <Cfg_2_Win64>true</Cfg_2_Win64>
+        <CfgParent>Cfg_2</CfgParent>
+        <Cfg_2>true</Cfg_2>
+        <Base>true</Base>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Base)'!=''">
+        <SanitizedProjectName>PascalScript_Core_D27</SanitizedProjectName>
+        <DCC_UsePackage>rtl;dbrtl;$(DCC_UsePackage)</DCC_UsePackage>
+        <VerInfo_Build>673</VerInfo_Build>
+        <VerInfo_Keys>CompanyName=RemObjects Software;FileDescription=;FileVersion=3.0.29.673;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=Pascal Script;ProductVersion=3.0.0.0;Comments=;CompileDate=Friday, March 21, 2008 1:24 PM</VerInfo_Keys>
+        <VerInfo_Locale>1033</VerInfo_Locale>
+        <VerInfo_MajorVer>3</VerInfo_MajorVer>
+        <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;Winapi;$(DCC_Namespace)</DCC_Namespace>
+        <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
+        <VerInfo_Release>29</VerInfo_Release>
+        <DCC_ImageBase>00400000</DCC_ImageBase>
+        <GenPackage>true</GenPackage>
+        <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+        <DCC_Description>RemObjects Pascal Script - Core Package</DCC_Description>
+        <DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+        <DCC_S>false</DCC_S>
+        <GenDll>true</GenDll>
+        <DCC_F>false</DCC_F>
+        <DCC_E>false</DCC_E>
+        <DCC_N>false</DCC_N>
+        <DCC_K>false</DCC_K>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Base_Win32)'!=''">
+        <DCC_Namespace>System.Win;$(DCC_Namespace)</DCC_Namespace>
+        <DCC_BplOutput>..\Dcu\D27\win32</DCC_BplOutput>
+        <DCC_UnitSearchPath>..\Dcu\D27\win32;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+        <DCC_DcpOutput>..\Dcu\D27\win32</DCC_DcpOutput>
+        <DCC_DcuOutput>..\Dcu\D27\win32</DCC_DcuOutput>
+        <DCC_UsePackage>vcl;PascalScript_Core_D27;$(DCC_UsePackage)</DCC_UsePackage>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Base_Win64)'!=''">
+        <DCC_BplOutput>..\Dcu\D27\win64</DCC_BplOutput>
+        <DCC_UnitSearchPath>..\Dcu\D27\win64;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+        <DCC_DcpOutput>..\Dcu\D27\win64</DCC_DcpOutput>
+        <DCC_DcuOutput>..\Dcu\D27\win64</DCC_DcuOutput>
+        <DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace)</DCC_Namespace>
+        <DCC_UsePackage>vcl;$(DCC_UsePackage)</DCC_UsePackage>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_1)'!=''">
+        <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
+        <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
+        <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+        <DCC_DebugInformation>0</DCC_DebugInformation>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_2)'!=''">
+        <DCC_Define>DEBUG;$(DCC_Define)</DCC_Define>
+        <DCC_Optimize>false</DCC_Optimize>
+        <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+    </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_2_Win64)'!=''">
+        <DCC_RemoteDebug>true</DCC_RemoteDebug>
+    </PropertyGroup>
+    <ItemGroup>
+        <DelphiCompile Include="$(MainSource)">
+            <MainSource>MainSource</MainSource>
+        </DelphiCompile>
+        <DCCReference Include="rtl.dcp"/>
+        <DCCReference Include="vcl.dcp"/>
+        <DCCReference Include="dbrtl.dcp"/>
+        <DCCReference Include="uPSC_extctrls.pas"/>
+        <DCCReference Include="uPSC_forms.pas"/>
+        <DCCReference Include="uPSC_graphics.pas"/>
+        <DCCReference Include="uPSC_menus.pas"/>
+        <DCCReference Include="uPSC_std.pas"/>
+        <DCCReference Include="uPSC_stdctrls.pas"/>
+        <DCCReference Include="uPSCompiler.pas"/>
+        <DCCReference Include="uPSComponent.pas"/>
+        <DCCReference Include="uPSComponent_COM.pas"/>
+        <DCCReference Include="uPSComponent_Controls.pas"/>
+        <DCCReference Include="uPSComponent_DB.pas"/>
+        <DCCReference Include="uPSComponent_Default.pas"/>
+        <DCCReference Include="uPSComponent_Forms.pas"/>
+        <DCCReference Include="uPSComponent_StdCtrls.pas"/>
+        <DCCReference Include="uPSDebugger.pas"/>
+        <DCCReference Include="uPSDisassembly.pas"/>
+        <DCCReference Include="uPSPreProcessor.pas"/>
+        <DCCReference Include="uPSR_buttons.pas"/>
+        <DCCReference Include="uPSR_classes.pas"/>
+        <DCCReference Include="uPSR_comobj.pas"/>
+        <DCCReference Include="uPSR_controls.pas"/>
+        <DCCReference Include="uPSR_dateutils.pas"/>
+        <DCCReference Include="uPSR_DB.pas"/>
+        <DCCReference Include="uPSR_dll.pas"/>
+        <DCCReference Include="uPSR_extctrls.pas"/>
+        <DCCReference Include="uPSR_forms.pas"/>
+        <DCCReference Include="uPSR_graphics.pas"/>
+        <DCCReference Include="uPSR_menus.pas"/>
+        <DCCReference Include="uPSR_std.pas"/>
+        <DCCReference Include="uPSR_stdctrls.pas"/>
+        <DCCReference Include="uPSRuntime.pas"/>
+        <DCCReference Include="uPSUtils.pas"/>
+        <DCCReference Include="uPSC_buttons.pas"/>
+        <DCCReference Include="uPSC_classes.pas"/>
+        <DCCReference Include="uPSC_comobj.pas"/>
+        <DCCReference Include="uPSC_controls.pas"/>
+        <DCCReference Include="uPSC_dateutils.pas"/>
+        <DCCReference Include="uPSC_DB.pas"/>
+        <DCCReference Include="uPSC_dll.pas"/>
+        <DCCReference Include="PascalScript_Core_Reg.pas"/>
+        <BuildConfiguration Include="Debug">
+            <Key>Cfg_2</Key>
+            <CfgParent>Base</CfgParent>
+        </BuildConfiguration>
+        <BuildConfiguration Include="Base">
+            <Key>Base</Key>
+        </BuildConfiguration>
+        <BuildConfiguration Include="Release">
+            <Key>Cfg_1</Key>
+            <CfgParent>Base</CfgParent>
+        </BuildConfiguration>
+    </ItemGroup>
+    <Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+    <ProjectExtensions>
+        <Borland.Personality>Delphi.Personality.12</Borland.Personality>
+        <Borland.ProjectType>Package</Borland.ProjectType>
+        <BorlandProject>
+            <Delphi.Personality>
+                <Source>
+                    <Source Name="MainSource">PascalScript_Core_D27.dpk</Source>
+                </Source>
+                <Parameters/>
+                <VersionInfo>
+                    <VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+                    <VersionInfo Name="AutoIncBuild">False</VersionInfo>
+                    <VersionInfo Name="MajorVer">3</VersionInfo>
+                    <VersionInfo Name="MinorVer">0</VersionInfo>
+                    <VersionInfo Name="Release">29</VersionInfo>
+                    <VersionInfo Name="Build">673</VersionInfo>
+                    <VersionInfo Name="Debug">False</VersionInfo>
+                    <VersionInfo Name="PreRelease">False</VersionInfo>
+                    <VersionInfo Name="Special">False</VersionInfo>
+                    <VersionInfo Name="Private">False</VersionInfo>
+                    <VersionInfo Name="DLL">False</VersionInfo>
+                    <VersionInfo Name="Locale">1033</VersionInfo>
+                    <VersionInfo Name="CodePage">1252</VersionInfo>
+                </VersionInfo>
+                <VersionInfoKeys>
+                    <VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+                    <VersionInfoKeys Name="FileDescription"/>
+                    <VersionInfoKeys Name="FileVersion">3.0.29.673</VersionInfoKeys>
+                    <VersionInfoKeys Name="InternalName"/>
+                    <VersionInfoKeys Name="LegalCopyright"/>
+                    <VersionInfoKeys Name="LegalTrademarks"/>
+                    <VersionInfoKeys Name="OriginalFilename"/>
+                    <VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys>
+                    <VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+                    <VersionInfoKeys Name="Comments"/>
+                    <VersionInfoKeys Name="CompileDate">Friday, March 21, 2008 1:24 PM</VersionInfoKeys>
+                </VersionInfoKeys>
+                <Excluded_Packages/>
+            </Delphi.Personality>
+            <Platforms>
+                <Platform value="Win32">True</Platform>
+                <Platform value="Win64">True</Platform>
+            </Platforms>
+        </BorlandProject>
+        <ProjectFileVersion>12</ProjectFileVersion>
+    </ProjectExtensions>
+    <Import Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj" Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')"/>
+</Project>
diff --git a/Source/PascalScript_Core_D27.res b/Source/PascalScript_Core_D27.res
new file mode 100644
index 0000000000000000000000000000000000000000..cbd3d2c8b29011386d89a5bf7ecc6a3dfcdccdff
GIT binary patch
literal 684
zcmZXS%T5A85JfLA3(>^5aBF1YazX}};3Fi4fDaN8f`p|8c_>C688C)l@Gtxj|Hi$4
z;CQ+x6Hq&;?&|7W_jXmcBxSHLj12eJaFg-*4w!^J^OSaCkel>zJG#*w^O;(BH8ph2
zzQ%lxZ^no7^(~qFl-`qjb~W)+GcgQd#BR5CdLxj4Z=paVP4ocUNY5I;Jkd~7P(zFH
z<jd1B=5q&gqf70QTLClHOkMCxZqsEqu-q-yF?YMy6J8IExiV-?;a%tzWMGj+ZNU@k
zc8CQaN8l!wr=TpVS>;jBs;EO1Y`mmx@|vKh>g&ZStm`*Xm=o<%kJ0Vf8fR#W`)~Zq
z{i_`78f}l9TkWsa8+EA)`@&WsDlk3l6Isedv5ps@`iP%b&c^aEc{(DJ(+N=@uL;tO
zDwg1dO;+5E)hkE`_66IVnqJST%4o0ply*KHzLH8<7;eIQrLx*^HTW}iyfW(ruh*s<
K(OCayDMCNpBwGvs

literal 0
HcmV?d00001

diff --git a/Source/eDefines.inc b/Source/eDefines.inc
index a8bb8c1..dd54c77 100644
--- a/Source/eDefines.inc
+++ b/Source/eDefines.inc
@@ -1146,6 +1146,87 @@
   {$ENDIF}
 {$ENDIF}
 
+{ defines for Delphi XE13 (Delphi 10.4 Sydney) }
+{$IFDEF VER340}
+  {$DEFINE VER140UP}
+  {$DEFINE DELPHI}
+
+  {$DEFINE DELPHI27}
+  {$DEFINE DELPHI1UP}
+  {$DEFINE DELPHI2UP}
+  {$DEFINE DELPHI3UP}
+  {$DEFINE DELPHI4UP}
+  {$DEFINE DELPHI5UP}
+  {$DEFINE DELPHI6UP}
+  {$DEFINE DELPHI7UP}
+  {$DEFINE DELPHI9UP}
+  {$DEFINE DELPHI10UP}
+  {$DEFINE DELPHI11UP}
+  {$DEFINE DELPHI12UP}
+  {$DEFINE DELPHI14UP}
+  {$DEFINE DELPHI15UP}
+  {$DEFINE DELPHI16UP}
+  {$DEFINE DELPHI17UP}
+  {$DEFINE DELPHI18UP}
+  {$DEFINE DELPHI19UP}
+  {$DEFINE DELPHI20UP}
+  {$DEFINE DELPHI21UP}
+  {$DEFINE DELPHI22UP}
+  {$DEFINE DELPHI23UP}
+  {$DEFINE DELPHI24UP}
+  {$DEFINE DELPHI25UP}
+  {$DEFINE DELPHI26UP}
+  {$DEFINE DELPHI27UP}
+
+  {$DEFINE DELPHIXE13}{$DEFINE DELPHI_SYDNEY)
+  {$DEFINE DELPHI2005UP}
+  {$DEFINE DELPHI2006UP}
+  {$DEFINE DELPHI2007UP}
+  {$DEFINE DELPHI2009UP}
+  {$DEFINE DELPHI2010UP}
+  {$DEFINE DELPHIXEUP}
+  {$DEFINE DELPHIXE2UP}
+  {$DEFINE DELPHIXE3UP}
+  {$DEFINE DELPHIXE4UP}
+  {$DEFINE DELPHIXE5UP}
+  {$DEFINE DELPHIXE6UP}
+  {$DEFINE DELPHIXE7UP}
+  {$DEFINE DELPHIXE8UP}
+  {$DEFINE DELPHIXE9UP}{$DEFINE DELPHI_SEATTLE_UP}
+  {$DEFINE DELPHIXE10UP}{$DEFINE DELPHI_BERLIN_UP}
+  {$DEFINE DELPHIXE11UP}{$DEFINE DELPHI_TOKYO_UP}
+  {$DEFINE DELPHIXE12UP}{$DEFINE DELPHI_RIO_UP}
+  {$DEFINE DELPHIXE13UP}{$DEFINE DELPHI_SYDNEY_UP}
+
+  {$DEFINE BDS}
+  {$DEFINE BDS21}
+  {$DEFINE BDS3UP}
+  {$DEFINE BDS4UP}
+  {$DEFINE BDS5UP}
+  {$DEFINE BDS6UP}
+  {$DEFINE BDS7UP}
+  {$DEFINE BDS8UP}
+  {$DEFINE BDS9UP}
+  {$DEFINE BDS10UP}
+  {$DEFINE BDS11UP}
+  {$DEFINE BDS12UP}
+  {$DEFINE BDS14UP}
+  {$DEFINE BDS15UP}
+  {$DEFINE BDS16UP}
+  {$DEFINE BDS17UP}
+  {$DEFINE BDS18UP}
+  {$DEFINE BDS19UP}
+  {$DEFINE BDS20UP}
+  {$DEFINE BDS21UP}
+  {$IFDEF CPUX64}
+    {$DEFINE 64BIT}
+    {$DEFINE CPU64}
+  {$ELSE}
+    {$DEFINE 32BIT}
+    {$DEFINE CPU32}
+  {$ENDIF}
+{$ENDIF}
+
 
 { defines for "Delphi for .NET" }
 {$IFDEF CLR}