opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-16 03:30:50 +08:00
Code Issues Packages Projects Releases Wiki Activity

- Create Delphi 11 package for PngComponents (D10 to come)

Browse Source 
- Replace Thany.inc by using compilers.inc
- Set correct output and search directories
This commit is contained in:
Ansgar Becker
2008-03-01 00:24:10 +00:00
parent 45bc241c26
commit be80dc2de2
17 changed files with 246 additions and 287 deletions
Download Patch File Download Diff File Expand all files Collapse all files

242
components/pngcomponents/include/Thany.inc
View File

@ -1,242 +0,0 @@
{$B-}
{$X+}
{$T+}
{$P+}
{$H+}
{$J-}
{$IFNDEF WIN32}
Thany components do not support 16-bit Windows.
{$ENDIF}
{$IFDEF VER170}
{$DEFINE THANY_COMPILER_9}
{$IFDEF BCB}
{$DEFINE THANY_CPPB}
{$DEFINE THANY_CPPB_9}
{$ELSE}
{$DEFINE THANY_DELPHI}
{$DEFINE THANY_DELPHI_9}
{$ENDIF}
{$ENDIF}
{$IFDEF VER150}
{$DEFINE THANY_COMPILER_7}
{$IFDEF BCB}
{$DEFINE THANY_CPPB}
{$DEFINE THANY_CPPB_7}
{$ELSE}
{$DEFINE THANY_DELPHI}
{$DEFINE THANY_DELPHI_7}
{$ENDIF}
{$ENDIF}
{$IFDEF VER140}
{$DEFINE THANY_COMPILER_6}
{$IFDEF BCB}
{$DEFINE THANY_CPPB}
{$DEFINE THANY_CPPB_6}
{$ELSE}
{$DEFINE THANY_DELPHI}
{$DEFINE THANY_DELPHI_6}
{$ENDIF}
{$ENDIF}
{$IFDEF VER130}
{$DEFINE THANY_COMPILER_5}
{$IFDEF BCB}
{$DEFINE THANY_CPPB}
{$DEFINE THANY_CPPB_5}
{$ELSE}
{$DEFINE THANY_DELPHI}
{$DEFINE THANY_DELPHI_5}
{$ENDIF}
{$ENDIF}
{$IFDEF VER125}
{$DEFINE THANY_COMPILER_4}
{$DEFINE THANY_CPPB}
{$DEFINE THANY_CPPB_4}
{$ENDIF}
{$IFDEF VER120}
{$DEFINE THANY_COMPILER_4}
{$DEFINE THANY_DELPHI}
{$DEFINE THANY_DELPHI_4}
{$ENDIF}
{$IFDEF VER110}
{$DEFINE THANY_COMPILER_3}
{$DEFINE THANY_CPPB}
{$DEFINE THANY_CPPB_3}
{$ENDIF}
{$IFDEF VER100}
{$DEFINE THANY_COMPILER_3}
{$DEFINE THANY_DELPHI}
{$DEFINE THANY_DELPHI_3}
{$ENDIF}
{$IFDEF VER93}
{$DEFINE THANY_COMPILER_2}
{$DEFINE THANY_CPPB}
{$DEFINE THANY_CPPB_1}
{$ENDIF}
{$IFDEF VER90}
{$DEFINE THANY_COMPILER_2}
{$DEFINE THANY_DELPHI}
{$DEFINE THANY_DELPHI_2}
{$ENDIF}
{$IFNDEF THANY_CPPB}
{$IFNDEF THANY_DELPHI}
{$DEFINE THANY_UNKNOWN_COMPILER}
{$ENDIF}
{$ENDIF}
{$IFDEF THANY_COMPILER_2}
{$DEFINE THANY_COMPILER_2_UP}
{$ENDIF}
{$IFDEF THANY_COMPILER_3}
{$DEFINE THANY_COMPILER_2_UP}
{$DEFINE THANY_COMPILER_3_UP}
{$ENDIF}
{$IFDEF THANY_COMPILER_4}
{$DEFINE THANY_COMPILER_2_UP}
{$DEFINE THANY_COMPILER_3_UP}
{$DEFINE THANY_COMPILER_4_UP}
{$ENDIF}
{$IFDEF THANY_COMPILER_5}
{$DEFINE THANY_COMPILER_2_UP}
{$DEFINE THANY_COMPILER_3_UP}
{$DEFINE THANY_COMPILER_4_UP}
{$DEFINE THANY_COMPILER_5_UP}
{$ENDIF}
{$IFDEF THANY_COMPILER_6}
{$DEFINE THANY_COMPILER_2_UP}
{$DEFINE THANY_COMPILER_3_UP}
{$DEFINE THANY_COMPILER_4_UP}
{$DEFINE THANY_COMPILER_5_UP}
{$DEFINE THANY_COMPILER_6_UP}
{$ENDIF}
{$IFDEF THANY_COMPILER_7}
{$DEFINE THANY_COMPILER_2_UP}
{$DEFINE THANY_COMPILER_3_UP}
{$DEFINE THANY_COMPILER_4_UP}
{$DEFINE THANY_COMPILER_5_UP}
{$DEFINE THANY_COMPILER_6_UP}
{$DEFINE THANY_COMPILER_7_UP}
{$ENDIF}
{$IFDEF THANY_COMPILER_9}
{$DEFINE THANY_COMPILER_2_UP}
{$DEFINE THANY_COMPILER_3_UP}
{$DEFINE THANY_COMPILER_4_UP}
{$DEFINE THANY_COMPILER_5_UP}
{$DEFINE THANY_COMPILER_6_UP}
{$DEFINE THANY_COMPILER_7_UP}
{$DEFINE THANY_COMPILER_9_UP}
{$ENDIF}
{$IFDEF THANY_DELPHI_2}
{$DEFINE THANY_DELPHI_2_UP}
{$ENDIF}
{$IFDEF THANY_DELPHI_3}
{$DEFINE THANY_DELPHI_2_UP}
{$DEFINE THANY_DELPHI_3_UP}
{$ENDIF}
{$IFDEF THANY_DELPHI_4}
{$DEFINE THANY_DELPHI_2_UP}
{$DEFINE THANY_DELPHI_3_UP}
{$DEFINE THANY_DELPHI_4_UP}
{$ENDIF}
{$IFDEF THANY_DELPHI_5}
{$DEFINE THANY_DELPHI_2_UP}
{$DEFINE THANY_DELPHI_3_UP}
{$DEFINE THANY_DELPHI_4_UP}
{$DEFINE THANY_DELPHI_5_UP}
{$ENDIF}
{$IFDEF THANY_DELPHI_6}
{$DEFINE THANY_DELPHI_2_UP}
{$DEFINE THANY_DELPHI_3_UP}
{$DEFINE THANY_DELPHI_4_UP}
{$DEFINE THANY_DELPHI_5_UP}
{$DEFINE THANY_DELPHI_6_UP}
{$ENDIF}
{$IFDEF THANY_DELPHI_7}
{$DEFINE THANY_DELPHI_2_UP}
{$DEFINE THANY_DELPHI_3_UP}
{$DEFINE THANY_DELPHI_4_UP}
{$DEFINE THANY_DELPHI_5_UP}
{$DEFINE THANY_DELPHI_6_UP}
{$DEFINE THANY_DELPHI_7_UP}
{$ENDIF}
{$IFDEF THANY_DELPHI_9}
{$DEFINE THANY_DELPHI_2_UP}
{$DEFINE THANY_DELPHI_3_UP}
{$DEFINE THANY_DELPHI_4_UP}
{$DEFINE THANY_DELPHI_5_UP}
{$DEFINE THANY_DELPHI_6_UP}
{$DEFINE THANY_DELPHI_7_UP}
{$DEFINE THANY_DELPHI_9_UP}
{$ENDIF}
{$IFDEF THANY_CPPB_3}
{$DEFINE THANY_CPPB_3_UP}
{$ENDIF}
{$IFDEF THANY_CPPB_4}
{$DEFINE THANY_CPPB_3_UP}
{$DEFINE THANY_CPPB_4_UP}
{$ENDIF}
{$IFDEF THANY_CPPB_5}
{$DEFINE THANY_CPPB_3_UP}
{$DEFINE THANY_CPPB_4_UP}
{$DEFINE THANY_CPPB_5_UP}
{$ENDIF}
{$IFDEF THANY_CPPB_6}
{$DEFINE THANY_CPPB_3_UP}
{$DEFINE THANY_CPPB_4_UP}
{$DEFINE THANY_CPPB_5_UP}
{$DEFINE THANY_CPPB_6_UP}
{$ENDIF}
{$IFDEF THANY_CPPB_7}
{$DEFINE THANY_CPPB_3_UP}
{$DEFINE THANY_CPPB_4_UP}
{$DEFINE THANY_CPPB_5_UP}
{$DEFINE THANY_CPPB_6_UP}
{$DEFINE THANY_CPPB_7_UP}
{$ENDIF}
{$IFDEF THANY_CPPB_9}
{$DEFINE THANY_CPPB_3_UP}
{$DEFINE THANY_CPPB_4_UP}
{$DEFINE THANY_CPPB_5_UP}
{$DEFINE THANY_CPPB_6_UP}
{$DEFINE THANY_CPPB_7_UP}
{$DEFINE THANY_CPPB_9_UP}
{$ENDIF}
{$IFDEF THANY_CPPB_3_UP}
// C++Builder requires this if you use Delphi components in run-time packages.
{$ObjExportAll On}
{$ENDIF}
{$IFDEF THANY_COMPILER_7_UP}
{$DEFINE ThemeSupport}
{$ENDIF}

9
components/pngcomponents/packages/PNG.dpk → components/pngcomponents/packages/delphi11/PNG.dpk
View File

@ -1,5 +1,6 @@
package PNG; package PNG;
{$R *.res}
{$ALIGN 8} {$ALIGN 8}
{$ASSERTIONS ON} {$ASSERTIONS ON}
{$BOOLEVAL OFF} {$BOOLEVAL OFF}
@ -21,16 +22,16 @@ package PNG;
{$WRITEABLECONST OFF} {$WRITEABLECONST OFF}
{$MINENUMSIZE 1} {$MINENUMSIZE 1}
{$IMAGEBASE $400000} {$IMAGEBASE $400000}
{$IMPLICITBUILD OFF}
{$DESCRIPTION 'PNG image runtime/designtime'} {$DESCRIPTION 'PNG image runtime/designtime'}
{$IMPLICITBUILD OFF}
requires requires
vcl, vcl,
rtl; rtl;
contains contains
pngimage in '..\source\pngimage.pas', pngimage in '..\..\source\pngimage.pas',
pnglang in '..\source\pnglang.pas', pnglang in '..\..\source\pnglang.pas',
pngzlib in '..\source\pngzlib.pas'; pngzlib in '..\..\source\pngzlib.pas';
end. end.

47
components/pngcomponents/packages/delphi11/PNG.dproj Normal file
View File

@ -0,0 +1,47 @@
<?xml version="1.0" encoding="utf-8"?>
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectGuid>{3adf4b67-001b-48bd-8974-5d17cf2057f3}</ProjectGuid>
<MainSource>PNG.dpk</MainSource>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<DCC_DependencyCheckOutputName>..\..\build\PNG.bpl</DCC_DependencyCheckOutputName>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<Version>7.0</Version>
<DCC_DebugInformation>False</DCC_DebugInformation>
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
<DCC_Define>RELEASE</DCC_Define>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<Version>7.0</Version>
<DCC_DcuOutput>..\..\build</DCC_DcuOutput>
<DCC_ObjOutput>..\..\build</DCC_ObjOutput>
<DCC_HppOutput>..\..\build</DCC_HppOutput>
<DCC_BplOutput>..\..\build</DCC_BplOutput>
<DCC_DcpOutput>..\..\build</DCC_DcpOutput>
<DCC_UnitSearchPath>..\..\build</DCC_UnitSearchPath>
<DCC_ResourcePath>..\..\build</DCC_ResourcePath>
<DCC_ObjPath>..\..\build</DCC_ObjPath>
<DCC_IncludePath>..\..\build</DCC_IncludePath>
</PropertyGroup>
<ProjectExtensions>
<Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType>Package</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">PNG image runtime/designtime</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</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">1031</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">PNG.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
</ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
<ItemGroup>
<DelphiCompile Include="PNG.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\..\source\pngimage.pas" />
<DCCReference Include="..\..\source\pnglang.pas" />
<DCCReference Include="..\..\source\pngzlib.pas" />
<DCCReference Include="rtl.dcp" />
<DCCReference Include="vcl.dcp" />
</ItemGroup>
</Project>

13
components/pngcomponents/packages/PngComponents.dpk → components/pngcomponents/packages/delphi11/PngComponents.dpk
View File

@ -1,5 +1,6 @@
package PngComponents; package PngComponents;
{$R *.res}
{$ALIGN 8} {$ALIGN 8}
{$ASSERTIONS ON} {$ASSERTIONS ON}
{$BOOLEVAL OFF} {$BOOLEVAL OFF}
@ -32,11 +33,11 @@ requires
PNG; PNG;
contains contains
PngSpeedButton in '..\source\PngSpeedButton.pas', PngSpeedButton in '..\..\source\PngSpeedButton.pas',
PngFunctions in '..\source\PngFunctions.pas', PngFunctions in '..\..\source\PngFunctions.pas',
PngImageList in '..\source\PngImageList.pas', PngImageList in '..\..\source\PngImageList.pas',
PngBitBtn in '..\source\PngBitBtn.pas', PngBitBtn in '..\..\source\PngBitBtn.pas',
PngButtonFunctions in '..\source\PngButtonFunctions.pas', PngButtonFunctions in '..\..\source\PngButtonFunctions.pas',
PngCheckListBox in '..\source\PngCheckListBox.pas'; PngCheckListBox in '..\..\source\PngCheckListBox.pas';
end. end.

52
components/pngcomponents/packages/delphi11/PngComponents.dproj Normal file
View File

@ -0,0 +1,52 @@
<?xml version="1.0" encoding="utf-8"?>
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectGuid>{c1b67ac4-6c06-4206-850d-5f5efcc7880b}</ProjectGuid>
<MainSource>PngComponents.dpk</MainSource>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<DCC_DependencyCheckOutputName>..\..\build\PngComponents.bpl</DCC_DependencyCheckOutputName>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<Version>7.0</Version>
<DCC_DebugInformation>False</DCC_DebugInformation>
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
<DCC_Define>RELEASE</DCC_Define>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<Version>7.0</Version>
<DCC_UnitSearchPath>..\..\..\compilerdetection\include;..\..\build</DCC_UnitSearchPath>
<DCC_ResourcePath>..\..\..\compilerdetection\include;..\..\build</DCC_ResourcePath>
<DCC_ObjPath>..\..\..\compilerdetection\include;..\..\build</DCC_ObjPath>
<DCC_IncludePath>..\..\..\compilerdetection\include;..\..\build</DCC_IncludePath>
<DCC_DcuOutput>..\..\build</DCC_DcuOutput>
<DCC_ObjOutput>..\..\build</DCC_ObjOutput>
<DCC_HppOutput>..\..\build</DCC_HppOutput>
<DCC_BplOutput>..\..\build</DCC_BplOutput>
<DCC_DcpOutput>..\..\build</DCC_DcpOutput>
</PropertyGroup>
<ProjectExtensions>
<Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType>Package</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Png components</Package_Options><Package_Options Name="ImplicitBuild">True</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">True</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</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">1031</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">PngComponents.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
</ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
<ItemGroup>
<DelphiCompile Include="PngComponents.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\..\source\PngBitBtn.pas" />
<DCCReference Include="..\..\source\PngButtonFunctions.pas" />
<DCCReference Include="..\..\source\PngCheckListBox.pas" />
<DCCReference Include="..\..\source\PngFunctions.pas" />
<DCCReference Include="..\..\source\PngImageList.pas" />
<DCCReference Include="..\..\source\PngSpeedButton.pas" />
<DCCReference Include="PNG.dcp" />
<DCCReference Include="rtl.dcp" />
<DCCReference Include="vcl.dcp" />
<DCCReference Include="vclactnband.dcp" />
</ItemGroup>
</Project>

49
components/pngcomponents/packages/delphi11/PngComponents.groupproj Normal file
View File

@ -0,0 +1,49 @@
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectGuid>{02633fc8-2f46-4d55-a3cf-c9c04bee06a7}</ProjectGuid>
</PropertyGroup>
<ItemGroup />
<ItemGroup />
<ProjectExtensions>
<Borland.Personality>Default.Personality</Borland.Personality>
<Borland.ProjectType />
<BorlandProject>
<BorlandProject xmlns=""> <Default.Personality> </Default.Personality> </BorlandProject></BorlandProject>
</ProjectExtensions>
<Target Name="PNG">
<MSBuild Projects="PNG.dproj" Targets="" />
</Target>
<Target Name="PNG:Clean">
<MSBuild Projects="PNG.dproj" Targets="Clean" />
</Target>
<Target Name="PNG:Make">
<MSBuild Projects="PNG.dproj" Targets="Make" />
</Target>
<Target Name="PngComponents" DependsOnTargets="PNG">
<MSBuild Projects="PngComponents.dproj" Targets="" />
</Target>
<Target Name="PngComponents:Clean" DependsOnTargets="PNG:Clean">
<MSBuild Projects="PngComponents.dproj" Targets="Clean" />
</Target>
<Target Name="PngComponents:Make" DependsOnTargets="PNG:Make">
<MSBuild Projects="PngComponents.dproj" Targets="Make" />
</Target>
<Target Name="PngComponentsD" DependsOnTargets="PNG;PngComponents">
<MSBuild Projects="PngComponentsD.dproj" Targets="" />
</Target>
<Target Name="PngComponentsD:Clean" DependsOnTargets="PNG:Clean;PngComponents:Clean">
<MSBuild Projects="PngComponentsD.dproj" Targets="Clean" />
</Target>
<Target Name="PngComponentsD:Make" DependsOnTargets="PNG:Make;PngComponents:Make">
<MSBuild Projects="PngComponentsD.dproj" Targets="Make" />
</Target>
<Target Name="Build">
<CallTarget Targets="PNG;PngComponents;PngComponentsD" />
</Target>
<Target Name="Clean">
<CallTarget Targets="PNG:Clean;PngComponents:Clean;PngComponentsD:Clean" />
</Target>
<Target Name="Make">
<CallTarget Targets="PNG:Make;PngComponents:Make;PngComponentsD:Make" />
</Target>
</Project>

9
components/pngcomponents/packages/PngComponentsD.dpk → components/pngcomponents/packages/delphi11/PngComponentsD.dpk
View File

@ -1,6 +1,7 @@
package PngComponentsD; package PngComponentsD;
{$R '..\Design\PngComponents.dcr'} {$R *.res}
{$R '..\..\source\PngComponents.dcr'}
{$ALIGN 8} {$ALIGN 8}
{$ASSERTIONS ON} {$ASSERTIONS ON}
{$BOOLEVAL OFF} {$BOOLEVAL OFF}
@ -31,8 +32,8 @@ requires
PngComponents; PngComponents;
contains contains
PngComponentsRegister in '..\source\PngComponentsRegister.pas', PngComponentsRegister in '..\..\source\PngComponentsRegister.pas',
PngComponentEditors in '..\source\PngComponentEditors.pas', PngComponentEditors in '..\..\source\PngComponentEditors.pas',
PngImageListEditor in '..\source\PngImageListEditor.pas' {PngImageListEditorDlg}; PngImageListEditor in '..\..\source\PngImageListEditor.pas' {PngImageListEditorDlg};
end. end.

50
components/pngcomponents/packages/delphi11/PngComponentsD.dproj Normal file
View File

@ -0,0 +1,50 @@
<?xml version="1.0" encoding="utf-8"?>
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectGuid>{86eae7f6-8975-4793-8cd9-a56637d060d5}</ProjectGuid>
<MainSource>PngComponentsD.dpk</MainSource>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<DCC_DependencyCheckOutputName>..\..\build\PngComponentsD.bpl</DCC_DependencyCheckOutputName>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<Version>7.0</Version>
<DCC_DebugInformation>False</DCC_DebugInformation>
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
<DCC_Define>RELEASE</DCC_Define>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<Version>7.0</Version>
<DCC_UnitSearchPath>..\..\..\compilerdetection\include;..\..\build</DCC_UnitSearchPath>
<DCC_ResourcePath>..\..\..\compilerdetection\include;..\..\build</DCC_ResourcePath>
<DCC_ObjPath>..\..\..\compilerdetection\include;..\..\build</DCC_ObjPath>
<DCC_IncludePath>..\..\..\compilerdetection\include;..\..\build</DCC_IncludePath>
<DCC_DcuOutput>..\..\build</DCC_DcuOutput>
<DCC_ObjOutput>..\..\build</DCC_ObjOutput>
<DCC_HppOutput>..\..\build</DCC_HppOutput>
<DCC_BplOutput>..\..\build</DCC_BplOutput>
<DCC_DcpOutput>..\..\build</DCC_DcpOutput>
</PropertyGroup>
<ProjectExtensions>
<Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType>Package</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Png components designtime</Package_Options><Package_Options Name="ImplicitBuild">True</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</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">1031</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">PngComponentsD.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
</ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
<ItemGroup>
<DelphiCompile Include="PngComponentsD.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\..\source\PngComponentEditors.pas" />
<DCCReference Include="..\..\source\PngComponents.dcr" />
<DCCReference Include="..\..\source\PngComponents.dcr" />
<DCCReference Include="..\..\source\PngComponentsRegister.pas" />
<DCCReference Include="..\..\source\PngImageListEditor.pas">
<Form>PngImageListEditorDlg</Form>
</DCCReference>
<DCCReference Include="designide.dcp" />
</ItemGroup>
</Project>

2
components/pngcomponents/source/PngBitBtn.pas
View File

@ -1,6 +1,6 @@
unit PngBitBtn; unit PngBitBtn;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface

2
components/pngcomponents/source/PngButtonFunctions.pas
View File

@ -1,6 +1,6 @@
unit PngButtonFunctions; unit PngButtonFunctions;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface

8
components/pngcomponents/source/PngCheckListBox.pas
View File

@ -1,6 +1,6 @@
unit PngCheckListBox; unit PngCheckListBox;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface
@ -90,7 +90,7 @@ procedure TPngCheckListBox.DrawItem(Index: Integer; Rect: TRect; State: TOwnerDr
then Inc(Rect.Left, 2) then Inc(Rect.Left, 2)
else Dec(Rect.Right, 2); else Dec(Rect.Right, 2);
Data := ''; Data := '';
{$IFDEF THANY_COMPILER_6_UP} {$IFDEF COMPILER_6_UP}
if (Style in [lbVirtual, lbVirtualOwnerDraw]) if (Style in [lbVirtual, lbVirtualOwnerDraw])
then Data := DoGetData(Index) then Data := DoGetData(Index)
else Data := Items[Index]; else Data := Items[Index];
@ -116,7 +116,7 @@ else begin
then begin then begin
R := Rect; R := Rect;
Enable := Self.Enabled and ItemEnabled[Index]; Enable := Self.Enabled and ItemEnabled[Index];
if {$IFDEF THANY_COMPILER_6_UP} not Header[Index] {$ELSE} True {$ENDIF} if {$IFDEF COMPILER_6_UP} not Header[Index] {$ELSE} True {$ENDIF}
then begin then begin
if not UseRightToLeftAlignment if not UseRightToLeftAlignment
then begin then begin
@ -130,7 +130,7 @@ else begin
DrawCheck(R, Self.State[Index], Enable); DrawCheck(R, Self.State[Index], Enable);
end end
else begin else begin
{$IFDEF THANY_COMPILER_6_UP} {$IFDEF COMPILER_6_UP}
Canvas.Font.Color := HeaderColor; Canvas.Font.Color := HeaderColor;
Canvas.Brush.Color := HeaderBackgroundColor; Canvas.Brush.Color := HeaderBackgroundColor;
{$ENDIF} {$ENDIF}

14
components/pngcomponents/source/PngComponentEditors.pas
View File

@ -1,15 +1,15 @@
unit PngComponentEditors; unit PngComponentEditors;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface
uses uses
Windows, SysUtils, Forms, Classes, Controls, PngImageList, TypInfo, Windows, SysUtils, Forms, Classes, Controls, PngImageList, TypInfo,
{$IFDEF THANY_COMPILER_6_UP} DesignIntf, DesignEditors, ColnEdit {$ELSE} DsgnIntf {$ENDIF}; {$IFDEF COMPILER_6_UP} DesignIntf, DesignEditors, ColnEdit {$ELSE} DsgnIntf {$ENDIF};
type type
{$IFNDEF THANY_COMPILER_6_UP} {$IFNDEF COMPILER_6_UP}
IProperty = TPropertyEditor; IProperty = TPropertyEditor;
IDesignerSelections = TDesignerSelectionList; IDesignerSelections = TDesignerSelectionList;
IDesigner = IFormDesigner; IDesigner = IFormDesigner;
@ -61,7 +61,7 @@ type
TEditProperty = class TEditProperty = class
private private
FPropery: string; FPropery: string;
procedure EnumProperty({$IFDEF THANY_COMPILER_6_UP}const{$ENDIF} Prop: IProperty); procedure EnumProperty({$IFDEF COMPILER_6_UP}const{$ENDIF} Prop: IProperty);
public public
constructor Create(Component: TComponent; const Prop: string; Designer: IDesigner); constructor Create(Component: TComponent; const Prop: string; Designer: IDesigner);
end; end;
@ -173,7 +173,7 @@ end;
{ TD5ComponentEditor } { TD5ComponentEditor }
{$IFNDEF THANY_COMPILER_6_UP} {$IFNDEF COMPILER_6_UP}
function TThanyComponentEditor.GetComponent: TComponent; function TThanyComponentEditor.GetComponent: TComponent;
begin begin
@ -184,7 +184,7 @@ end;
{ TEditProperty } { TEditProperty }
{$IFDEF THANY_COMPILER_6_UP} {$IFDEF COMPILER_6_UP}
constructor TEditProperty.Create(Component: TComponent; const Prop: string; Designer: IDesigner); constructor TEditProperty.Create(Component: TComponent; const Prop: string; Designer: IDesigner);
var var
@ -216,7 +216,7 @@ end;
{$ENDIF} {$ENDIF}
procedure TEditProperty.EnumProperty({$IFDEF THANY_COMPILER_6_UP}const{$ENDIF} Prop: IProperty); procedure TEditProperty.EnumProperty({$IFDEF COMPILER_6_UP}const{$ENDIF} Prop: IProperty);
begin begin
if Prop.GetName = FPropery if Prop.GetName = FPropery
then Prop.Edit; then Prop.Edit;

6
components/pngcomponents/source/PngComponentsRegister.pas
View File

@ -1,11 +1,11 @@
unit PngComponentsRegister; unit PngComponentsRegister;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface
uses uses
Classes, {$IFDEF THANY_COMPILER_6_UP} DesignIntf {$ELSE} DsgnIntf {$ENDIF}, Classes, {$IFDEF COMPILER_6_UP} DesignIntf {$ELSE} DsgnIntf {$ENDIF},
PngSpeedButton, PngBitBtn, PngImageList, PngCheckListBox, PngComponentEditors, PngSpeedButton, PngBitBtn, PngImageList, PngCheckListBox, PngComponentEditors,
TypInfo; TypInfo;
@ -13,7 +13,7 @@ procedure Register;
implementation implementation
{$IFNDEF THANY_COMPILER_7_UP} {$IFNDEF COMPILER_7_UP}
procedure UnlistPublishedProperty(ComponentClass: TClass; const PropertyName: string); procedure UnlistPublishedProperty(ComponentClass: TClass; const PropertyName: string);
var var

2
components/pngcomponents/source/PngFunctions.pas
View File

@ -1,6 +1,6 @@
unit PngFunctions; unit PngFunctions;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface

22
components/pngcomponents/source/PngImageList.pas
View File

@ -1,6 +1,6 @@
unit PngImageList; unit PngImageList;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface
@ -20,7 +20,7 @@ type
FPngOptions: TPngOptions; FPngOptions: TPngOptions;
FLocked: Integer; FLocked: Integer;
procedure SetPngOptions(const Value: TPngOptions); procedure SetPngOptions(const Value: TPngOptions);
{$IFNDEF THANY_COMPILER_7_UP} {$IFNDEF COMPILER_7_UP}
procedure ReadLeft(Reader: TReader); procedure ReadLeft(Reader: TReader);
procedure ReadTop(Reader: TReader); procedure ReadTop(Reader: TReader);
procedure WriteLeft(Writer: TWriter); procedure WriteLeft(Writer: TWriter);
@ -37,7 +37,7 @@ type
function PngToIcon(const Png: TPNGObject; Background: TColor = clNone): HICON; function PngToIcon(const Png: TPNGObject; Background: TColor = clNone): HICON;
procedure CopyPngs; virtual; procedure CopyPngs; virtual;
procedure DoDraw(Index: Integer; Canvas: TCanvas; X, Y: Integer; Style: Cardinal; Enabled: Boolean = True); override; procedure DoDraw(Index: Integer; Canvas: TCanvas; X, Y: Integer; Style: Cardinal; Enabled: Boolean = True); override;
{$IFDEF THANY_COMPILER_7_UP} {$IFDEF COMPILER_7_UP}
procedure ReadData(Stream: TStream); override; procedure ReadData(Stream: TStream); override;
procedure WriteData(Stream: TStream); override; procedure WriteData(Stream: TStream); override;
{$ELSE} {$ELSE}
@ -52,7 +52,7 @@ type
//Patched methods //Patched methods
function Add(Image, Mask: TBitmap): Integer; virtual; function Add(Image, Mask: TBitmap): Integer; virtual;
function AddIcon(Image: TIcon): Integer; virtual; function AddIcon(Image: TIcon): Integer; virtual;
{$IFDEF THANY_COMPILER_7_UP} {$IFDEF COMPILER_7_UP}
function AddImage(Value: TCustomImageList; Index: Integer): Integer; virtual; function AddImage(Value: TCustomImageList; Index: Integer): Integer; virtual;
{$ENDIF} {$ENDIF}
procedure AddImages(Value: TCustomImageList); virtual; procedure AddImages(Value: TCustomImageList); virtual;
@ -207,7 +207,7 @@ then begin
SetLength(Pointers, 14); SetLength(Pointers, 14);
Pointers[0] := Combo(@TCustomImageList.Add, @TPngImageList.Add, 'Add'); Pointers[0] := Combo(@TCustomImageList.Add, @TPngImageList.Add, 'Add');
Pointers[1] := Combo(@TCustomImageList.AddIcon, @TPngImageList.AddIcon, 'AddIcon'); Pointers[1] := Combo(@TCustomImageList.AddIcon, @TPngImageList.AddIcon, 'AddIcon');
{$IFDEF THANY_COMPILER_7_UP} {$IFDEF COMPILER_7_UP}
Pointers[2] := Combo(@TCustomImageList.AddImage, @TPngImageList.AddImage, 'AddImage'); Pointers[2] := Combo(@TCustomImageList.AddImage, @TPngImageList.AddImage, 'AddImage');
{$ELSE} {$ELSE}
Pointers[2] := EmptyCombo; Pointers[2] := EmptyCombo;
@ -438,7 +438,7 @@ type
end; end;
begin begin
if {$IFDEF THANY_COMPILER_7_UP} if {$IFDEF COMPILER_7_UP}
GetComCtlVersion >= ComCtlVersionIE6 GetComCtlVersion >= ComCtlVersionIE6
{$ELSE} False {$ENDIF} then {$ELSE} False {$ENDIF} then
//Windows XP or later, using the modern method: convert every PNG to //Windows XP or later, using the modern method: convert every PNG to
@ -633,7 +633,7 @@ else begin
end; end;
end; end;
{$IFDEF THANY_COMPILER_7_UP} {$IFDEF COMPILER_7_UP}
function TPngImageList.AddImage(Value: TCustomImageList; Index: Integer): Integer; function TPngImageList.AddImage(Value: TCustomImageList; Index: Integer): Integer;
var var
Item: TPngImageCollectionItem; Item: TPngImageCollectionItem;
@ -1096,7 +1096,7 @@ then begin
end; end;
end; end;
{$IFDEF THANY_COMPILER_7_UP} {$IFDEF COMPILER_7_UP}
procedure TPngImageList.ReadData(Stream: TStream); procedure TPngImageList.ReadData(Stream: TStream);
begin begin
@ -1145,7 +1145,7 @@ then begin
end; end;
end; end;
{$IFNDEF THANY_COMPILER_7_UP} {$IFNDEF COMPILER_7_UP}
procedure TPngImageList.ReadLeft(Reader: TReader); procedure TPngImageList.ReadLeft(Reader: TReader);
var var
@ -1229,9 +1229,9 @@ end;
function TPngImageCollectionItems.Add(DontCreatePNG: Boolean = False): TPngImageCollectionItem; function TPngImageCollectionItems.Add(DontCreatePNG: Boolean = False): TPngImageCollectionItem;
begin begin
{$IFDEF THANY_COMPILER_6_UP}{$WARN SYMBOL_DEPRECATED OFF}{$ENDIF} {$IFDEF COMPILER_6_UP}{$WARN SYMBOL_DEPRECATED OFF}{$ENDIF}
Result := TPngImageCollectionItem.Create(Self, DontCreatePNG); Result := TPngImageCollectionItem.Create(Self, DontCreatePNG);
{$IFDEF THANY_COMPILER_6_UP}Added(TCollectionItem(Result));{$ENDIF} {$IFDEF COMPILER_6_UP}Added(TCollectionItem(Result));{$ENDIF}
end; end;
function TPngImageCollectionItems.Insert(Index: Integer; DontCreatePNG: Boolean = False): TPngImageCollectionItem; function TPngImageCollectionItems.Insert(Index: Integer; DontCreatePNG: Boolean = False): TPngImageCollectionItem;

4
components/pngcomponents/source/PngImageListEditor.pas
View File

@ -1,11 +1,11 @@
unit PngImageListEditor; unit PngImageListEditor;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface
uses uses
Windows, Messages, SysUtils, {$IFDEF THANY_COMPILER_6_UP}Variants,{$ENDIF} Windows, Messages, SysUtils, {$IFDEF COMPILER_6_UP}Variants,{$ENDIF}
Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, PngBitBtn, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, PngBitBtn,
ExtCtrls, PngImageList, ExtDlgs, pngimage; ExtCtrls, PngImageList, ExtDlgs, pngimage;

2
components/pngcomponents/source/PngSpeedButton.pas
View File

@ -1,6 +1,6 @@
unit PngSpeedButton; unit PngSpeedButton;
{$I ..\Include\Thany.inc} {$I compilers.inc}
interface interface