Skip to content

Commit 6bb396b

Browse files
First commit beta version
1 parent 6c9465e commit 6bb396b

File tree

377 files changed

+449775
-0
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

377 files changed

+449775
-0
lines changed

Bin32/Register32bit.bat

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
%systemroot%\SysWoW64\regsvr32 "D:\ETHEA\MDShellExtensions\Bin32\MDShellExtensions32.dll"

Bin32/UnRegister32bit.bat

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
%systemroot%\SysWoW64\regsvr32 /u "D:\ETHEA\MDShellExtensions\Bin32\MDShellExtensions32.dll"

Bin64/Register64bit.bat

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
%systemroot%\System32\regsvr32 "D:\ETHEA\MDShellExtensions\Bin64\MDShellExtensions.dll"

Bin64/UnRegister64bit.bat

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1 @@
1+
%systemroot%\System32\regsvr32 /u "D:\ETHEA\MDShellExtensions\Bin64\MDShellExtensions.dll"

Build.bat

Lines changed: 15 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
call "C:\BDS\Studio\21.0\bin\rsvars.bat"
2+
msbuild.exe "Source\MDShellExtensions.dproj" /target:Clean;Build /p:Platform=Win64 /p:config=release
3+
msbuild.exe "Source\MDShellExtensions32.dproj" /target:Clean;Build /p:Platform=Win32 /p:config=release
4+
msbuild.exe "Source\MDTextEditor.dproj" /target:Clean;Build /p:Platform=Win64 /p:config=release
5+
msbuild.exe "Source\MDTextEditor.dproj" /target:Clean;Build /p:Platform=Win32 /p:config=release
6+
7+
:INNO
8+
"C:\Program Files (x86)\Inno Setup 6\iscc.exe" "D:\ETHEA\MDShellExtensions\Setup\MDShellExtensions.iss"
9+
set INNO_STATUS=%ERRORLEVEL%
10+
if %INNO_STATUS%==0 GOTO END
11+
pause
12+
EXIT
13+
14+
:END
15+
pause
Lines changed: 15 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
program PreviewHost;
2+
3+
uses
4+
Vcl.Forms,
5+
uMain in 'uMain.pas' {FrmMain},
6+
uHostPreview in 'uHostPreview.pas';
7+
8+
{$R *.res}
9+
10+
begin
11+
Application.Initialize;
12+
Application.MainFormOnTaskbar := True;
13+
Application.CreateForm(TFrmMain, FrmMain);
14+
Application.Run;
15+
end.
Lines changed: 191 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,191 @@
1+
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
2+
<PropertyGroup>
3+
<ProjectGuid>{b3898e3b-28c0-4d98-8436-5a69b8915599}</ProjectGuid>
4+
<ProjectVersion>19.2</ProjectVersion>
5+
<FrameworkType>VCL</FrameworkType>
6+
<MainSource>PreviewHost.dpr</MainSource>
7+
<Base>True</Base>
8+
<Config Condition="'$(Config)'==''">Debug</Config>
9+
<Platform Condition="'$(Platform)'==''">Win32</Platform>
10+
<TargetedPlatforms>3</TargetedPlatforms>
11+
<AppType>Application</AppType>
12+
</PropertyGroup>
13+
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
14+
<Base>true</Base>
15+
</PropertyGroup>
16+
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
17+
<Base_Win32>true</Base_Win32>
18+
<CfgParent>Base</CfgParent>
19+
<Base>true</Base>
20+
</PropertyGroup>
21+
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
22+
<Base_Win64>true</Base_Win64>
23+
<CfgParent>Base</CfgParent>
24+
<Base>true</Base>
25+
</PropertyGroup>
26+
<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_1)'!=''">
27+
<Cfg_1>true</Cfg_1>
28+
<CfgParent>Base</CfgParent>
29+
<Base>true</Base>
30+
</PropertyGroup>
31+
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_1)'=='true') or '$(Cfg_1_Win32)'!=''">
32+
<Cfg_1_Win32>true</Cfg_1_Win32>
33+
<CfgParent>Cfg_1</CfgParent>
34+
<Cfg_1>true</Cfg_1>
35+
<Base>true</Base>
36+
</PropertyGroup>
37+
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Cfg_1)'=='true') or '$(Cfg_1_Win64)'!=''">
38+
<Cfg_1_Win64>true</Cfg_1_Win64>
39+
<CfgParent>Cfg_1</CfgParent>
40+
<Cfg_1>true</Cfg_1>
41+
<Base>true</Base>
42+
</PropertyGroup>
43+
<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_2)'!=''">
44+
<Cfg_2>true</Cfg_2>
45+
<CfgParent>Base</CfgParent>
46+
<Base>true</Base>
47+
</PropertyGroup>
48+
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win64)'!=''">
49+
<Cfg_2_Win64>true</Cfg_2_Win64>
50+
<CfgParent>Cfg_2</CfgParent>
51+
<Cfg_2>true</Cfg_2>
52+
<Base>true</Base>
53+
</PropertyGroup>
54+
<PropertyGroup Condition="'$(Base)'!=''">
55+
<DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace)</DCC_Namespace>
56+
<Icon_MainIcon>$(BDS)\bin\delphi_PROJECTICON.ico</Icon_MainIcon>
57+
<DCC_UsePackage>fmx;IndySystem;DBXInterBaseDriver;DataSnapClient;DataSnapCommon;DataSnapServer;DataSnapProviderClient;DbxCommonDriver;dbxcds;DBXOracleDriver;CustomIPTransport;dsnap;fmxase;IndyCore;CloudService;inetdbxpress;IPIndyImpl;bindcompfmx;rtl;dbrtl;DbxClientDriver;bindcomp;inetdb;xmlrtl;ibxpress;IndyProtocols;DBXMySQLDriver;bindengine;soaprtl;DBXInformixDriver;DBXFirebirdDriver;inet;fmxobj;DBXSybaseASADriver;fmxdae;dbexpress;DataSnapIndy10ServerTransport;$(DCC_UsePackage)</DCC_UsePackage>
58+
<DCC_DcuOutput>.\$(Platform)\$(Config)</DCC_DcuOutput>
59+
<DCC_ExeOutput>.\Bin</DCC_ExeOutput>
60+
<SanitizedProjectName>PreviewHost</SanitizedProjectName>
61+
<VerInfo_Locale>1040</VerInfo_Locale>
62+
<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>
63+
</PropertyGroup>
64+
<PropertyGroup Condition="'$(Base_Win32)'!=''">
65+
<DCC_UsePackage>JvGlobus;JvMM;JvManagedThreads;JvDlgs;JvCrypt;vclib;inetdbbde;acntDelphiXE2_R;JvNet;JvDotNetCtrls;DBXSybaseASEDriver;vclimg;fmi;vclshlctrls;JvXPCtrls;vcldb;sample;vcldsnap;DBXDb2Driver;JvCore;vclribbon;vcl;DBXMSSQLDriver;JvAppFrm;JvDB;JvRuntimeDesign;webdsnap;JclDeveloperTools;JvDocking;adortl;JvWizards;mbColorLibDXE2;JvHMI;JvBands;vcldbx;JvPluginSystem;JclContainers;DBXOdbcDriver;JvCmp;JvSystem;svnui;SynEdit_RXE2;JvControls;JvTimeFramework;vclactnband;JvJans;JvPrintPreview;JvPageComps;bindcompvcl;JvStdCtrls;JvCustom;Jcl;vclie;vcltouch;websnap;VclSmp;DataSnapConnectors;dsnapcon;JclVcl;JvPascalInterpreter;vclx;svn;bdertl;EurekaLogCore;JvBDE;$(DCC_UsePackage)</DCC_UsePackage>
66+
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
67+
<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
68+
<VerInfo_Locale>1033</VerInfo_Locale>
69+
<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
70+
<AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
71+
<UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
72+
<AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
73+
<UWP_DelphiLogo150>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png</UWP_DelphiLogo150>
74+
</PropertyGroup>
75+
<PropertyGroup Condition="'$(Base_Win64)'!=''">
76+
<DCC_UsePackage>vclib;acntDelphiXE2_R;DBXSybaseASEDriver;vclimg;vclshlctrls;vcldb;vcldsnap;DBXDb2Driver;vclribbon;vcl;DBXMSSQLDriver;webdsnap;adortl;DBXOdbcDriver;SynEdit_RXE2;vclactnband;bindcompvcl;vclie;vcltouch;websnap;VclSmp;DataSnapConnectors;dsnapcon;vclx;$(DCC_UsePackage)</DCC_UsePackage>
77+
<UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
78+
<UWP_DelphiLogo150>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png</UWP_DelphiLogo150>
79+
<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace)</DCC_Namespace>
80+
<BT_BuildType>Debug</BT_BuildType>
81+
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
82+
<VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
83+
<VerInfo_Locale>1033</VerInfo_Locale>
84+
<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
85+
<Debugger_RunParams>D:\ETHEA\SVGIconImageList\Demo\NewSydneyVectors</Debugger_RunParams>
86+
</PropertyGroup>
87+
<PropertyGroup Condition="'$(Cfg_1)'!=''">
88+
<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define>
89+
<DCC_Optimize>false</DCC_Optimize>
90+
<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
91+
<DCC_DebugInfoInExe>true</DCC_DebugInfoInExe>
92+
<DCC_RemoteDebug>true</DCC_RemoteDebug>
93+
<VerInfo_Locale>1040</VerInfo_Locale>
94+
<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>
95+
</PropertyGroup>
96+
<PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
97+
<DCC_RemoteDebug>false</DCC_RemoteDebug>
98+
<BT_BuildType>Debug</BT_BuildType>
99+
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
100+
<VerInfo_Locale>1033</VerInfo_Locale>
101+
<AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
102+
<DCC_UnitSearchPath>D:\ETHEA\ShellControls\Source;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
103+
</PropertyGroup>
104+
<PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">
105+
<AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
106+
<AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
107+
</PropertyGroup>
108+
<PropertyGroup Condition="'$(Cfg_2)'!=''">
109+
<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
110+
<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
111+
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
112+
<DCC_DebugInformation>0</DCC_DebugInformation>
113+
</PropertyGroup>
114+
<PropertyGroup Condition="'$(Cfg_2_Win64)'!=''">
115+
<AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
116+
<AppDPIAwarenessMode>PerMonitorV2</AppDPIAwarenessMode>
117+
</PropertyGroup>
118+
<ItemGroup>
119+
<DelphiCompile Include="$(MainSource)">
120+
<MainSource>MainSource</MainSource>
121+
</DelphiCompile>
122+
<DCCReference Include="uMain.pas">
123+
<Form>FrmMain</Form>
124+
<FormType>dfm</FormType>
125+
</DCCReference>
126+
<DCCReference Include="uHostPreview.pas"/>
127+
<BuildConfiguration Include="Release">
128+
<Key>Cfg_2</Key>
129+
<CfgParent>Base</CfgParent>
130+
</BuildConfiguration>
131+
<BuildConfiguration Include="Base">
132+
<Key>Base</Key>
133+
</BuildConfiguration>
134+
<BuildConfiguration Include="Debug">
135+
<Key>Cfg_1</Key>
136+
<CfgParent>Base</CfgParent>
137+
</BuildConfiguration>
138+
</ItemGroup>
139+
<ProjectExtensions>
140+
<Borland.Personality>Delphi.Personality.12</Borland.Personality>
141+
<Borland.ProjectType/>
142+
<BorlandProject>
143+
<Delphi.Personality>
144+
<VersionInfo>
145+
<VersionInfo Name="IncludeVerInfo">False</VersionInfo>
146+
<VersionInfo Name="AutoIncBuild">False</VersionInfo>
147+
<VersionInfo Name="MajorVer">1</VersionInfo>
148+
<VersionInfo Name="MinorVer">0</VersionInfo>
149+
<VersionInfo Name="Release">0</VersionInfo>
150+
<VersionInfo Name="Build">0</VersionInfo>
151+
<VersionInfo Name="Debug">False</VersionInfo>
152+
<VersionInfo Name="PreRelease">False</VersionInfo>
153+
<VersionInfo Name="Special">False</VersionInfo>
154+
<VersionInfo Name="Private">False</VersionInfo>
155+
<VersionInfo Name="DLL">False</VersionInfo>
156+
<VersionInfo Name="Locale">13322</VersionInfo>
157+
<VersionInfo Name="CodePage">1252</VersionInfo>
158+
</VersionInfo>
159+
<VersionInfoKeys>
160+
<VersionInfoKeys Name="CompanyName"/>
161+
<VersionInfoKeys Name="FileDescription"/>
162+
<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
163+
<VersionInfoKeys Name="InternalName"/>
164+
<VersionInfoKeys Name="LegalCopyright"/>
165+
<VersionInfoKeys Name="LegalTrademarks"/>
166+
<VersionInfoKeys Name="OriginalFilename"/>
167+
<VersionInfoKeys Name="ProductName"/>
168+
<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
169+
<VersionInfoKeys Name="Comments"/>
170+
</VersionInfoKeys>
171+
<Excluded_Packages>
172+
<Excluded_Packages Name="$(BDSBIN)\dcloffice2k270.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
173+
<Excluded_Packages Name="$(BDSBIN)\dclofficexp270.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
174+
</Excluded_Packages>
175+
<Source>
176+
<Source Name="MainSource">PreviewHost.dpr</Source>
177+
</Source>
178+
</Delphi.Personality>
179+
<Deployment Version="3"/>
180+
<Platforms>
181+
<Platform value="Win32">True</Platform>
182+
<Platform value="Win64">True</Platform>
183+
</Platforms>
184+
<ModelSupport>False</ModelSupport>
185+
</BorlandProject>
186+
<ProjectFileVersion>12</ProjectFileVersion>
187+
</ProjectExtensions>
188+
<Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/>
189+
<Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/>
190+
<Import Project="$(MSBuildProjectName).deployproj" Condition="Exists('$(MSBuildProjectName).deployproj')"/>
191+
</Project>
Binary file not shown.

0 commit comments

Comments
 (0)