From 5cafcc12236190785ae3a0c18699b953d5b64f5e Mon Sep 17 00:00:00 2001 From: Roman Kassebaum Date: Wed, 4 Mar 2015 02:01:10 +0100 Subject: [PATCH] Merged manually. --- .hgignore | 1 + Demos/Advanced/Advanced.dproj | 168 ----- Demos/Minimal/Minimal.dproj | 136 ---- Demos/OLE/OLE.dproj | 136 ---- Demos/Objects/MVCDemo.dproj | 137 ---- Packages/CBuilder XE7/CBuilder.groupproj | 48 -- Packages/CBuilder XE7/VirtualTreesCD.cbproj | 619 ----------------- Packages/CBuilder XE7/VirtualTreesCD.cpp | 17 - Packages/CBuilder XE7/VirtualTreesCR.cbproj | 635 ------------------ Packages/CBuilder XE7/VirtualTreesCR.cpp | 17 - Packages/CBuilder/VirtualTreesCD.cbproj | 64 +- Packages/CBuilder/VirtualTreesCR.cbproj | 188 +++++- Packages/Delphi/VirtualTreesDD.dproj | 46 +- Packages/Delphi/VirtualTreesDR.dpk | 7 +- Packages/Delphi/VirtualTreesDR.dproj | 387 ++++++++++- .../RAD Studio XE7/RAD Studio XE7.groupproj | 48 -- Packages/RAD Studio XE7/VirtualTreesD.dpk | 42 -- Packages/RAD Studio XE7/VirtualTreesD.dproj | 139 ---- Packages/RAD Studio XE7/VirtualTreesR.dpk | 48 -- Packages/RAD Studio XE7/VirtualTreesR.dproj | 449 ------------- Source/hpp/VTAccessibility.hpp | 45 +- Source/hpp/VTAccessibilityFactory.hpp | 25 +- Source/hpp/VTHeaderPopup.hpp | 17 +- Source/hpp/VirtualTrees.Classes.hpp | 107 +++ Source/hpp/VirtualTrees.ClipBoard.hpp | 102 +++ Source/hpp/VirtualTrees.StyleHooks.hpp | 146 ++++ Source/hpp/VirtualTrees.Utils.hpp | 59 ++ Source/hpp/VirtualTrees.WorkerThread.hpp | 69 ++ Source/hpp/VirtualTrees.hpp | 351 ++++------ Source/hpp/VirtualTreesReg.hpp | 29 +- Source/hpp/pasall.hpp | 5 +- 31 files changed, 1331 insertions(+), 2956 deletions(-) delete mode 100644 Demos/Advanced/Advanced.dproj delete mode 100644 Demos/Minimal/Minimal.dproj delete mode 100644 Demos/OLE/OLE.dproj delete mode 100644 Demos/Objects/MVCDemo.dproj delete mode 100644 Packages/CBuilder XE7/CBuilder.groupproj delete mode 100644 Packages/CBuilder XE7/VirtualTreesCD.cbproj delete mode 100644 Packages/CBuilder XE7/VirtualTreesCD.cpp delete mode 100644 Packages/CBuilder XE7/VirtualTreesCR.cbproj delete mode 100644 Packages/CBuilder XE7/VirtualTreesCR.cpp delete mode 100644 Packages/RAD Studio XE7/RAD Studio XE7.groupproj delete mode 100644 Packages/RAD Studio XE7/VirtualTreesD.dpk delete mode 100644 Packages/RAD Studio XE7/VirtualTreesD.dproj delete mode 100644 Packages/RAD Studio XE7/VirtualTreesR.dpk delete mode 100644 Packages/RAD Studio XE7/VirtualTreesR.dproj create mode 100644 Source/hpp/VirtualTrees.Classes.hpp create mode 100644 Source/hpp/VirtualTrees.ClipBoard.hpp create mode 100644 Source/hpp/VirtualTrees.StyleHooks.hpp create mode 100644 Source/hpp/VirtualTrees.Utils.hpp create mode 100644 Source/hpp/VirtualTrees.WorkerThread.hpp diff --git a/.hgignore b/.hgignore index 8389eed..7ddefcc 100644 --- a/.hgignore +++ b/.hgignore @@ -9,3 +9,4 @@ Win32 Win64 Debug Release +*.stat diff --git a/Demos/Advanced/Advanced.dproj b/Demos/Advanced/Advanced.dproj deleted file mode 100644 index 9fd3b4c..0000000 --- a/Demos/Advanced/Advanced.dproj +++ /dev/null @@ -1,168 +0,0 @@ - - - {E5FD8257-AE07-4A8D-AB79-44170493F9A2} - Advanced.dpr - True - Debug - 1 - Application - VCL - 14.4 - Win32 - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - false - true - FileVersion=1.0.0.0 - 1031 - true - false - C:\windows\microsoft.net\framework\v1.1.4322\system.dll;C:\windows\microsoft.net\framework\v1.1.4322\system.data.dll;C:\windows\microsoft.net\framework\v1.1.4322\system.drawing.dll;C:\windows\microsoft.net\framework\v1.1.4322\system.windows.forms.dll;C:\windows\microsoft.net\framework\v1.1.4322\system.xml.dll;vcl;rtl;$(DCC_UsePackage) - 4096 - true - 00400000 - true - false - Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace) - true - true - false - false - ..\..\Source;..\..\Common;$(DCC_UnitSearchPath) - - - 1033 - true - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - $(BDS)\bin\default_app.manifest - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - - - Advanced_Icon.ico - - - 0 - false - RELEASE;$(DCC_Define) - false - - - true - DEBUG;$(DCC_Define) - - - - MainSource - - -
ExtraRes.res
- - -
SpeedForm
- - -
DrawTreeForm
- - -
frmGeneralAbilities
- - -
PropertiesForm
- - -
GridForm
- - - -
VisibilityForm
- - -
AlignForm
- - -
MainForm
- - -
WindowsXPForm
- - -
NodeForm
- - -
HeaderOwnerDrawForm
- - -
StateForm
- - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - Delphi.Personality.12 - - - - - Advanced.dpr - - - False - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 1031 - 1252 - - - 1.0.0.0 - - - - True - False - - - 12 - - - - diff --git a/Demos/Minimal/Minimal.dproj b/Demos/Minimal/Minimal.dproj deleted file mode 100644 index 7f13804..0000000 --- a/Demos/Minimal/Minimal.dproj +++ /dev/null @@ -1,136 +0,0 @@ - - - {9ED56071-1730-40BE-A992-27309A7C55CB} - Minimal.dpr - True - Debug - 1 - Application - VCL - 14.4 - Win32 - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - 1 - false - 1031 - vcl;rtl;vclx;$(DCC_UsePackage) - false - 3 - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - 00400000 - Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace) - false - false - ..\..\Source;$(DCC_UnitSearchPath) - true - - - 1033 - true - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - $(BDS)\bin\default_app.manifest - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - - - Minimal_Icon.ico - - - 0 - false - RELEASE;$(DCC_Define) - false - - - true - false - DEBUG;$(DCC_Define) - - - - MainSource - - -
MainForm
- - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - Delphi.Personality.12 - - - - - Minimal.dpr - - - False - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 1031 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - - True - False - - - 12 - - - - diff --git a/Demos/OLE/OLE.dproj b/Demos/OLE/OLE.dproj deleted file mode 100644 index 60b5bde..0000000 --- a/Demos/OLE/OLE.dproj +++ /dev/null @@ -1,136 +0,0 @@ - - - {3C00F0E3-8F50-46FC-A49D-A7B9DC7DF0A7} - OLE.dpr - True - Debug - 1 - Application - VCL - 16.0 - Win32 - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - OLE - 1 - false - 1031 - vcl;rtl;vclx;$(DCC_UsePackage) - false - 3 - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - 00400000 - Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace) - false - false - ..\..\Source;$(DCC_UnitSearchPath) - true - - - 1033 - true - System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - $(BDS)\bin\default_app.manifest - - - OLE_Icon.ico - - - 0 - false - RELEASE;$(DCC_Define) - 0 - - - true - false - DEBUG;$(DCC_Define) - - - - MainSource - - -
MainForm
- - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - Delphi.Personality.12 - - - - - OLE.dpr - - - False - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 1031 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - - True - False - - - 12 - - - - diff --git a/Demos/Objects/MVCDemo.dproj b/Demos/Objects/MVCDemo.dproj deleted file mode 100644 index 7f1bdc9..0000000 --- a/Demos/Objects/MVCDemo.dproj +++ /dev/null @@ -1,137 +0,0 @@ - - - {6F55E0E5-85F8-4FA9-A27A-459F45DA2FA4} - MVCDemo.dpr - True - Debug - 1 - Application - VCL - 14.4 - Win32 - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - 1 - false - 1031 - vcl;rtl;vclx;$(DCC_UsePackage) - false - 3 - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - 00400000 - Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace) - false - false - ..\..\Source;$(DCC_UnitSearchPath) - true - - - 1033 - true - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - $(BDS)\bin\default_app.manifest - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - - - MVCDemo_Icon.ico - - - 0 - false - RELEASE;$(DCC_Define) - false - - - true - false - DEBUG;$(DCC_Define) - - - - MainSource - - -
fmMVCDemo
- - - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - Delphi.Personality.12 - - - - - MVCDemo.dpr - - - False - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 1031 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - - True - False - - - 12 - - - - diff --git a/Packages/CBuilder XE7/CBuilder.groupproj b/Packages/CBuilder XE7/CBuilder.groupproj deleted file mode 100644 index d45ca9e..0000000 --- a/Packages/CBuilder XE7/CBuilder.groupproj +++ /dev/null @@ -1,48 +0,0 @@ - - - {90943296-FDFA-4C80-A99D-237F570C4F54} - - - - - - - - - - - Default.Personality.12 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/Packages/CBuilder XE7/VirtualTreesCD.cbproj b/Packages/CBuilder XE7/VirtualTreesCD.cbproj deleted file mode 100644 index 5968e74..0000000 --- a/Packages/CBuilder XE7/VirtualTreesCD.cbproj +++ /dev/null @@ -1,619 +0,0 @@ - - - {DE1FB54C-6852-4F59-B4A5-7718E6069FE8} - VirtualTreesCD.cpp - 16.1 - Release - VCL - True - Win32 - 1 - Package - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Cfg_1 - true - true - - - true - Base - true - - - true - Cfg_2 - true - true - - - VirtualTree CBuilder designtime package - ..\..\source - VirtualTreesCD - true - ..\..\source;$(DCC_UnitSearchPath) - 4108 - System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace) - true - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - 6 - -LUDesignIDE - true - bpl - CppPackage - true - true - true - All - true - ..\..\..\..\EMBT\VirtualTree\Design\;..\..\..\..\SourceForge\VirtualTree\Packages\CBuilder XE7\;..\..\Source\;..\RAD Studio XE5\;..\..\Design\;..\..\Common\;$(CG_BOOST_ROOT)\boost\tr1\tr1;$(BDS)\include;$(BDS)\include\windows;$(BDS)\include\windows\rtl;$(BDS)\include\windows\vcl;$(BDS)\include\windows\crtl;$(BDS)\include\windows\sdk;$(CG_BOOST_ROOT);$(IncludePath) - ..\..\..\..\EMBT\VirtualTree\Design\;..\..\..\..\SourceForge\VirtualTree\Packages\CBuilder XE7\;..\RAD Studio XE5\;..\..\Design\;$(BDS)\lib;$(BDS)\lib\obj;$(BDS)\lib\psdk;..\..\source;$(ILINK_LibraryPath) - false - true - true - - - Debug - package=com.embarcadero.$(MSBuildProjectName);label=$(MSBuildProjectName);versionCode=1;versionName=1.0.0;persistent=False;restoreAnyVersion=False;installLocation=preferExternal;largeHeap=False;theme=TitleBar;hardwareAccelerated=true - false - - - $(BDSINCLUDE)\windows\vcl;$(IncludePath) - true - $(BDS)\bin\default_app.manifest - 1033 - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - - - $(BDSINCLUDE)\windows\vcl;$(IncludePath) - 1033 - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) - - - Debug\;$(IncludePath) - false - true - false - true - false - Debug - None - DEBUG - true - true - true - $(BDS)\lib\debug;$(ILINK_LibraryPath) - true - Full - true - - - _DEBUG;$(Defines) - - - Release\;$(IncludePath) - Release - $(BDS)\lib\release;$(ILINK_LibraryPath) - None - - - 1033 - NDEBUG;$(Defines) - - - - 9 - - - 10 - - - 5 - - - 1 - - - 4 - - - 7 - - - 10 - - - 8 - - - 0 - - - 9 - - - 6 - - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - - CPlusPlusBuilder.Personality.12 - CppPackage - - - - VirtualTreesCD.cpp - - - False - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 4108 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - False - - - - - - - False - - False - - True - False - - - Embarcadero C++Builder-Package für Office 2000-Server - Embarcadero C++Builder-Package für Office XP-Server - Microsoft Office 2000 Beispiele für gekapselte Komponenten für Automatisierungsserver - Microsoft Office XP Beispiele für gekapselte Komponenten für Automation Server - - - False - True - True - False - - - - False - False - False - True - False - - - - - true - - - - - true - - - true - - - - - true - - - - - VirtualTreesCD.bpl - true - - - - - true - - - - - true - - - - - true - - - - - true - - - - - true - - - - - true - - - - - 1 - .dylib - - - 0 - .bpl - - - 1 - .dylib - - - 1 - .dylib - - - - - 1 - .dylib - - - 0 - .dll;.bpl - - - - - 1 - - - 1 - - - - - - ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF - 1 - - - - - res\drawable-normal - 1 - - - - - library\lib\x86 - 1 - - - - - 1 - - - 1 - - - - - - library\lib\armeabi-v7a - 1 - - - - - 1 - - - 1 - - - - - res\drawable-xlarge - 1 - - - - - res\drawable-xhdpi - 1 - - - - - 1 - - - 1 - - - - - res\drawable-xxhdpi - 1 - - - - - library\lib\mips - 1 - - - - - res\drawable - 1 - - - - - 1 - - - 1 - - - 0 - - - - - 1 - .framework - - - 0 - - - - - res\drawable-small - 1 - - - - - - 1 - - - Contents\MacOS - 0 - - - - - classes - 1 - - - - - - 1 - - - 1 - - - - - res\drawable - 1 - - - - - Contents\Resources - 1 - - - - - - 1 - - - 1 - - - - - 1 - - - library\lib\armeabi-v7a - 1 - - - 0 - - - 1 - - - 1 - - - - - library\lib\armeabi - 1 - - - - - res\drawable-large - 1 - - - - - 0 - - - 0 - - - 0 - - - 0 - - - 0 - - - - - 1 - - - 1 - - - - - res\drawable-ldpi - 1 - - - - - res\values - 1 - - - - - 1 - - - 1 - - - - - res\drawable-mdpi - 1 - - - - - res\drawable-hdpi - 1 - - - - - 1 - - - - - - - - - - - 12 - - - - diff --git a/Packages/CBuilder XE7/VirtualTreesCD.cpp b/Packages/CBuilder XE7/VirtualTreesCD.cpp deleted file mode 100644 index 37aacb5..0000000 --- a/Packages/CBuilder XE7/VirtualTreesCD.cpp +++ /dev/null @@ -1,17 +0,0 @@ -//--------------------------------------------------------------------------- - -#include -#pragma hdrstop -#pragma package(smart_init) -//--------------------------------------------------------------------------- - -// Package source. -//--------------------------------------------------------------------------- - - -#pragma argsused -int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) -{ - return 1; -} -//--------------------------------------------------------------------------- diff --git a/Packages/CBuilder XE7/VirtualTreesCR.cbproj b/Packages/CBuilder XE7/VirtualTreesCR.cbproj deleted file mode 100644 index 8cde52a..0000000 --- a/Packages/CBuilder XE7/VirtualTreesCR.cbproj +++ /dev/null @@ -1,635 +0,0 @@ - - - {FE6B0D67-74B6-4E30-8AED-CB2B3E77A51F} - VirtualTreesCR.cpp - 16.1 - Release - VCL - True - Win32 - 3 - Package - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Cfg_1 - true - true - - - true - Base - true - - - true - Cfg_2 - true - true - - - true - Cfg_2 - true - true - - - true - VirtualTree CBuilder runtime package - ..\..\source - VirtualTreesCR - Shell32.dll;$(ILINK_DelayLoadDll) - $(BDS)\lib;$(BDS)\lib\$(Platform);$(BDS)\lib\$(Platform)\$(Config);$(DCC_UnitSearchPath) - true - 4108 - System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace) - true - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - 6 - bpl - CppPackage - true - true - true - All - true - $(CG_BOOST_ROOT);$(CG_BOOST_ROOT)\boost\tr1\tr1;..\..\Source\;$(BDS)\include;$(BDS)\include\windows;$(BDS)\include\windows\rtl;$(BDS)\include\windows\vcl;$(BDS)\include\windows\crtl;$(BDS)\include\windows\sdk;$(IncludePath) - ..\..\Source\;$(BDS)\lib;$(BDS)\lib\$(platform);$(BDS)\lib\$(Platform)\$(Config);$(ILINK_LibraryPath) - false - true - true - - - Debug - package=com.embarcadero.$(MSBuildProjectName);label=$(MSBuildProjectName);versionCode=1;versionName=1.0.0;persistent=False;restoreAnyVersion=False;installLocation=preferExternal;largeHeap=False;theme=TitleBar;hardwareAccelerated=true - false - - - $(BDSINCLUDE)\windows\vcl;$(IncludePath) - C:\Program Files (x86)\Embarcadero\DelphiXE5\lib\win32\release\psdk\;$(ILINK_LibraryPath) - true - $(BDS)\bin\default_app.manifest - 1033 - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - - - $(BDSINCLUDE)\windows\vcl;$(IncludePath) - 1033 - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) - - - Debug\;$(IncludePath) - false - true - false - true - false - Debug - None - DEBUG - true - true - true - $(BDS)\lib\debug;$(ILINK_LibraryPath) - true - Full - true - - - _DEBUG;$(Defines) - - - Release\;$(IncludePath) - Release - $(BDS)\lib\release;$(ILINK_LibraryPath) - None - - - 1033 - NDEBUG;$(Defines) - - - 1033 - - - - 9 - true - - - 1 - - - 4 - - - 7 - - - 8 - - - 0 - - - 6 - - - 10 - - - 11 - - - 9 - - - 12 - - - 13 - - - 14 - - - 8 - - - 9 - - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - - CPlusPlusBuilder.Personality.12 - CppPackage - - - - VirtualTreesCR.cpp - - - False - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 4108 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - False - - - - - - - False - - False - - True - False - - - Embarcadero C++Builder-Package für Office 2000-Server - Embarcadero C++Builder-Package für Office XP-Server - Microsoft Office 2000 Beispiele für gekapselte Komponenten für Automatisierungsserver - Microsoft Office XP Beispiele für gekapselte Komponenten für Automation Server - Datei C:\Program Files (x86)\Raize\CS5\Bin\CodeSiteExpressPkg_Design210.bpl nicht gefunden - - - False - True - True - False - - - - False - False - False - True - True - - - - - true - - - - - true - - - - - true - - - - - true - - - - - true - - - - - true - - - - - true - - - - - VirtualTreesCR.bpl - true - - - - - true - - - - - 1 - .dylib - - - 0 - .bpl - - - 1 - .dylib - - - 1 - .dylib - - - - - 1 - .dylib - - - 0 - .dll;.bpl - - - - - 1 - - - 1 - - - - - - ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF - 1 - - - - - res\drawable-normal - 1 - - - - - library\lib\x86 - 1 - - - - - 1 - - - 1 - - - - - - library\lib\armeabi-v7a - 1 - - - - - 1 - - - 1 - - - - - res\drawable-xlarge - 1 - - - - - res\drawable-xhdpi - 1 - - - - - 1 - - - 1 - - - - - res\drawable-xxhdpi - 1 - - - - - library\lib\mips - 1 - - - - - res\drawable - 1 - - - - - 1 - - - 1 - - - 0 - - - - - 1 - .framework - - - 0 - - - - - res\drawable-small - 1 - - - - - - 1 - - - Contents\MacOS - 0 - - - - - classes - 1 - - - - - - 1 - - - 1 - - - - - res\drawable - 1 - - - - - Contents\Resources - 1 - - - - - - 1 - - - 1 - - - - - 1 - - - library\lib\armeabi-v7a - 1 - - - 0 - - - 1 - - - 1 - - - - - library\lib\armeabi - 1 - - - - - res\drawable-large - 1 - - - - - 0 - - - 0 - - - 0 - - - 0 - - - 0 - - - - - 1 - - - 1 - - - - - res\drawable-ldpi - 1 - - - - - res\values - 1 - - - - - 1 - - - 1 - - - - - res\drawable-mdpi - 1 - - - - - res\drawable-hdpi - 1 - - - - - 1 - - - - - - - - - - - 12 - - - - diff --git a/Packages/CBuilder XE7/VirtualTreesCR.cpp b/Packages/CBuilder XE7/VirtualTreesCR.cpp deleted file mode 100644 index 37aacb5..0000000 --- a/Packages/CBuilder XE7/VirtualTreesCR.cpp +++ /dev/null @@ -1,17 +0,0 @@ -//--------------------------------------------------------------------------- - -#include -#pragma hdrstop -#pragma package(smart_init) -//--------------------------------------------------------------------------- - -// Package source. -//--------------------------------------------------------------------------- - - -#pragma argsused -int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) -{ - return 1; -} -//--------------------------------------------------------------------------- diff --git a/Packages/CBuilder/VirtualTreesCD.cbproj b/Packages/CBuilder/VirtualTreesCD.cbproj index ed3bca8..972c396 100644 --- a/Packages/CBuilder/VirtualTreesCD.cbproj +++ b/Packages/CBuilder/VirtualTreesCD.cbproj @@ -2,7 +2,7 @@ {DE1FB54C-6852-4F59-B4A5-7718E6069FE8} VirtualTreesCD.cpp - 16.0 + 17.1 Release None True @@ -28,6 +28,16 @@ Base true + + true + Base + true + + + true + Base + true + true Base @@ -39,6 +49,18 @@ true true + + true + Cfg_1 + true + true + + + true + Cfg_1 + true + true + true Base @@ -50,6 +72,18 @@ true true + + true + Cfg_2 + true + true + + + true + Cfg_2 + true + true + VirtualTree CBuilder designtime package ..\..\source\hpp @@ -77,6 +111,7 @@ true + android-support-v4.dex.jar;apk-expansion.dex.jar;cloud-messaging.dex.jar;fmx.dex.jar;google-analytics-v2.dex.jar;google-play-billing.dex.jar;google-play-licensing.dex.jar;google-play-services.dex.jar Debug package=com.embarcadero.$(MSBuildProjectName);label=$(MSBuildProjectName);versionCode=1;versionName=1.0.0;persistent=False;restoreAnyVersion=False;installLocation=preferExternal;largeHeap=False;theme=TitleBar;hardwareAccelerated=true false @@ -91,6 +126,18 @@ 1033 Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) + + $(MSBuildProjectName) + iPhoneAndiPad + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + Debug + + + $(MSBuildProjectName) + iPhoneAndiPad + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + Debug + Debug\;$(IncludePath) false @@ -112,6 +159,12 @@ _DEBUG;$(Defines) + + true + + + true + Release\;$(IncludePath) Release @@ -122,6 +175,12 @@ 1033 NDEBUG;$(Defines) + + true + + + true + 3 @@ -259,7 +318,8 @@ False - False + False + False False True False diff --git a/Packages/CBuilder/VirtualTreesCR.cbproj b/Packages/CBuilder/VirtualTreesCR.cbproj index f637c87..5cb0c33 100644 --- a/Packages/CBuilder/VirtualTreesCR.cbproj +++ b/Packages/CBuilder/VirtualTreesCR.cbproj @@ -2,7 +2,7 @@ {FE6B0D67-74B6-4E30-8AED-CB2B3E77A51F} VirtualTreesCR.cpp - 16.0 + 17.1 Release VCL True @@ -28,6 +28,16 @@ Base true + + true + Base + true + + + true + Base + true + true Base @@ -39,6 +49,18 @@ true true + + true + Cfg_1 + true + true + + + true + Cfg_1 + true + true + true Base @@ -56,6 +78,18 @@ true true + + true + Cfg_2 + true + true + + + true + Cfg_2 + true + true + VirtualTree CBuilder runtime package ..\..\source\hpp @@ -83,6 +117,7 @@ true + android-support-v4.dex.jar;apk-expansion.dex.jar;cloud-messaging.dex.jar;fmx.dex.jar;google-analytics-v2.dex.jar;google-play-billing.dex.jar;google-play-licensing.dex.jar;google-play-services.dex.jar Debug package=com.embarcadero.$(MSBuildProjectName);label=$(MSBuildProjectName);versionCode=1;versionName=1.0.0;persistent=False;restoreAnyVersion=False;installLocation=preferExternal;largeHeap=False;theme=TitleBar;hardwareAccelerated=true false @@ -100,6 +135,18 @@ 1033 Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace) + + $(MSBuildProjectName) + iPhoneAndiPad + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + Debug + + + $(MSBuildProjectName) + iPhoneAndiPad + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + Debug + Debug\;$(IncludePath) false @@ -121,6 +168,12 @@ _DEBUG;$(Defines) + + true + + + true + Release\;$(IncludePath) Release @@ -134,6 +187,12 @@ 1033 + + true + + + true + 9 @@ -157,9 +216,24 @@ 6 + + 10 + + + 11 + 8 + + 12 + + + 13 + + + 14 + 9 @@ -272,19 +346,20 @@ False - False + False + False False True True - + true - - + + true @@ -298,24 +373,44 @@ true - - + + true - + + VirtualTreesCR.bpl true - + + + true + + + + + true + + + + + true + + + + + true + + + true - + - VirtualTreesCR.bpl true @@ -325,7 +420,7 @@ - + 1 .dylib @@ -341,6 +436,10 @@ 1 .dylib + + 1 + .dylib + @@ -353,16 +452,23 @@ - + 1 1 + + 1 + - + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF 1 @@ -380,12 +486,15 @@ - + 1 1 + + 1 + @@ -395,12 +504,15 @@ - + 1 1 + + 1 + @@ -415,12 +527,15 @@ - + 1 1 + + 1 + @@ -484,12 +599,15 @@ - + 1 1 + + 1 + @@ -505,21 +623,24 @@ - + 1 1 - - - + 1 + + library\lib\armeabi-v7a 1 + + 1 + 0 @@ -529,6 +650,9 @@ 1 + + 1 + @@ -543,10 +667,10 @@ - + 0 - + 0 @@ -558,14 +682,20 @@ 0 + + 0 + - + 1 1 + + 1 + @@ -580,12 +710,15 @@ - + 1 1 + + 1 + @@ -604,9 +737,10 @@ 1 + - + diff --git a/Packages/Delphi/VirtualTreesDD.dproj b/Packages/Delphi/VirtualTreesDD.dproj index 155fd1e..671a9ac 100644 --- a/Packages/Delphi/VirtualTreesDD.dproj +++ b/Packages/Delphi/VirtualTreesDD.dproj @@ -7,7 +7,7 @@ Package VCL DCC32 - 16.0 + 17.1 Win32 1 @@ -19,6 +19,16 @@ Base true + + true + Base + true + + + true + Base + true + true Base @@ -29,6 +39,18 @@ Base true + + true + Cfg_2 + true + true + + + true + Cfg_2 + true + true + VirtualTreesDD .\$(Platform)\$(Config) @@ -53,6 +75,20 @@ Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) vcl;VirtualTreesD;VirtualTreesDR;$(DCC_UsePackage) + + $(MSBuildProjectName) + iPhoneAndiPad + Debug + true + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + + + $(MSBuildProjectName) + iPhoneAndiPad + Debug + true + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + false RELEASE;$(DCC_Define) @@ -64,6 +100,12 @@ false true + + true + + + true + MainSource @@ -127,6 +169,8 @@ + False + False True diff --git a/Packages/Delphi/VirtualTreesDR.dpk b/Packages/Delphi/VirtualTreesDR.dpk index e3c2acf..9275cca 100644 --- a/Packages/Delphi/VirtualTreesDR.dpk +++ b/Packages/Delphi/VirtualTreesDR.dpk @@ -37,7 +37,12 @@ contains VirtualTrees in '..\..\Source\VirtualTrees.pas', VTHeaderPopup in '..\..\Source\VTHeaderPopup.pas', VTAccessibilityFactory in '..\..\Source\VTAccessibilityFactory.pas', - VTAccessibility in '..\..\Source\VTAccessibility.pas'; + VTAccessibility in '..\..\Source\VTAccessibility.pas', + VirtualTrees.Classes in '..\..\Source\VirtualTrees.Classes.pas', + VirtualTrees.ClipBoard in '..\..\Source\VirtualTrees.ClipBoard.pas', + VirtualTrees.StyleHooks in '..\..\Source\VirtualTrees.StyleHooks.pas', + VirtualTrees.Utils in '..\..\Source\VirtualTrees.Utils.pas', + VirtualTrees.WorkerThread in '..\..\Source\VirtualTrees.WorkerThread.pas'; end. diff --git a/Packages/Delphi/VirtualTreesDR.dproj b/Packages/Delphi/VirtualTreesDR.dproj index dff4135..0fe58a8 100644 --- a/Packages/Delphi/VirtualTreesDR.dproj +++ b/Packages/Delphi/VirtualTreesDR.dproj @@ -7,7 +7,7 @@ Package VCL DCC32 - 16.0 + 17.1 Win32 3 @@ -19,6 +19,16 @@ Base true + + true + Base + true + + + true + Base + true + true Base @@ -39,6 +49,18 @@ Base true + + true + Cfg_2 + true + true + + + true + Cfg_2 + true + true + true Cfg_2 @@ -72,9 +94,24 @@ false + android-support-v4.dex.jar;apk-expansion.dex.jar;cloud-messaging.dex.jar;fmx.dex.jar;google-analytics-v2.dex.jar;google-play-billing.dex.jar;google-play-licensing.dex.jar;google-play-services.dex.jar Debug package=com.embarcadero.$(MSBuildProjectName);label=$(MSBuildProjectName);versionCode=1;versionName=1.0.0;persistent=False;restoreAnyVersion=False;installLocation=preferExternal; + + $(MSBuildProjectName) + iPhoneAndiPad + Debug + true + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + + + $(MSBuildProjectName) + iPhoneAndiPad + Debug + true + CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user + Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) @@ -95,6 +132,12 @@ false true + + true + + + true + true @@ -111,6 +154,11 @@ + + + + + Cfg_2 Base @@ -167,14 +215,349 @@ False - False + False + False False True True + + + + VirtualTreesDR.bpl + true + + + + + 1 + .dylib + + + 0 + .bpl + + + 1 + .dylib + + + 1 + .dylib + + + 1 + .dylib + + + + + 1 + .dylib + + + 0 + .dll;.bpl + + + + + 1 + + + 1 + + + 1 + + + + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF + 1 + + + + + res\drawable-normal + 1 + + + + + library\lib\x86 + 1 + + + + + 1 + + + 1 + + + 1 + + + + + + library\lib\armeabi-v7a + 1 + + + + + 1 + + + 1 + + + 1 + + + + + res\drawable-xlarge + 1 + + + + + res\drawable-xhdpi + 1 + + + + + 1 + + + 1 + + + 1 + + + + + res\drawable-xxhdpi + 1 + + + + + library\lib\mips + 1 + + + + + res\drawable + 1 + + + + + 1 + + + 1 + + + 0 + + + + + 1 + .framework + + + 0 + + + + + res\drawable-small + 1 + + + + + + 1 + + + Contents\MacOS + 0 + + + + + classes + 1 + + + + + + 1 + + + 1 + + + 1 + + + + + res\drawable + 1 + + + + + Contents\Resources + 1 + + + + + + 1 + + + 1 + + + 1 + + + + + library\lib\armeabi-v7a + 1 + + + 1 + + + 0 + + + 1 + + + 1 + + + 1 + + + + + library\lib\armeabi + 1 + + + + + res\drawable-large + 1 + + + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + 0 + + + + + 1 + + + 1 + + + 1 + + + + + res\drawable-ldpi + 1 + + + + + res\values + 1 + + + + + 1 + + + 1 + + + 1 + + + + + res\drawable-mdpi + 1 + + + + + res\drawable-hdpi + 1 + + + + + 1 + + + + + + + + + + 12 + diff --git a/Packages/RAD Studio XE7/RAD Studio XE7.groupproj b/Packages/RAD Studio XE7/RAD Studio XE7.groupproj deleted file mode 100644 index 980342d..0000000 --- a/Packages/RAD Studio XE7/RAD Studio XE7.groupproj +++ /dev/null @@ -1,48 +0,0 @@ - - - {CC6A9541-DD5C-4BCD-8914-016D8D2EAB3B} - - - - - - - VirtualTreesR.dproj - - - - Default.Personality.12 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - diff --git a/Packages/RAD Studio XE7/VirtualTreesD.dpk b/Packages/RAD Studio XE7/VirtualTreesD.dpk deleted file mode 100644 index 9644966..0000000 --- a/Packages/RAD Studio XE7/VirtualTreesD.dpk +++ /dev/null @@ -1,42 +0,0 @@ -package VirtualTreesD; - -{$R *.res} -{$R '..\..\Design\VirtualTrees.dcr'} -{$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 OFF} -{$LONGSTRINGS ON} -{$OPENSTRINGS ON} -{$OPTIMIZATION ON} -{$OVERFLOWCHECKS OFF} -{$RANGECHECKS OFF} -{$REFERENCEINFO OFF} -{$SAFEDIVIDE OFF} -{$STACKFRAMES OFF} -{$TYPEDADDRESS OFF} -{$VARSTRINGCHECKS ON} -{$WRITEABLECONST OFF} -{$MINENUMSIZE 1} -{$IMAGEBASE $400000} -{$DEFINE RELEASE} -{$ENDIF IMPLICITBUILDING} -{$DESCRIPTION 'VirtualTreeView Controls'} -{$LIBSUFFIX '21'} -{$DESIGNONLY} -{$IMPLICITBUILD OFF} - -requires - DesignIDE, - VirtualTreesR; - -contains - VirtualTreesReg in '..\..\Design\VirtualTreesReg.pas'; - -end. - diff --git a/Packages/RAD Studio XE7/VirtualTreesD.dproj b/Packages/RAD Studio XE7/VirtualTreesD.dproj deleted file mode 100644 index 409c7ba..0000000 --- a/Packages/RAD Studio XE7/VirtualTreesD.dproj +++ /dev/null @@ -1,139 +0,0 @@ - - - {A34BA07B-19B6-4C21-9DEE-65FCA52D00AB} - VirtualTreesD.dpk - True - Release - Package - VCL - DCC32 - 16.1 - Win32 - 1 - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - VirtualTreesD - ..\..\Source - .\$(Platform)\$(Config) - true - VirtualTreeView Controls - All - 21 - true - ..\..\source;.\$(Platform)\$(Config);$(DCC_UnitSearchPath) - System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace) - 1053 - false - true - 00400000 - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - false - true - false - false - false - - - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - vcl;VirtualTreesR;$(DCC_UsePackage) - - - false - RELEASE;$(DCC_Define) - 0 - 0 - - - DEBUG;$(DCC_Define) - false - true - - - - MainSource - - - - - - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - Delphi.Personality.12 - Package - - - - VirtualTreesD.dpk - - - True - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 1053 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - Embarcadero C++Builder-Package für Office 2000-Server - Embarcadero C++Builder-Package für Office XP-Server - Microsoft Office 2000 Beispiele für gekapselte Komponenten für Automatisierungsserver - Microsoft Office XP Beispiele für gekapselte Komponenten für Automation Server - - - - True - - - 12 - - - - diff --git a/Packages/RAD Studio XE7/VirtualTreesR.dpk b/Packages/RAD Studio XE7/VirtualTreesR.dpk deleted file mode 100644 index 9eb90b8..0000000 --- a/Packages/RAD Studio XE7/VirtualTreesR.dpk +++ /dev/null @@ -1,48 +0,0 @@ -package VirtualTreesR; - -{$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 OFF} -{$LONGSTRINGS ON} -{$OPENSTRINGS ON} -{$OPTIMIZATION ON} -{$OVERFLOWCHECKS OFF} -{$RANGECHECKS OFF} -{$REFERENCEINFO OFF} -{$SAFEDIVIDE OFF} -{$STACKFRAMES OFF} -{$TYPEDADDRESS OFF} -{$VARSTRINGCHECKS ON} -{$WRITEABLECONST OFF} -{$MINENUMSIZE 1} -{$IMAGEBASE $400000} -{$DEFINE RELEASE} -{$ENDIF IMPLICITBUILDING} -{$LIBSUFFIX '21'} -{$RUNONLY} -{$IMPLICITBUILD OFF} - -requires - vcl, - vclx; - -contains - VirtualTrees in '..\..\Source\VirtualTrees.pas', - VTHeaderPopup in '..\..\Source\VTHeaderPopup.pas', - VTAccessibilityFactory in '..\..\Source\VTAccessibilityFactory.pas', - VTAccessibility in '..\..\Source\VTAccessibility.pas', - VirtualTrees.StyleHooks in '..\..\Source\VirtualTrees.StyleHooks.pas', - VirtualTrees.Classes in '..\..\Source\VirtualTrees.Classes.pas', - VirtualTrees.WorkerThread in '..\..\Source\VirtualTrees.WorkerThread.pas', - VirtualTrees.ClipBoard in '..\..\Source\VirtualTrees.ClipBoard.pas', - VirtualTrees.Utils in '..\..\Source\VirtualTrees.Utils.pas'; - -end. - diff --git a/Packages/RAD Studio XE7/VirtualTreesR.dproj b/Packages/RAD Studio XE7/VirtualTreesR.dproj deleted file mode 100644 index f855708..0000000 --- a/Packages/RAD Studio XE7/VirtualTreesR.dproj +++ /dev/null @@ -1,449 +0,0 @@ - - - {B62F3689-96E1-47D5-9FB2-2A2718281FDB} - VirtualTreesR.dpk - True - Release - Package - VCL - DCC32 - 16.1 - Win32 - 3 - - - true - - - true - Base - true - - - true - Base - true - - - true - Base - true - - - true - Cfg_2 - true - true - - - All - VirtualTreesR - .\$(Platform)\$(Config) - ..\..\Source - true - 21 - true - ..\..\source;.\$(Platform)\$(Config);$(DCC_UnitSearchPath) - System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace) - 1053 - false - true - 00400000 - CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - false - true - false - false - false - - - Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) - - - false - RELEASE;$(DCC_Define) - 0 - 0 - - - DEBUG;$(DCC_Define) - false - true - - - true - - - - MainSource - - - - - - - - - - - - - - Cfg_2 - Base - - - Base - - - Cfg_1 - Base - - - - Delphi.Personality.12 - Package - - - - VirtualTreesR.dpk - - - True - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 1053 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - Embarcadero C++Builder-Package für Office 2000-Server - Embarcadero C++Builder-Package für Office XP-Server - Microsoft Office 2000 Beispiele für gekapselte Komponenten für Automatisierungsserver - Microsoft Office XP Beispiele für gekapselte Komponenten für Automation Server - - - - True - True - - - - - VirtualTreesR.bpl - true - - - - - 1 - .dylib - - - 0 - .bpl - - - 1 - .dylib - - - 1 - .dylib - - - - - 1 - .dylib - - - 0 - .dll;.bpl - - - - - 1 - - - 1 - - - - - - ..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF - 1 - - - - - res\drawable-normal - 1 - - - - - library\lib\x86 - 1 - - - - - 1 - - - 1 - - - - - - library\lib\armeabi-v7a - 1 - - - - - 1 - - - 1 - - - - - res\drawable-xlarge - 1 - - - - - res\drawable-xhdpi - 1 - - - - - 1 - - - 1 - - - - - res\drawable-xxhdpi - 1 - - - - - library\lib\mips - 1 - - - - - res\drawable - 1 - - - - - 1 - - - 1 - - - 0 - - - - - 1 - .framework - - - 0 - - - - - res\drawable-small - 1 - - - - - - 1 - - - Contents\MacOS - 0 - - - - - classes - 1 - - - - - - 1 - - - 1 - - - - - res\drawable - 1 - - - - - Contents\Resources - 1 - - - - - - 1 - - - 1 - - - - - 1 - - - library\lib\armeabi-v7a - 1 - - - 0 - - - 1 - - - 1 - - - - - library\lib\armeabi - 1 - - - - - res\drawable-large - 1 - - - - - 0 - - - 0 - - - 0 - - - 0 - - - 0 - - - - - 1 - - - 1 - - - - - res\drawable-ldpi - 1 - - - - - res\values - 1 - - - - - 1 - - - 1 - - - - - res\drawable-mdpi - 1 - - - - - res\drawable-hdpi - 1 - - - - - 1 - - - - - - - - - - - 12 - - - - - diff --git a/Source/hpp/VTAccessibility.hpp b/Source/hpp/VTAccessibility.hpp index b4d2ab2..dff4b1a 100644 --- a/Source/hpp/VTAccessibility.hpp +++ b/Source/hpp/VTAccessibility.hpp @@ -1,8 +1,8 @@ // CodeGear C++Builder -// Copyright (c) 1995, 2014 by Embarcadero Technologies, Inc. +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. // All rights reserved -// (DO NOT EDIT: machine generated header) 'VTAccessibility.pas' rev: 28.00 (Windows) +// (DO NOT EDIT: machine generated header) 'VTAccessibility.pas' rev: 29.00 (Windows) #ifndef VtaccessibilityHPP #define VtaccessibilityHPP @@ -12,23 +12,29 @@ #pragma option -w- // All warnings off #pragma option -Vx // Zero-length empty class member #pragma pack(push,8) -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include //-- user supplied ----------------------------------------------------------- namespace Vtaccessibility { -//-- type declarations ------------------------------------------------------- +//-- forward type declarations ----------------------------------------------- class DELPHICLASS TVirtualTreeAccessibility; +class DELPHICLASS TVirtualTreeItemAccessibility; +class DELPHICLASS TVTMultiColumnItemAccessibility; +class DELPHICLASS TVTDefaultAccessibleProvider; +class DELPHICLASS TVTDefaultAccessibleItemProvider; +class DELPHICLASS TVTMultiColumnAccessibleItemProvider; +//-- type declarations ------------------------------------------------------- #pragma pack(push,4) class PASCALIMPLEMENTATION TVirtualTreeAccessibility : public System::TInterfacedObject { @@ -76,7 +82,7 @@ class PASCALIMPLEMENTATION TVirtualTreeAccessibility : public System::TInterface operator _di_IAccessible() { _di_IAccessible intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -87,7 +93,7 @@ class PASCALIMPLEMENTATION TVirtualTreeAccessibility : public System::TInterface operator _di_IDispatch() { _di_IDispatch intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -98,7 +104,6 @@ class PASCALIMPLEMENTATION TVirtualTreeAccessibility : public System::TInterface #pragma pack(pop) -class DELPHICLASS TVirtualTreeItemAccessibility; #pragma pack(push,4) class PASCALIMPLEMENTATION TVirtualTreeItemAccessibility : public TVirtualTreeAccessibility { @@ -130,7 +135,7 @@ class PASCALIMPLEMENTATION TVirtualTreeItemAccessibility : public TVirtualTreeAc operator _di_IAccessible() { _di_IAccessible intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -141,7 +146,6 @@ class PASCALIMPLEMENTATION TVirtualTreeItemAccessibility : public TVirtualTreeAc #pragma pack(pop) -class DELPHICLASS TVTMultiColumnItemAccessibility; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTMultiColumnItemAccessibility : public TVirtualTreeItemAccessibility { @@ -168,7 +172,7 @@ class PASCALIMPLEMENTATION TVTMultiColumnItemAccessibility : public TVirtualTree operator _di_IAccessible() { _di_IAccessible intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -179,7 +183,6 @@ class PASCALIMPLEMENTATION TVTMultiColumnItemAccessibility : public TVirtualTree #pragma pack(pop) -class DELPHICLASS TVTDefaultAccessibleProvider; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTDefaultAccessibleProvider : public System::TInterfacedObject { @@ -201,7 +204,6 @@ class PASCALIMPLEMENTATION TVTDefaultAccessibleProvider : public System::TInterf #pragma pack(pop) -class DELPHICLASS TVTDefaultAccessibleItemProvider; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTDefaultAccessibleItemProvider : public System::TInterfacedObject { @@ -223,7 +225,6 @@ class PASCALIMPLEMENTATION TVTDefaultAccessibleItemProvider : public System::TIn #pragma pack(pop) -class DELPHICLASS TVTMultiColumnAccessibleItemProvider; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTMultiColumnAccessibleItemProvider : public System::TInterfacedObject { diff --git a/Source/hpp/VTAccessibilityFactory.hpp b/Source/hpp/VTAccessibilityFactory.hpp index 3657aa0..7fbccca 100644 --- a/Source/hpp/VTAccessibilityFactory.hpp +++ b/Source/hpp/VTAccessibilityFactory.hpp @@ -1,8 +1,8 @@ // CodeGear C++Builder -// Copyright (c) 1995, 2014 by Embarcadero Technologies, Inc. +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. // All rights reserved -// (DO NOT EDIT: machine generated header) 'VTAccessibilityFactory.pas' rev: 28.00 (Windows) +// (DO NOT EDIT: machine generated header) 'VTAccessibilityFactory.pas' rev: 29.00 (Windows) #ifndef VtaccessibilityfactoryHPP #define VtaccessibilityfactoryHPP @@ -12,27 +12,26 @@ #pragma option -w- // All warnings off #pragma option -Vx // Zero-length empty class member #pragma pack(push,8) -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit +#include +#include +#include +#include +#include //-- user supplied ----------------------------------------------------------- namespace Vtaccessibilityfactory { -//-- type declarations ------------------------------------------------------- +//-- forward type declarations ----------------------------------------------- __interface IVTAccessibleProvider; typedef System::DelphiInterface _di_IVTAccessibleProvider; +class DELPHICLASS TVTAccessibilityFactory; +//-- type declarations ------------------------------------------------------- __interface IVTAccessibleProvider : public System::IInterface { - -public: virtual _di_IAccessible __fastcall CreateIAccessible(Virtualtrees::TBaseVirtualTree* ATree) = 0 ; }; -class DELPHICLASS TVTAccessibilityFactory; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTAccessibilityFactory : public System::TObject { @@ -51,8 +50,8 @@ class PASCALIMPLEMENTATION TVTAccessibilityFactory : public System::TObject __fastcall virtual ~TVTAccessibilityFactory(void); _di_IAccessible __fastcall CreateIAccessible(Virtualtrees::TBaseVirtualTree* ATree); static TVTAccessibilityFactory* __fastcall GetAccessibilityFactory(); - void __fastcall RegisterAccessibleProvider(_di_IVTAccessibleProvider AProvider); - void __fastcall UnRegisterAccessibleProvider(_di_IVTAccessibleProvider AProvider); + void __fastcall RegisterAccessibleProvider(const _di_IVTAccessibleProvider AProvider); + void __fastcall UnRegisterAccessibleProvider(const _di_IVTAccessibleProvider AProvider); }; #pragma pack(pop) diff --git a/Source/hpp/VTHeaderPopup.hpp b/Source/hpp/VTHeaderPopup.hpp index aadf89d..9d3d25e 100644 --- a/Source/hpp/VTHeaderPopup.hpp +++ b/Source/hpp/VTHeaderPopup.hpp @@ -1,8 +1,8 @@ // CodeGear C++Builder -// Copyright (c) 1995, 2014 by Embarcadero Technologies, Inc. +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. // All rights reserved -// (DO NOT EDIT: machine generated header) 'VTHeaderPopup.pas' rev: 28.00 (Windows) +// (DO NOT EDIT: machine generated header) 'VTHeaderPopup.pas' rev: 29.00 (Windows) #ifndef VtheaderpopupHPP #define VtheaderpopupHPP @@ -12,16 +12,18 @@ #pragma option -w- // All warnings off #pragma option -Vx // Zero-length empty class member #pragma pack(push,8) -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit +#include +#include +#include +#include +#include //-- user supplied ----------------------------------------------------------- namespace Vtheaderpopup { +//-- forward type declarations ----------------------------------------------- +class DELPHICLASS TVTHeaderPopupMenu; //-- type declarations ------------------------------------------------------- enum DECLSPEC_DENUM TVTHeaderPopupOption : unsigned char { poOriginalOrder, poAllowHideAll, poResizeToFitItem }; @@ -35,7 +37,6 @@ typedef void __fastcall (__closure *TColumnChangeEvent)(Virtualtrees::TBaseVirtu typedef Vcl::Menus::TMenuItem TVTMenuItem; -class DELPHICLASS TVTHeaderPopupMenu; class PASCALIMPLEMENTATION TVTHeaderPopupMenu : public Vcl::Menus::TPopupMenu { typedef Vcl::Menus::TPopupMenu inherited; diff --git a/Source/hpp/VirtualTrees.Classes.hpp b/Source/hpp/VirtualTrees.Classes.hpp new file mode 100644 index 0000000..7a55ffc --- /dev/null +++ b/Source/hpp/VirtualTrees.Classes.hpp @@ -0,0 +1,107 @@ +// CodeGear C++Builder +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'VirtualTrees.Classes.pas' rev: 29.00 (Windows) + +#ifndef Virtualtrees_ClassesHPP +#define Virtualtrees_ClassesHPP + +#pragma delphiheader begin +#pragma option push +#pragma option -w- // All warnings off +#pragma option -Vx // Zero-length empty class member +#pragma pack(push,8) +#include +#include +#include + +//-- user supplied ----------------------------------------------------------- + +namespace Virtualtrees +{ +namespace Classes +{ +//-- forward type declarations ----------------------------------------------- +class DELPHICLASS TBufferedAnsiString; +class DELPHICLASS TWideBufferedString; +class DELPHICLASS TCriticalSection; +//-- type declarations ------------------------------------------------------- +#pragma pack(push,4) +class PASCALIMPLEMENTATION TBufferedAnsiString : public System::TObject +{ + typedef System::TObject inherited; + +private: + char *FStart; + char *FPosition; + char *FEnd; + System::RawByteString __fastcall GetAsString(void); + +public: + __fastcall virtual ~TBufferedAnsiString(void); + void __fastcall Add(const System::RawByteString S); + void __fastcall AddNewLine(void); + __property System::RawByteString AsString = {read=GetAsString}; +public: + /* TObject.Create */ inline __fastcall TBufferedAnsiString(void) : System::TObject() { } + +}; + +#pragma pack(pop) + +#pragma pack(push,4) +class PASCALIMPLEMENTATION TWideBufferedString : public System::TObject +{ + typedef System::TObject inherited; + +private: + System::WideChar *FStart; + System::WideChar *FPosition; + System::WideChar *FEnd; + System::UnicodeString __fastcall GetAsString(void); + +public: + __fastcall virtual ~TWideBufferedString(void); + void __fastcall Add(const System::UnicodeString S); + void __fastcall AddNewLine(void); + __property System::UnicodeString AsString = {read=GetAsString}; +public: + /* TObject.Create */ inline __fastcall TWideBufferedString(void) : System::TObject() { } + +}; + +#pragma pack(pop) + +#pragma pack(push,4) +class PASCALIMPLEMENTATION TCriticalSection : public System::TObject +{ + typedef System::TObject inherited; + +protected: + _RTL_CRITICAL_SECTION FSection; + +public: + __fastcall TCriticalSection(void); + __fastcall virtual ~TCriticalSection(void); + void __fastcall Enter(void); + void __fastcall Leave(void); +}; + +#pragma pack(pop) + +//-- var, const, procedure --------------------------------------------------- +} /* namespace Classes */ +} /* namespace Virtualtrees */ +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES_CLASSES) +using namespace Virtualtrees::Classes; +#endif +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES) +using namespace Virtualtrees; +#endif +#pragma pack(pop) +#pragma option pop + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // Virtualtrees_ClassesHPP diff --git a/Source/hpp/VirtualTrees.ClipBoard.hpp b/Source/hpp/VirtualTrees.ClipBoard.hpp new file mode 100644 index 0000000..1a1f980 --- /dev/null +++ b/Source/hpp/VirtualTrees.ClipBoard.hpp @@ -0,0 +1,102 @@ +// CodeGear C++Builder +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'VirtualTrees.ClipBoard.pas' rev: 29.00 (Windows) + +#ifndef Virtualtrees_ClipboardHPP +#define Virtualtrees_ClipboardHPP + +#pragma delphiheader begin +#pragma option push +#pragma option -w- // All warnings off +#pragma option -Vx // Zero-length empty class member +#pragma pack(push,8) +#include +#include +#include +#include +#include +#include + +//-- user supplied ----------------------------------------------------------- + +namespace Virtualtrees +{ +namespace Clipboard +{ +//-- forward type declarations ----------------------------------------------- +struct TClipboardFormatEntry; +struct TClipboardFormatListEntry; +class DELPHICLASS TClipboardFormatList; +//-- type declarations ------------------------------------------------------- +struct DECLSPEC_DRECORD TClipboardFormatEntry +{ +public: + System::Word ID; + System::UnicodeString Description; +}; + + +typedef System::StaticArray Virtualtrees_Clipboard__1; + +typedef TClipboardFormatListEntry *PClipboardFormatListEntry; + +struct DECLSPEC_DRECORD TClipboardFormatListEntry +{ +public: + System::UnicodeString Description; + Virtualtrees::TVirtualTreeClass TreeClass; + unsigned Priority; + tagFORMATETC FormatEtc; +}; + + +#pragma pack(push,4) +class PASCALIMPLEMENTATION TClipboardFormatList : public System::TObject +{ + typedef System::TObject inherited; + +private: + static System::Classes::TList* FList; + +protected: + __classmethod void __fastcall Sort(); + +public: + __classmethod void __fastcall Add(const System::UnicodeString FormatString, Virtualtrees::TVirtualTreeClass AClass, unsigned Priority, const tagFORMATETC &AFormatEtc); + __classmethod void __fastcall Clear(); + __classmethod void __fastcall EnumerateFormats(Virtualtrees::TVirtualTreeClass TreeClass, Virtualtrees::TFormatEtcArray &Formats, Virtualtrees::TClipboardFormats* const AllowedFormats = (Virtualtrees::TClipboardFormats*)(0x0))/* overload */; + __classmethod void __fastcall EnumerateFormats(Virtualtrees::TVirtualTreeClass TreeClass, System::Classes::TStrings* const Formats)/* overload */; + __classmethod PClipboardFormatListEntry __fastcall FindFormat(const System::UnicodeString FormatString)/* overload */; + __classmethod Virtualtrees::TVirtualTreeClass __fastcall FindFormat(const System::UnicodeString FormatString, System::Word &Fmt)/* overload */; + __classmethod Virtualtrees::TVirtualTreeClass __fastcall FindFormat(System::Word Fmt, System::UnicodeString &Description)/* overload */; +public: + /* TObject.Create */ inline __fastcall TClipboardFormatList(void) : System::TObject() { } + /* TObject.Destroy */ inline __fastcall virtual ~TClipboardFormatList(void) { } + +}; + +#pragma pack(pop) + +//-- var, const, procedure --------------------------------------------------- +extern DELPHI_PACKAGE Virtualtrees_Clipboard__1 ClipboardDescriptions; +extern DELPHI_PACKAGE void __fastcall EnumerateVTClipboardFormats(Virtualtrees::TVirtualTreeClass TreeClass, System::Classes::TStrings* const List)/* overload */; +extern DELPHI_PACKAGE void __fastcall EnumerateVTClipboardFormats(Virtualtrees::TVirtualTreeClass TreeClass, Virtualtrees::TFormatEtcArray &Formats)/* overload */; +extern DELPHI_PACKAGE System::UnicodeString __fastcall GetVTClipboardFormatDescription(System::Word AFormat); +extern DELPHI_PACKAGE void __fastcall RegisterVTClipboardFormat(System::Word AFormat, Virtualtrees::TVirtualTreeClass TreeClass, unsigned Priority)/* overload */; +extern DELPHI_PACKAGE System::Word __fastcall RegisterVTClipboardFormat(const System::UnicodeString Description, Virtualtrees::TVirtualTreeClass TreeClass, unsigned Priority, int tymed = 0x1, Winapi::Activex::PDVTargetDevice ptd = (Winapi::Activex::PDVTargetDevice)(0x0), int dwAspect = 0x1, int lindex = 0xffffffff)/* overload */; +} /* namespace Clipboard */ +} /* namespace Virtualtrees */ +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES_CLIPBOARD) +using namespace Virtualtrees::Clipboard; +#endif +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES) +using namespace Virtualtrees; +#endif +#pragma pack(pop) +#pragma option pop + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // Virtualtrees_ClipboardHPP diff --git a/Source/hpp/VirtualTrees.StyleHooks.hpp b/Source/hpp/VirtualTrees.StyleHooks.hpp new file mode 100644 index 0000000..9258d5a --- /dev/null +++ b/Source/hpp/VirtualTrees.StyleHooks.hpp @@ -0,0 +1,146 @@ +// CodeGear C++Builder +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'VirtualTrees.StyleHooks.pas' rev: 29.00 (Windows) + +#ifndef Virtualtrees_StylehooksHPP +#define Virtualtrees_StylehooksHPP + +#pragma delphiheader begin +#pragma option push +#pragma option -w- // All warnings off +#pragma option -Vx // Zero-length empty class member +#pragma pack(push,8) +#include +#include +#include +#include +#include +#include +#include +#include +#include + +//-- user supplied ----------------------------------------------------------- + +namespace Virtualtrees +{ +namespace Stylehooks +{ +//-- forward type declarations ----------------------------------------------- +class DELPHICLASS TVclStyleScrollBarsHook; +//-- type declarations ------------------------------------------------------- +#pragma pack(push,4) +class PASCALIMPLEMENTATION TVclStyleScrollBarsHook : public Vcl::Themes::TMouseTrackControlStyleHook +{ + typedef Vcl::Themes::TMouseTrackControlStyleHook inherited; + + +private: + class DELPHICLASS TVclStyleScrollBarWindow; + #pragma pack(push,8) + class PASCALIMPLEMENTATION TVclStyleScrollBarWindow : public Vcl::Controls::TWinControl + { + typedef Vcl::Controls::TWinControl inherited; + + private: + TVclStyleScrollBarsHook* FScrollBarWindowOwner; + bool FScrollBarVertical; + bool FScrollBarVisible; + bool FScrollBarEnabled; + HIDESBASE MESSAGE void __fastcall WMNCHitTest(Winapi::Messages::TWMNCHitTest &Msg); + HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Winapi::Messages::TMessage &Msg); + HIDESBASE MESSAGE void __fastcall WMPaint(Winapi::Messages::TWMPaint &Msg); + + protected: + virtual void __fastcall CreateParams(Vcl::Controls::TCreateParams &Params); + + public: + __fastcall virtual TVclStyleScrollBarWindow(System::Classes::TComponent* AOwner); + __property TVclStyleScrollBarsHook* ScrollBarWindowOwner = {read=FScrollBarWindowOwner, write=FScrollBarWindowOwner}; + __property bool ScrollBarVertical = {read=FScrollBarVertical, write=FScrollBarVertical, nodefault}; + __property bool ScrollBarVisible = {read=FScrollBarVisible, write=FScrollBarVisible, nodefault}; + __property bool ScrollBarEnabled = {read=FScrollBarEnabled, write=FScrollBarEnabled, nodefault}; + public: + /* TWinControl.CreateParented */ inline __fastcall TVclStyleScrollBarWindow(HWND ParentWindow) : Vcl::Controls::TWinControl(ParentWindow) { } + /* TWinControl.Destroy */ inline __fastcall virtual ~TVclStyleScrollBarWindow(void) { } + + }; + + #pragma pack(pop) + + +private: + System::Types::TRect FHorzScrollBarDownButtonRect; + Vcl::Themes::TThemedScrollBar FHorzScrollBarDownButtonState; + System::Types::TRect FHorzScrollBarRect; + Vcl::Themes::TThemedScrollBar FHorzScrollBarSliderState; + System::Types::TRect FHorzScrollBarSliderTrackRect; + System::Types::TRect FHorzScrollBarUpButtonRect; + Vcl::Themes::TThemedScrollBar FHorzScrollBarUpButtonState; + TVclStyleScrollBarWindow* FHorzScrollBarWindow; + bool FLeftMouseButtonDown; + int FPrevScrollPos; + float FScrollPos; + System::Types::TRect FVertScrollBarDownButtonRect; + Vcl::Themes::TThemedScrollBar FVertScrollBarDownButtonState; + System::Types::TRect FVertScrollBarRect; + Vcl::Themes::TThemedScrollBar FVertScrollBarSliderState; + System::Types::TRect FVertScrollBarSliderTrackRect; + System::Types::TRect FVertScrollBarUpButtonRect; + Vcl::Themes::TThemedScrollBar FVertScrollBarUpButtonState; + TVclStyleScrollBarWindow* FVertScrollBarWindow; + MESSAGE void __fastcall CMUpdateVclStyleScrollbars(Winapi::Messages::TMessage &Message); + MESSAGE void __fastcall WMKeyDown(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMKeyUp(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMLButtonDown(Winapi::Messages::TWMMouse &Msg); + MESSAGE void __fastcall WMLButtonUp(Winapi::Messages::TWMMouse &Msg); + MESSAGE void __fastcall WMNCLButtonDown(Winapi::Messages::TWMMouse &Msg); + HIDESBASE MESSAGE void __fastcall WMNCMouseMove(Winapi::Messages::TWMMouse &Msg); + MESSAGE void __fastcall WMNCLButtonUp(Winapi::Messages::TWMMouse &Msg); + HIDESBASE MESSAGE void __fastcall WMNCPaint(Winapi::Messages::TMessage &Msg); + HIDESBASE MESSAGE void __fastcall WMMouseMove(Winapi::Messages::TWMMouse &Msg); + MESSAGE void __fastcall WMMouseWheel(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMVScroll(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMHScroll(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMCaptureChanged(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMNCLButtonDblClk(Winapi::Messages::TWMMouse &Msg); + MESSAGE void __fastcall WMSize(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMMove(Winapi::Messages::TMessage &Msg); + MESSAGE void __fastcall WMPosChanged(Winapi::Messages::TMessage &Msg); + +protected: + virtual void __fastcall CalcScrollBarsRect(void); + virtual void __fastcall DrawHorzScrollBar(HDC DC); + virtual void __fastcall DrawVertScrollBar(HDC DC); + System::Types::TRect __fastcall GetHorzScrollBarSliderRect(void); + System::Types::TRect __fastcall GetVertScrollBarSliderRect(void); + virtual void __fastcall MouseLeave(void); + virtual void __fastcall PaintScrollBars(void); + bool __fastcall PointInTreeHeader(const System::Types::TPoint &P); + void __fastcall UpdateScrollBarWindow(void); + +public: + __fastcall virtual TVclStyleScrollBarsHook(Vcl::Controls::TWinControl* AControl); + __fastcall virtual ~TVclStyleScrollBarsHook(void); +}; + +#pragma pack(pop) + +//-- var, const, procedure --------------------------------------------------- +static const System::Word CM_UPDATE_VCLSTYLE_SCROLLBARS = System::Word(0xb802); +} /* namespace Stylehooks */ +} /* namespace Virtualtrees */ +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES_STYLEHOOKS) +using namespace Virtualtrees::Stylehooks; +#endif +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES) +using namespace Virtualtrees; +#endif +#pragma pack(pop) +#pragma option pop + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // Virtualtrees_StylehooksHPP diff --git a/Source/hpp/VirtualTrees.Utils.hpp b/Source/hpp/VirtualTrees.Utils.hpp new file mode 100644 index 0000000..408d3d3 --- /dev/null +++ b/Source/hpp/VirtualTrees.Utils.hpp @@ -0,0 +1,59 @@ +// CodeGear C++Builder +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'VirtualTrees.Utils.pas' rev: 29.00 (Windows) + +#ifndef Virtualtrees_UtilsHPP +#define Virtualtrees_UtilsHPP + +#pragma delphiheader begin +#pragma option push +#pragma option -w- // All warnings off +#pragma option -Vx // Zero-length empty class member +#pragma pack(push,8) +#include +#include +#include +#include +#include +#include + +//-- user supplied ----------------------------------------------------------- + +namespace Virtualtrees +{ +namespace Utils +{ +//-- forward type declarations ----------------------------------------------- +//-- type declarations ------------------------------------------------------- +enum DECLSPEC_DENUM TBlendMode : unsigned char { bmConstantAlpha, bmPerPixelAlpha, bmMasterAlpha, bmConstantAlphaAndColor }; + +//-- var, const, procedure --------------------------------------------------- +extern DELPHI_PACKAGE System::Types::TRect __fastcall OrderRect(const System::Types::TRect &R); +extern DELPHI_PACKAGE void __fastcall SetBrushOrigin(Vcl::Graphics::TCanvas* Canvas, int X, int Y); +extern DELPHI_PACKAGE void __fastcall SetCanvasOrigin(Vcl::Graphics::TCanvas* Canvas, int X, int Y); +extern DELPHI_PACKAGE void __fastcall ClipCanvas(Vcl::Graphics::TCanvas* Canvas, const System::Types::TRect &ClipRect, HRGN VisibleRegion = (HRGN)(0x0)); +extern DELPHI_PACKAGE void __fastcall GetStringDrawRect(HDC DC, const System::UnicodeString S, System::Types::TRect &Bounds, unsigned DrawFormat); +extern DELPHI_PACKAGE System::UnicodeString __fastcall ShortenString(HDC DC, const System::UnicodeString S, int Width, int EllipsisWidth = 0x0); +extern DELPHI_PACKAGE System::UnicodeString __fastcall WrapString(HDC DC, const System::UnicodeString S, const System::Types::TRect &Bounds, bool RTL, unsigned DrawFormat); +extern DELPHI_PACKAGE void __fastcall AlphaBlend(HDC Source, HDC Destination, const System::Types::TRect &R, const System::Types::TPoint &Target, TBlendMode Mode, int ConstantAlpha, int Bias); +extern DELPHI_PACKAGE unsigned __fastcall GetRGBColor(System::Uitypes::TColor Value); +extern DELPHI_PACKAGE void __fastcall PrtStretchDrawDIB(Vcl::Graphics::TCanvas* Canvas, const System::Types::TRect &DestRect, Vcl::Graphics::TBitmap* ABitmap); +extern DELPHI_PACKAGE bool __fastcall HasMMX(void); +extern DELPHI_PACKAGE void __fastcall FillDragRectangles(int DragWidth, int DragHeight, int DeltaX, int DeltaY, System::Types::TRect &RClip, System::Types::TRect &RScroll, System::Types::TRect &RSamp1, System::Types::TRect &RSamp2, System::Types::TRect &RDraw1, System::Types::TRect &RDraw2); +extern DELPHI_PACKAGE void __fastcall DrawImage(Vcl::Imglist::TCustomImageList* ImageList, int Index, Vcl::Graphics::TCanvas* Canvas, int X, int Y, unsigned Style, bool Enabled); +} /* namespace Utils */ +} /* namespace Virtualtrees */ +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES_UTILS) +using namespace Virtualtrees::Utils; +#endif +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES) +using namespace Virtualtrees; +#endif +#pragma pack(pop) +#pragma option pop + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // Virtualtrees_UtilsHPP diff --git a/Source/hpp/VirtualTrees.WorkerThread.hpp b/Source/hpp/VirtualTrees.WorkerThread.hpp new file mode 100644 index 0000000..c89f354 --- /dev/null +++ b/Source/hpp/VirtualTrees.WorkerThread.hpp @@ -0,0 +1,69 @@ +// CodeGear C++Builder +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. +// All rights reserved + +// (DO NOT EDIT: machine generated header) 'VirtualTrees.WorkerThread.pas' rev: 29.00 (Windows) + +#ifndef Virtualtrees_WorkerthreadHPP +#define Virtualtrees_WorkerthreadHPP + +#pragma delphiheader begin +#pragma option push +#pragma option -w- // All warnings off +#pragma option -Vx // Zero-length empty class member +#pragma pack(push,8) +#include +#include +#include +#include + +//-- user supplied ----------------------------------------------------------- + +namespace Virtualtrees +{ +namespace Workerthread +{ +//-- forward type declarations ----------------------------------------------- +class DELPHICLASS TWorkerThread; +//-- type declarations ------------------------------------------------------- +class PASCALIMPLEMENTATION TWorkerThread : public System::Classes::TThread +{ + typedef System::Classes::TThread inherited; + +private: + Virtualtrees::TBaseVirtualTree* FCurrentTree; + System::Classes::TThreadList* FWaiterList; + unsigned FRefCount; + +protected: + void __fastcall CancelValidation(Virtualtrees::TBaseVirtualTree* Tree); + virtual void __fastcall Execute(void); + +public: + __fastcall TWorkerThread(bool CreateSuspended); + __fastcall virtual ~TWorkerThread(void); + void __fastcall AddTree(Virtualtrees::TBaseVirtualTree* Tree); + void __fastcall RemoveTree(Virtualtrees::TBaseVirtualTree* Tree); + __property Virtualtrees::TBaseVirtualTree* CurrentTree = {read=FCurrentTree}; +}; + + +//-- var, const, procedure --------------------------------------------------- +extern DELPHI_PACKAGE TWorkerThread* WorkerThread; +extern DELPHI_PACKAGE NativeUInt WorkEvent; +extern DELPHI_PACKAGE void __fastcall AddThreadReference(void); +extern DELPHI_PACKAGE void __fastcall ReleaseThreadReference(Virtualtrees::TBaseVirtualTree* Tree); +} /* namespace Workerthread */ +} /* namespace Virtualtrees */ +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES_WORKERTHREAD) +using namespace Virtualtrees::Workerthread; +#endif +#if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES) +using namespace Virtualtrees; +#endif +#pragma pack(pop) +#pragma option pop + +#pragma delphiheader end. +//-- end unit ---------------------------------------------------------------- +#endif // Virtualtrees_WorkerthreadHPP diff --git a/Source/hpp/VirtualTrees.hpp b/Source/hpp/VirtualTrees.hpp index 0b413f9..c40d2f9 100644 --- a/Source/hpp/VirtualTrees.hpp +++ b/Source/hpp/VirtualTrees.hpp @@ -1,8 +1,8 @@ // CodeGear C++Builder -// Copyright (c) 1995, 2014 by Embarcadero Technologies, Inc. +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. // All rights reserved -// (DO NOT EDIT: machine generated header) 'VirtualTrees.pas' rev: 28.00 (Windows) +// (DO NOT EDIT: machine generated header) 'VirtualTrees.pas' rev: 29.00 (Windows) #ifndef VirtualtreesHPP #define VirtualtreesHPP @@ -12,28 +12,28 @@ #pragma option -w- // All warnings off #pragma option -Vx // Zero-length empty class member #pragma pack(push,8) -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include //-- user supplied ----------------------------------------------------------- #include @@ -44,8 +44,50 @@ namespace Virtualtrees { -//-- type declarations ------------------------------------------------------- +//-- forward type declarations ----------------------------------------------- class DELPHICLASS EVirtualTreeError; +struct TCacheEntry; +class DELPHICLASS TCustomVirtualTreeOptions; +class DELPHICLASS TVirtualTreeOptions; +struct TVTReference; +struct TVirtualNode; +struct TVTHeaderHitInfo; +struct THitInfo; +struct TInternalStgMedium; +class DELPHICLASS TEnumFormatEtc; +__interface IVTDragManager; +typedef System::DelphiInterface _di_IVTDragManager; +class DELPHICLASS TVTDataObject; +class DELPHICLASS TVTDragManager; +struct TVTHintData; +class DELPHICLASS TVirtualTreeHintWindow; +class DELPHICLASS TVTDragImage; +class DELPHICLASS TVirtualTreeColumn; +class DELPHICLASS TVirtualTreeColumns; +class DELPHICLASS TVTFixedAreaConstraints; +class DELPHICLASS TVTHeader; +__interface IVTEditLink; +typedef System::DelphiInterface _di_IVTEditLink; +struct THeaderPaintInfo; +class DELPHICLASS TScrollBarOptions; +class DELPHICLASS TVTColors; +struct TVTImageInfo; +struct TVTPaintInfo; +class DELPHICLASS TClipboardFormats; +__interface TVTGetNodeProc; +typedef System::DelphiInterface _di_TVTGetNodeProc; +struct TVTVirtualNodeEnumerator; +struct TVTVirtualNodeEnumeration; +class DELPHICLASS TBaseVirtualTree; +class DELPHICLASS TCustomStringTreeOptions; +class DELPHICLASS TStringTreeOptions; +class DELPHICLASS TVTEdit; +class DELPHICLASS TStringEditLink; +class DELPHICLASS TCustomVirtualStringTree; +class DELPHICLASS TVirtualStringTree; +class DELPHICLASS TCustomVirtualDrawTree; +class DELPHICLASS TVirtualDrawTree; +//-- type declarations ------------------------------------------------------- #pragma pack(push,4) class PASCALIMPLEMENTATION EVirtualTreeError : public System::Sysutils::Exception { @@ -142,13 +184,12 @@ typedef System::Set TVTOperationKinds; +typedef System::Set TVTOperationKinds; typedef System::TMetaClass* TVirtualTreeClass; -struct TVirtualNode; typedef TVirtualNode *PVirtualNode; typedef int TColumnIndex; @@ -167,8 +208,6 @@ typedef System::DynamicArray TCache; typedef System::DynamicArray TNodeArray; -class DELPHICLASS TCustomVirtualTreeOptions; -class DELPHICLASS TBaseVirtualTree; #pragma pack(push,4) class PASCALIMPLEMENTATION TCustomVirtualTreeOptions : public System::Classes::TPersistent { @@ -188,17 +227,15 @@ class PASCALIMPLEMENTATION TCustomVirtualTreeOptions : public System::Classes::T void __fastcall SetPaintOptions(const TVTPaintOptions Value); void __fastcall SetSelectionOptions(const TVTSelectionOptions Value); -protected: +public: + __fastcall virtual TCustomVirtualTreeOptions(TBaseVirtualTree* AOwner); + virtual void __fastcall AssignTo(System::Classes::TPersistent* Dest); __property TVTAnimationOptions AnimationOptions = {read=FAnimationOptions, write=SetAnimationOptions, default=0}; __property TVTAutoOptions AutoOptions = {read=FAutoOptions, write=SetAutoOptions, default=1369}; __property TVTExportMode ExportMode = {read=FExportMode, write=FExportMode, default=0}; __property TVTMiscOptions MiscOptions = {read=FMiscOptions, write=SetMiscOptions, default=16809}; __property TVTPaintOptions PaintOptions = {read=FPaintOptions, write=SetPaintOptions, default=7008}; __property TVTSelectionOptions SelectionOptions = {read=FSelectionOptions, write=SetSelectionOptions, default=0}; - -public: - __fastcall virtual TCustomVirtualTreeOptions(TBaseVirtualTree* AOwner); - virtual void __fastcall AssignTo(System::Classes::TPersistent* Dest); __property TBaseVirtualTree* Owner = {read=FOwner}; public: /* TPersistent.Destroy */ inline __fastcall virtual ~TCustomVirtualTreeOptions(void) { } @@ -209,7 +246,6 @@ class PASCALIMPLEMENTATION TCustomVirtualTreeOptions : public System::Classes::T typedef System::TMetaClass* TTreeOptionsClass; -class DELPHICLASS TVirtualTreeOptions; #pragma pack(push,4) class PASCALIMPLEMENTATION TVirtualTreeOptions : public TCustomVirtualTreeOptions { @@ -232,7 +268,6 @@ class PASCALIMPLEMENTATION TVirtualTreeOptions : public TCustomVirtualTreeOption #pragma pack(pop) -struct TVTReference; typedef TVTReference *PVTReference; struct DECLSPEC_DRECORD TVTReference @@ -246,6 +281,7 @@ struct DECLSPEC_DRECORD TVTReference #pragma pack(push,1) struct DECLSPEC_DRECORD TVirtualNode { + private: struct DECLSPEC_DRECORD _TVirtualNode__1 { @@ -316,7 +352,6 @@ struct DECLSPEC_DRECORD TInternalStgMedium typedef System::DynamicArray TInternalStgMediumArray; -class DELPHICLASS TEnumFormatEtc; #pragma pack(push,4) class PASCALIMPLEMENTATION TEnumFormatEtc : public System::TInterfacedObject { @@ -328,7 +363,7 @@ class PASCALIMPLEMENTATION TEnumFormatEtc : public System::TInterfacedObject int FCurrentIndex; public: - __fastcall TEnumFormatEtc(TBaseVirtualTree* Tree, TFormatEtcArray AFormatEtcArray); + __fastcall TEnumFormatEtc(TBaseVirtualTree* Tree, const TFormatEtcArray AFormatEtcArray); HRESULT __stdcall Clone(/* out */ _di_IEnumFORMATETC &Enum); HRESULT __stdcall Next(int celt, /* out */ void *elt, System::PLongInt pceltFetched); HRESULT __stdcall Reset(void); @@ -345,7 +380,7 @@ class PASCALIMPLEMENTATION TEnumFormatEtc : public System::TInterfacedObject operator _di_IEnumFORMATETC() { _di_IEnumFORMATETC intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -356,12 +391,8 @@ class PASCALIMPLEMENTATION TEnumFormatEtc : public System::TInterfacedObject #pragma pack(pop) -__interface IVTDragManager; -typedef System::DelphiInterface _di_IVTDragManager; __interface INTERFACE_UUID("{C4B25559-14DA-446B-8901-0C879000EB16}") IVTDragManager : public System::IInterface { - -public: virtual void __stdcall ForceDragLeave(void) = 0 ; virtual _di_IDataObject __stdcall GetDataObject(void) = 0 ; virtual TBaseVirtualTree* __stdcall GetDragSource(void) = 0 ; @@ -373,7 +404,6 @@ __interface INTERFACE_UUID("{C4B25559-14DA-446B-8901-0C879000EB16}") IVTDragMan __property bool IsDropTarget = {read=GetIsDropTarget}; }; -class DELPHICLASS TVTDataObject; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTDataObject : public System::TInterfacedObject { @@ -387,13 +417,13 @@ class PASCALIMPLEMENTATION TVTDataObject : public System::TInterfacedObject _di_IDataAdviseHolder FAdviseHolder; protected: - System::_di_IInterface __fastcall CanonicalIUnknown(System::_di_IInterface TestUnknown); + System::_di_IInterface __fastcall CanonicalIUnknown(const System::_di_IInterface TestUnknown); bool __fastcall EqualFormatEtc(const tagFORMATETC &FormatEtc1, const tagFORMATETC &FormatEtc2); int __fastcall FindFormatEtc(const tagFORMATETC &TestFormatEtc, const TFormatEtcArray FormatEtcArray); Winapi::Activex::PStgMedium __fastcall FindInternalStgMedium(System::Word Format); NativeUInt __fastcall HGlobalClone(NativeUInt HGlobal); bool __fastcall RenderInternalOLEData(const tagFORMATETC &FormatEtcIn, tagSTGMEDIUM &Medium, HRESULT &OLEResult); - HRESULT __fastcall StgMediumIncRef(const tagSTGMEDIUM &InStgMedium, tagSTGMEDIUM &OutStgMedium, bool CopyInMedium, _di_IDataObject DataObject); + HRESULT __fastcall StgMediumIncRef(const tagSTGMEDIUM &InStgMedium, tagSTGMEDIUM &OutStgMedium, bool CopyInMedium, const _di_IDataObject DataObject); __property bool ForClipboard = {read=FForClipboard, nodefault}; __property TFormatEtcArray FormatEtcArray = {read=FFormatEtcArray, write=FFormatEtcArray}; __property TInternalStgMediumArray InternalStgMediumArray = {read=FInternalStgMediumArray, write=FInternalStgMediumArray}; @@ -410,7 +440,7 @@ class PASCALIMPLEMENTATION TVTDataObject : public System::TInterfacedObject virtual HRESULT __stdcall GetData(const tagFORMATETC &FormatEtcIn, /* out */ tagSTGMEDIUM &Medium); virtual HRESULT __stdcall GetDataHere(const tagFORMATETC &FormatEtc, /* out */ tagSTGMEDIUM &Medium); virtual HRESULT __stdcall QueryGetData(const tagFORMATETC &FormatEtc); - virtual HRESULT __stdcall SetData(const tagFORMATETC &FormatEtc, tagSTGMEDIUM &Medium, BOOL DoRelease); + virtual HRESULT __stdcall SetData(const tagFORMATETC &FormatEtc, tagSTGMEDIUM &Medium, System::LongBool DoRelease); private: void *__IDataObject; // IDataObject @@ -420,7 +450,7 @@ class PASCALIMPLEMENTATION TVTDataObject : public System::TInterfacedObject operator _di_IDataObject() { _di_IDataObject intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -431,7 +461,6 @@ class PASCALIMPLEMENTATION TVTDataObject : public System::TInterfacedObject #pragma pack(pop) -class DELPHICLASS TVTDragManager; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTDragManager : public System::TInterfacedObject { @@ -443,7 +472,7 @@ class PASCALIMPLEMENTATION TVTDragManager : public System::TInterfacedObject bool FIsDropTarget; _di_IDataObject FDataObject; _di_IDropTargetHelper FDropTargetHelper; - BOOL FFullDragging; + System::LongBool FFullDragging; _di_IDataObject __stdcall GetDataObject(void); TBaseVirtualTree* __stdcall GetDragSource(void); bool __stdcall GetDropTargetHelperSupported(void); @@ -458,7 +487,7 @@ class PASCALIMPLEMENTATION TVTDragManager : public System::TInterfacedObject HRESULT __stdcall Drop(const _di_IDataObject DataObject, int KeyState, const System::Types::TPoint Pt, int &Effect); void __stdcall ForceDragLeave(void); HRESULT __stdcall GiveFeedback(int Effect); - HRESULT __stdcall QueryContinueDrag(BOOL EscapePressed, int KeyState); + HRESULT __stdcall QueryContinueDrag(System::LongBool EscapePressed, int KeyState); private: void *__IDropTarget; // IDropTarget void *__IDropSource; // IDropSource @@ -470,7 +499,7 @@ class PASCALIMPLEMENTATION TVTDragManager : public System::TInterfacedObject operator _di_IDropTarget() { _di_IDropTarget intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -481,7 +510,7 @@ class PASCALIMPLEMENTATION TVTDragManager : public System::TInterfacedObject operator _di_IDropSource() { _di_IDropSource intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -492,7 +521,7 @@ class PASCALIMPLEMENTATION TVTDragManager : public System::TInterfacedObject operator _di_IVTDragManager() { _di_IVTDragManager intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -503,7 +532,6 @@ class PASCALIMPLEMENTATION TVTDragManager : public System::TInterfacedObject #pragma pack(pop) -struct TVTHintData; typedef TVTHintData *PVTHintData; struct DECLSPEC_DRECORD TVTHintData @@ -523,7 +551,6 @@ struct DECLSPEC_DRECORD TVTHintData enum DECLSPEC_DENUM THintAnimationType : unsigned char { hatNone, hatFade, hatSlide, hatSystemDefault }; -class DELPHICLASS TVirtualTreeHintWindow; class PASCALIMPLEMENTATION TVirtualTreeHintWindow : public Vcl::Controls::THintWindow { typedef Vcl::Controls::THintWindow inherited; @@ -574,7 +601,6 @@ enum DECLSPEC_DENUM Virtualtrees__9 : unsigned char { disHidden, disInDrag, disP typedef System::Set TVTDragImageStates; -class DELPHICLASS TVTDragImage; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTDragImage : public System::TObject { @@ -628,8 +654,6 @@ enum DECLSPEC_DENUM TVTHeaderColumnLayout : unsigned char { blGlyphLeft, blGlyph enum DECLSPEC_DENUM TSortDirection : unsigned char { sdAscending, sdDescending }; -class DELPHICLASS TVirtualTreeColumn; -class DELPHICLASS TVirtualTreeColumns; #pragma pack(push,4) class PASCALIMPLEMENTATION TVirtualTreeColumn : public System::Classes::TCollectionItem { @@ -752,7 +776,6 @@ typedef System::DynamicArray TCardinalArray; typedef System::DynamicArray TIndexArray; -class DELPHICLASS TVTHeader; #pragma pack(push,4) class PASCALIMPLEMENTATION TVirtualTreeColumns : public System::Classes::TCollection { @@ -847,7 +870,6 @@ typedef System::TMetaClass* TVirtualTreeColumnsClass; typedef System::Int8 TVTConstraintPercent; -class DELPHICLASS TVTFixedAreaConstraints; class PASCALIMPLEMENTATION TVTFixedAreaConstraints : public System::Classes::TPersistent { typedef System::Classes::TPersistent inherited; @@ -918,6 +940,7 @@ class PASCALIMPLEMENTATION TVTHeader : public System::Classes::TPersistent TVTFixedAreaConstraints* FFixedAreaConstraints; Vcl::Imglist::TCustomImageList* FImages; Vcl::Imglist::TChangeLink* FImageChangeLink; + int fSplitterHitTolerance; TColumnIndex FSortColumn; TSortDirection FSortDirection; TVTDragImage* FDragImage; @@ -1015,6 +1038,7 @@ class PASCALIMPLEMENTATION TVTHeader : public System::Classes::TPersistent __property Vcl::Menus::TPopupMenu* PopupMenu = {read=FPopupMenu, write=FPopupMenu}; __property TColumnIndex SortColumn = {read=FSortColumn, write=SetSortColumn, default=-1}; __property TSortDirection SortDirection = {read=FSortDirection, write=SetSortDirection, default=0}; + __property int SplitterHitTolerance = {read=fSplitterHitTolerance, write=fSplitterHitTolerance, default=8}; __property TVTHeaderStyle Style = {read=FStyle, write=SetStyle, default=0}; }; @@ -1022,12 +1046,8 @@ class PASCALIMPLEMENTATION TVTHeader : public System::Classes::TPersistent typedef System::TMetaClass* TVTHeaderClass; -__interface IVTEditLink; -typedef System::DelphiInterface _di_IVTEditLink; __interface INTERFACE_UUID("{2BE3EAFA-5ACB-45B4-9D9A-B58BCC496E17}") IVTEditLink : public System::IInterface { - -public: virtual bool __stdcall BeginEdit(void) = 0 ; virtual bool __stdcall CancelEdit(void) = 0 ; virtual bool __stdcall EndEdit(void) = 0 ; @@ -1099,7 +1119,6 @@ typedef void __fastcall (__closure *TVTColumnExportEvent)(TBaseVirtualTree* Send typedef void __fastcall (__closure *TVTTreeExportEvent)(TBaseVirtualTree* Sender, TVTExportType aExportType); -class DELPHICLASS TScrollBarOptions; #pragma pack(push,4) class PASCALIMPLEMENTATION TScrollBarOptions : public System::Classes::TPersistent { @@ -1136,7 +1155,6 @@ class PASCALIMPLEMENTATION TScrollBarOptions : public System::Classes::TPersiste #pragma pack(pop) -class DELPHICLASS TVTColors; #pragma pack(push,4) class PASCALIMPLEMENTATION TVTColors : public System::Classes::TPersistent { @@ -1239,7 +1257,6 @@ enum DECLSPEC_DENUM TVTCellPaintMode : unsigned char { cpmPaint, cpmGetContentMa enum DECLSPEC_DENUM TVTCellContentMarginType : unsigned char { ccmtAllSides, ccmtTopLeftOnly, ccmtBottomRightOnly }; -class DELPHICLASS TClipboardFormats; class PASCALIMPLEMENTATION TClipboardFormats : public System::Classes::TStringList { typedef System::Classes::TStringList inherited; @@ -1258,12 +1275,8 @@ class PASCALIMPLEMENTATION TClipboardFormats : public System::Classes::TStringLi }; -__interface TVTGetNodeProc; -typedef System::DelphiInterface _di_TVTGetNodeProc; __interface TVTGetNodeProc : public System::IInterface { - -public: virtual void __fastcall Invoke(TBaseVirtualTree* Sender, PVirtualNode Node, void * Data, bool &Abort) = 0 ; }; @@ -1421,6 +1434,8 @@ typedef void __fastcall (__closure *TVTGetLineStyleEvent)(TBaseVirtualTree* Send typedef void __fastcall (__closure *TVTMeasureItemEvent)(TBaseVirtualTree* Sender, Vcl::Graphics::TCanvas* TargetCanvas, PVirtualNode Node, int &NodeHeight); +typedef void __fastcall (__closure *TVTPrepareButtonImagesEvent)(TBaseVirtualTree* Sender, Vcl::Graphics::TBitmap* const APlusBM, Vcl::Graphics::TBitmap* const APlusHotBM, Vcl::Graphics::TBitmap* const APlusSelectedHotBM, Vcl::Graphics::TBitmap* const AMinusBM, Vcl::Graphics::TBitmap* const AMinusHotBM, Vcl::Graphics::TBitmap* const AMinusSelectedHotBM, System::Types::TSize &ASize); + typedef void __fastcall (__closure *TVTCompareEvent)(TBaseVirtualTree* Sender, PVirtualNode Node1, PVirtualNode Node2, TColumnIndex Column, int &Result); typedef void __fastcall (__closure *TVTIncrementalSearchEvent)(TBaseVirtualTree* Sender, PVirtualNode Node, const System::UnicodeString SearchText, int &Result); @@ -1459,7 +1474,6 @@ typedef PVirtualNode __fastcall (__closure *TGetNextNodeProc)(PVirtualNode Node, enum DECLSPEC_DENUM TVZVirtualNodeEnumerationMode : unsigned char { vneAll, vneChecked, vneChild, vneCutCopy, vneInitialized, vneLeaf, vneLevel, vneNoInit, vneSelected, vneVisible, vneVisibleChild, vneVisibleNoInitChild, vneVisibleNoInit }; -struct TVTVirtualNodeEnumeration; typedef TVTVirtualNodeEnumeration *PVTVirtualNodeEnumeration; struct DECLSPEC_DRECORD TVTVirtualNodeEnumerator @@ -1495,108 +1509,12 @@ struct DECLSPEC_DRECORD TVTVirtualNodeEnumeration }; -class DELPHICLASS TVclStyleScrollBarsHook; -#pragma pack(push,4) -class PASCALIMPLEMENTATION TVclStyleScrollBarsHook : public Vcl::Themes::TMouseTrackControlStyleHook -{ - typedef Vcl::Themes::TMouseTrackControlStyleHook inherited; - -private: - class DELPHICLASS TVclStyleScrollBarWindow; - #pragma pack(push,8) - class PASCALIMPLEMENTATION TVclStyleScrollBarWindow : public Vcl::Controls::TWinControl - { - typedef Vcl::Controls::TWinControl inherited; - -private: - TVclStyleScrollBarsHook* FScrollBarWindowOwner; - bool FScrollBarVertical; - bool FScrollBarVisible; - bool FScrollBarEnabled; - HIDESBASE MESSAGE void __fastcall WMNCHitTest(Winapi::Messages::TWMNCHitTest &Msg); - HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Winapi::Messages::TMessage &Msg); - HIDESBASE MESSAGE void __fastcall WMPaint(Winapi::Messages::TWMPaint &Msg); - -protected: - virtual void __fastcall CreateParams(Vcl::Controls::TCreateParams &Params); - -public: - __fastcall virtual TVclStyleScrollBarWindow(System::Classes::TComponent* AOwner); - __property TVclStyleScrollBarsHook* ScrollBarWindowOwner = {read=FScrollBarWindowOwner, write=FScrollBarWindowOwner}; - __property bool ScrollBarVertical = {read=FScrollBarVertical, write=FScrollBarVertical, nodefault}; - __property bool ScrollBarVisible = {read=FScrollBarVisible, write=FScrollBarVisible, nodefault}; - __property bool ScrollBarEnabled = {read=FScrollBarEnabled, write=FScrollBarEnabled, nodefault}; -public: - /* TWinControl.CreateParented */ inline __fastcall TVclStyleScrollBarWindow(HWND ParentWindow) : Vcl::Controls::TWinControl(ParentWindow) { } - /* TWinControl.Destroy */ inline __fastcall virtual ~TVclStyleScrollBarWindow(void) { } - - }; - - #pragma pack(pop) - - -private: - System::Types::TRect FHorzScrollBarDownButtonRect; - Vcl::Themes::TThemedScrollBar FHorzScrollBarDownButtonState; - System::Types::TRect FHorzScrollBarRect; - Vcl::Themes::TThemedScrollBar FHorzScrollBarSliderState; - System::Types::TRect FHorzScrollBarSliderTrackRect; - System::Types::TRect FHorzScrollBarUpButtonRect; - Vcl::Themes::TThemedScrollBar FHorzScrollBarUpButtonState; - TVclStyleScrollBarWindow* FHorzScrollBarWindow; - bool FLeftMouseButtonDown; - int FPrevScrollPos; - float FScrollPos; - System::Types::TRect FVertScrollBarDownButtonRect; - Vcl::Themes::TThemedScrollBar FVertScrollBarDownButtonState; - System::Types::TRect FVertScrollBarRect; - Vcl::Themes::TThemedScrollBar FVertScrollBarSliderState; - System::Types::TRect FVertScrollBarSliderTrackRect; - System::Types::TRect FVertScrollBarUpButtonRect; - Vcl::Themes::TThemedScrollBar FVertScrollBarUpButtonState; - TVclStyleScrollBarWindow* FVertScrollBarWindow; - MESSAGE void __fastcall CMUpdateVclStyleScrollbars(Winapi::Messages::TMessage &Message); - MESSAGE void __fastcall WMKeyDown(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMKeyUp(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMLButtonDown(Winapi::Messages::TWMMouse &Msg); - MESSAGE void __fastcall WMLButtonUp(Winapi::Messages::TWMMouse &Msg); - MESSAGE void __fastcall WMNCLButtonDown(Winapi::Messages::TWMMouse &Msg); - HIDESBASE MESSAGE void __fastcall WMNCMouseMove(Winapi::Messages::TWMMouse &Msg); - MESSAGE void __fastcall WMNCLButtonUp(Winapi::Messages::TWMMouse &Msg); - HIDESBASE MESSAGE void __fastcall WMNCPaint(Winapi::Messages::TMessage &Msg); - HIDESBASE MESSAGE void __fastcall WMMouseMove(Winapi::Messages::TWMMouse &Msg); - MESSAGE void __fastcall WMMouseWheel(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMVScroll(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMHScroll(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMCaptureChanged(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMNCLButtonDblClk(Winapi::Messages::TWMMouse &Msg); - MESSAGE void __fastcall WMSize(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMMove(Winapi::Messages::TMessage &Msg); - MESSAGE void __fastcall WMPosChanged(Winapi::Messages::TMessage &Msg); - -protected: - virtual void __fastcall CalcScrollBarsRect(void); - virtual void __fastcall DrawHorzScrollBar(HDC DC); - virtual void __fastcall DrawVertScrollBar(HDC DC); - System::Types::TRect __fastcall GetHorzScrollBarSliderRect(void); - System::Types::TRect __fastcall GetVertScrollBarSliderRect(void); - virtual void __fastcall MouseLeave(void); - virtual void __fastcall PaintScrollBars(void); - bool __fastcall PointInTreeHeader(const System::Types::TPoint &P); - void __fastcall UpdateScrollBarWindow(void); - -public: - __fastcall virtual TVclStyleScrollBarsHook(Vcl::Controls::TWinControl* AControl); - __fastcall virtual ~TVclStyleScrollBarsHook(void); -}; - -#pragma pack(pop) - class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomControl { typedef Vcl::Controls::TCustomControl inherited; private: + static unsigned FTotalInternalDataSize; Vcl::Forms::TFormBorderStyle FBorderStyle; TVTHeader* FHeader; TVirtualNode *FRoot; @@ -1660,6 +1578,8 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr Vcl::Graphics::TBitmap* FMinusBM; Vcl::Graphics::TBitmap* FHotPlusBM; Vcl::Graphics::TBitmap* FHotMinusBM; + Vcl::Graphics::TBitmap* FSelectedHotPlusBM; + Vcl::Graphics::TBitmap* FSelectedHotMinusBM; Vcl::Imglist::TCustomImageList* FImages; Vcl::Imglist::TCustomImageList* FStateImages; Vcl::Imglist::TCustomImageList* FCustomCheckImages; @@ -1713,7 +1633,6 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr TVirtualNode *FLastSearchNode; TVTSearchDirection FSearchDirection; TVTSearchStart FSearchStart; - unsigned FTotalInternalDataSize; HWND FPanningWindow; HICON FPanningCursor; Vcl::Graphics::TBitmap* FPanningImage; @@ -1808,6 +1727,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr TVTAfterCellPaintEvent FOnAfterCellPaint; TVTBeforeCellPaintEvent FOnBeforeCellPaint; TVTHeaderPaintEvent FOnHeaderDraw; + TVTPrepareButtonImagesEvent FOnPrepareButtonImages; TVTHeaderPaintQueryElementsEvent FOnHeaderDrawQueryElements; TVTAdvancedHeaderPaintEvent FOnAdvancedHeaderDraw; TVTGetLineStyleEvent FOnGetLineStyle; @@ -1890,7 +1810,6 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr void __fastcall ImageListChange(System::TObject* Sender); void __fastcall InitializeFirstColumnValues(TVTPaintInfo &PaintInfo); void __fastcall InitRootNode(unsigned OldSize = (unsigned)(0x0)); - void __fastcall InterruptValidation(void); bool __fastcall IsFirstVisibleChild(PVirtualNode Parent, PVirtualNode Node); bool __fastcall IsLastVisibleChild(PVirtualNode Parent, PVirtualNode Node); PVirtualNode __fastcall MakeNewNode(void); @@ -1951,7 +1870,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr void __fastcall SetVisiblePath(PVirtualNode Node, bool Value); void __fastcall StaticBackground(Vcl::Graphics::TBitmap* Source, Vcl::Graphics::TCanvas* Target, const System::Types::TPoint &OffsetPosition, const System::Types::TRect &R); void __fastcall StopTimer(int ID); - void __fastcall SetWindowTheme(System::UnicodeString Theme); + void __fastcall SetWindowTheme(const System::UnicodeString Theme); void __fastcall TileBackground(Vcl::Graphics::TBitmap* Source, Vcl::Graphics::TCanvas* Target, const System::Types::TPoint &Offset, const System::Types::TRect &R); bool __fastcall ToggleCallback(int Step, int StepSize, void * Data); MESSAGE void __fastcall CMColorChange(Winapi::Messages::TMessage &Message); @@ -2011,7 +1930,6 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr unsigned __fastcall GetRangeX(void); bool __fastcall GetDoubleBuffered(void); HIDESBASE void __fastcall SetDoubleBuffered(const bool Value); - void __fastcall ChangeTreeStatesAsync(TChangeStates EnterStates, TChangeStates LeaveStates); bool __fastcall GetIsSeBorderInStyleElement(void); protected: @@ -2023,13 +1941,14 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr virtual void __fastcall AdjustPaintCellRect(TVTPaintInfo &PaintInfo, TColumnIndex &NextNonEmpty); virtual void __fastcall AdjustPanningCursor(int X, int Y); virtual void __fastcall AdviseChangeEvent(bool StructureChange, PVirtualNode Node, TChangeReason Reason); - virtual unsigned __fastcall AllocateInternalDataArea(unsigned Size); + __classmethod virtual unsigned __fastcall AllocateInternalDataArea(unsigned Size); virtual void __fastcall Animate(unsigned Steps, unsigned Duration, TVTAnimationCallback Callback, void * Data); virtual bool __fastcall CalculateSelectionRect(int X, int Y); virtual bool __fastcall CanAutoScroll(void); virtual bool __fastcall CanShowDragImage(void); bool __fastcall CanSplitterResizeNode(const System::Types::TPoint &P, PVirtualNode Node, TColumnIndex Column); virtual void __fastcall Change(PVirtualNode Node); + void __fastcall ChangeTreeStatesAsync(TChangeStates EnterStates, TChangeStates LeaveStates); DYNAMIC void __fastcall ChangeScale(int M, int D); virtual bool __fastcall CheckParentCheckState(PVirtualNode Node, TCheckState NewCheckState); virtual void __fastcall ClearTempCache(void); @@ -2079,7 +1998,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr virtual void __fastcall DoDragExpand(void); virtual void __fastcall DoBeforeDrawLineImage(PVirtualNode Node, int Level, int &XPos); virtual bool __fastcall DoDragOver(System::TObject* Source, System::Classes::TShiftState Shift, System::Uitypes::TDragState State, const System::Types::TPoint &Pt, TDropMode Mode, int &Effect); - virtual void __fastcall DoDragDrop(System::TObject* Source, _di_IDataObject DataObject, TFormatArray Formats, System::Classes::TShiftState Shift, const System::Types::TPoint &Pt, int &Effect, TDropMode Mode); + virtual void __fastcall DoDragDrop(System::TObject* Source, const _di_IDataObject DataObject, const TFormatArray Formats, System::Classes::TShiftState Shift, const System::Types::TPoint &Pt, int &Effect, TDropMode Mode); void __fastcall DoDrawHint(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, const System::Types::TRect &R, TColumnIndex Column); virtual void __fastcall DoEdit(void); DYNAMIC void __fastcall DoEndDrag(System::TObject* Target, int X, int Y); @@ -2152,7 +2071,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr virtual void __fastcall DoTimerScroll(void); virtual void __fastcall DoUpdating(TVTUpdateState State); virtual bool __fastcall DoValidateCache(void); - virtual void __fastcall DragAndDrop(unsigned AllowedEffects, _di_IDataObject DataObject, int &DragEffect); + virtual void __fastcall DragAndDrop(unsigned AllowedEffects, const _di_IDataObject DataObject, int &DragEffect); DYNAMIC void __fastcall DragCanceled(void); HIDESBASE virtual HRESULT __fastcall DragDrop(const _di_IDataObject DataObject, int KeyState, const System::Types::TPoint &Pt, int &Effect); virtual HRESULT __fastcall DragEnter(int KeyState, const System::Types::TPoint &Pt, int &Effect); @@ -2198,6 +2117,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr void * __fastcall InternalData(PVirtualNode Node); virtual void __fastcall InternalDisconnectNode(PVirtualNode Node, bool KeepFocus, bool Reindex = true); virtual void __fastcall InternalRemoveFromSelection(PVirtualNode Node); + void __fastcall InterruptValidation(void); void __fastcall InvalidateCache(void); virtual void __fastcall Loaded(void); virtual void __fastcall MainColumnChanged(void); @@ -2209,7 +2129,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr virtual void __fastcall PaintCheckImage(Vcl::Graphics::TCanvas* Canvas, const TVTImageInfo &ImageInfo, bool Selected); virtual void __fastcall PaintImage(TVTPaintInfo &PaintInfo, TVTImageInfoIndex ImageInfoIndex, bool DoOverlay); virtual void __fastcall PaintNodeButton(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, const System::Types::TRect &R, int ButtonX, int ButtonY, System::Classes::TBiDiMode BidiMode); - virtual void __fastcall PaintTreeLines(const TVTPaintInfo &PaintInfo, int VAlignment, int IndentSize, TLineImage LineImage); + virtual void __fastcall PaintTreeLines(const TVTPaintInfo &PaintInfo, int VAlignment, int IndentSize, const TLineImage LineImage); virtual void __fastcall PaintSelectionRectangle(Vcl::Graphics::TCanvas* Target, int WindowOrgX, const System::Types::TRect &SelectionRect, const System::Types::TRect &TargetRect); virtual void __fastcall PanningWindowProc(Winapi::Messages::TMessage &Message); virtual void __fastcall PrepareCell(TVTPaintInfo &PaintInfo, int WindowOrgX, int MaxWidth); @@ -2244,6 +2164,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr virtual void __fastcall WriteNode(System::Classes::TStream* Stream, PVirtualNode Node); void __fastcall VclStyleChanged(void); __property bool VclStyleEnabled = {read=FVclStyleEnabled, nodefault}; + /* static */ __property unsigned TotalInternalDataSize = {read=FTotalInternalDataSize, nodefault}; __property System::Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=0}; __property unsigned AnimationDuration = {read=FAnimationDuration, write=SetAnimationDuration, default=200}; __property unsigned AutoExpandDelay = {read=FAutoExpandDelay, write=FAutoExpandDelay, default=1000}; @@ -2310,7 +2231,6 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr __property unsigned SelectionCurveRadius = {read=FSelectionCurveRadius, write=SetSelectionCurveRadius, default=0}; __property Vcl::Imglist::TCustomImageList* StateImages = {read=FStateImages, write=SetStateImages}; __property int TextMargin = {read=FTextMargin, write=SetTextMargin, default=4}; - __property unsigned TotalInternalDataSize = {read=FTotalInternalDataSize, nodefault}; __property TCustomVirtualTreeOptions* TreeOptions = {read=FOptions, write=SetOptions}; __property bool WantTabs = {read=FWantTabs, write=FWantTabs, default=0}; __property TVTAddToSelectionEvent OnAddToSelection = {read=FOnAddToSelection, write=FOnAddToSelection}; @@ -2418,6 +2338,7 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr __property TVTNodeMovedEvent OnNodeMoved = {read=FOnNodeMoved, write=FOnNodeMoved}; __property TVTNodeMovingEvent OnNodeMoving = {read=FOnNodeMoving, write=FOnNodeMoving}; __property TVTBackgroundPaintEvent OnPaintBackground = {read=FOnPaintBackground, write=FOnPaintBackground}; + __property TVTPrepareButtonImagesEvent OnPrepareButtonBitmaps = {read=FOnPrepareButtonImages, write=FOnPrepareButtonImages}; __property TVTRemoveFromSelectionEvent OnRemoveFromSelection = {read=FOnRemoveFromSelection, write=FOnRemoveFromSelection}; __property TVTRenderOLEDataEvent OnRenderOLEData = {read=FOnRenderOLEData, write=FOnRenderOLEData}; __property TVTChangeEvent OnResetNode = {read=FOnResetNode, write=FOnResetNode}; @@ -2514,7 +2435,10 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr PVirtualNode __fastcall GetNodeAt(const System::Types::TPoint &P)/* overload */; PVirtualNode __fastcall GetNodeAt(int X, int Y)/* overload */; PVirtualNode __fastcall GetNodeAt(int X, int Y, bool Relative, int &NodeTop)/* overload */; - void * __fastcall GetNodeData(PVirtualNode Node); + void * __fastcall GetNodeData(PVirtualNode Node)/* overload */; + template T __fastcall GetNodeData(PVirtualNode pNode)/* overload */; + template T __fastcall GetNodeDataAt(int pXCoord, int pYCoord); + template T __fastcall GetFirstSelectedNodeData(void); unsigned __fastcall GetNodeLevel(PVirtualNode Node); PVirtualNode __fastcall GetPrevious(PVirtualNode Node, bool ConsiderChildrenAbove = false); PVirtualNode __fastcall GetPreviousChecked(PVirtualNode Node, TCheckState State = (TCheckState)(0x2), bool ConsiderChildrenAbove = false); @@ -2555,8 +2479,8 @@ class PASCALIMPLEMENTATION TBaseVirtualTree : public Vcl::Controls::TCustomContr virtual bool __fastcall PasteFromClipboard(void); void __fastcall PrepareDragImage(const System::Types::TPoint &HotSpot, const _di_IDataObject DataObject); void __fastcall Print(Vcl::Printers::TPrinter* Printer, bool PrintHeader); - bool __fastcall ProcessDrop(_di_IDataObject DataObject, PVirtualNode TargetNode, int &Effect, TVTNodeAttachMode Mode); - bool __fastcall ProcessOLEData(TBaseVirtualTree* Source, _di_IDataObject DataObject, PVirtualNode TargetNode, TVTNodeAttachMode Mode, bool Optimized); + bool __fastcall ProcessDrop(const _di_IDataObject DataObject, PVirtualNode TargetNode, int &Effect, TVTNodeAttachMode Mode); + bool __fastcall ProcessOLEData(TBaseVirtualTree* Source, const _di_IDataObject DataObject, PVirtualNode TargetNode, TVTNodeAttachMode Mode, bool Optimized); void __fastcall RepaintNode(PVirtualNode Node); virtual void __fastcall ReinitChildren(PVirtualNode Node, bool Recursive); virtual void __fastcall ReinitNode(PVirtualNode Node, bool Recursive); @@ -2650,7 +2574,6 @@ enum DECLSPEC_DENUM TVTStringOption : unsigned char { toSaveCaptions, toShowStat typedef System::Set TVTStringOptions; -class DELPHICLASS TCustomStringTreeOptions; #pragma pack(push,4) class PASCALIMPLEMENTATION TCustomStringTreeOptions : public TCustomVirtualTreeOptions { @@ -2673,7 +2596,6 @@ class PASCALIMPLEMENTATION TCustomStringTreeOptions : public TCustomVirtualTreeO #pragma pack(pop) -class DELPHICLASS TStringTreeOptions; #pragma pack(push,4) class PASCALIMPLEMENTATION TStringTreeOptions : public TCustomStringTreeOptions { @@ -2697,8 +2619,6 @@ class PASCALIMPLEMENTATION TStringTreeOptions : public TCustomStringTreeOptions #pragma pack(pop) -class DELPHICLASS TVTEdit; -class DELPHICLASS TStringEditLink; class PASCALIMPLEMENTATION TVTEdit : public Vcl::Stdctrls::TCustomEdit { typedef Vcl::Stdctrls::TCustomEdit inherited; @@ -2737,7 +2657,6 @@ class PASCALIMPLEMENTATION TVTEdit : public Vcl::Stdctrls::TCustomEdit }; -class DELPHICLASS TCustomVirtualStringTree; #pragma pack(push,4) class PASCALIMPLEMENTATION TStringEditLink : public System::TInterfacedObject { @@ -2777,7 +2696,7 @@ class PASCALIMPLEMENTATION TStringEditLink : public System::TInterfacedObject operator _di_IVTEditLink() { _di_IVTEditLink intf; - GetInterface(intf); + this->GetInterface(intf); return intf; } #else @@ -2810,11 +2729,16 @@ class PASCALIMPLEMENTATION TCustomVirtualStringTree : public TBaseVirtualTree { typedef TBaseVirtualTree inherited; +private: + static unsigned FInternalDataOffset; + +private: + // __classmethod void __fastcall Create@(); + private: System::UnicodeString FDefaultText; int FTextHeight; int FEllipsisWidth; - unsigned FInternalDataOffset; TVTPaintText FOnPaintText; TVSTGetTextEvent FOnGetText; TVSTGetHintEvent FOnGetHint; @@ -2843,8 +2767,8 @@ class PASCALIMPLEMENTATION TCustomVirtualStringTree : public TBaseVirtualTree virtual void __fastcall PaintStaticText(const TVTPaintInfo &PaintInfo, int TextOutFlags, const System::UnicodeString Text); virtual void __fastcall AdjustPaintCellRect(TVTPaintInfo &PaintInfo, TColumnIndex &NextNonEmpty); bool __fastcall CanExportNode(PVirtualNode Node); - virtual int __fastcall CalculateStaticTextWidth(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, System::UnicodeString Text); - virtual int __fastcall CalculateTextWidth(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, System::UnicodeString Text); + virtual int __fastcall CalculateStaticTextWidth(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, const System::UnicodeString Text); + virtual int __fastcall CalculateTextWidth(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, const System::UnicodeString Text); virtual bool __fastcall ColumnIsEmpty(PVirtualNode Node, TColumnIndex Column); virtual void __fastcall DefineProperties(System::Classes::TFiler* Filer); virtual _di_IVTEditLink __fastcall DoCreateEditor(PVirtualNode Node, TColumnIndex Column); @@ -2854,12 +2778,12 @@ class PASCALIMPLEMENTATION TCustomVirtualStringTree : public TBaseVirtualTree virtual int __fastcall DoGetNodeWidth(PVirtualNode Node, TColumnIndex Column, Vcl::Graphics::TCanvas* Canvas = (Vcl::Graphics::TCanvas*)(0x0)); virtual void __fastcall DoGetText(PVirtualNode Node, TColumnIndex Column, TVSTTextType TextType, System::UnicodeString &Text); virtual int __fastcall DoIncrementalSearch(PVirtualNode Node, const System::UnicodeString Text); - virtual void __fastcall DoNewText(PVirtualNode Node, TColumnIndex Column, System::UnicodeString Text); + virtual void __fastcall DoNewText(PVirtualNode Node, TColumnIndex Column, const System::UnicodeString Text); virtual void __fastcall DoPaintNode(TVTPaintInfo &PaintInfo); virtual void __fastcall DoPaintText(PVirtualNode Node, Vcl::Graphics::TCanvas* const Canvas, TColumnIndex Column, TVSTTextType TextType); virtual System::UnicodeString __fastcall DoShortenString(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, const System::UnicodeString S, int Width, int EllipsisWidth = 0x0); - virtual void __fastcall DoTextDrawing(TVTPaintInfo &PaintInfo, System::UnicodeString Text, const System::Types::TRect &CellRect, unsigned DrawFormat); - virtual System::Types::TSize __fastcall DoTextMeasuring(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, System::UnicodeString Text); + virtual void __fastcall DoTextDrawing(TVTPaintInfo &PaintInfo, const System::UnicodeString Text, const System::Types::TRect &CellRect, unsigned DrawFormat); + virtual System::Types::TSize __fastcall DoTextMeasuring(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, const System::UnicodeString Text); virtual TTreeOptionsClass __fastcall GetOptionsClass(void); HIDESBASE void * __fastcall InternalData(PVirtualNode Node); virtual void __fastcall MainColumnChanged(void); @@ -2886,7 +2810,7 @@ class PASCALIMPLEMENTATION TCustomVirtualStringTree : public TBaseVirtualTree virtual int __fastcall ComputeNodeHeight(Vcl::Graphics::TCanvas* Canvas, PVirtualNode Node, TColumnIndex Column, System::UnicodeString S = System::UnicodeString()); NativeUInt __fastcall ContentToClipboard(System::Word Format, TVSTTextSourceType Source); void __fastcall ContentToCustom(TVSTTextSourceType Source); - System::RawByteString __fastcall ContentToHTML(TVSTTextSourceType Source, System::UnicodeString Caption = System::UnicodeString()); + System::RawByteString __fastcall ContentToHTML(TVSTTextSourceType Source, const System::UnicodeString Caption = System::UnicodeString()); System::RawByteString __fastcall ContentToRTF(TVSTTextSourceType Source); System::AnsiString __fastcall ContentToText(TVSTTextSourceType Source, System::WideChar Separator)/* overload */; System::AnsiString __fastcall ContentToText(TVSTTextSourceType Source, const System::AnsiString Separator)/* overload */; @@ -2902,6 +2826,9 @@ class PASCALIMPLEMENTATION TCustomVirtualStringTree : public TBaseVirtualTree __property System::UnicodeString ImageText[PVirtualNode Node][TVTImageKind Kind][TColumnIndex Column] = {read=GetImageText}; __property System::UnicodeString StaticText[PVirtualNode Node][TColumnIndex Column] = {read=GetStaticText}; __property System::UnicodeString Text[PVirtualNode Node][TColumnIndex Column] = {read=GetText, write=SetText}; + +private: + // __classmethod void __fastcall Destroy@(); public: /* TWinControl.CreateParented */ inline __fastcall TCustomVirtualStringTree(HWND ParentWindow) : TBaseVirtualTree(ParentWindow) { } @@ -2913,7 +2840,6 @@ class PASCALIMPLEMENTATION TCustomVirtualStringTree : public TBaseVirtualTree }; -class DELPHICLASS TVirtualStringTree; class PASCALIMPLEMENTATION TVirtualStringTree : public TCustomVirtualStringTree { typedef TCustomVirtualStringTree inherited; @@ -2925,9 +2851,6 @@ class PASCALIMPLEMENTATION TVirtualStringTree : public TCustomVirtualStringTree protected: virtual TTreeOptionsClass __fastcall GetOptionsClass(void); -private: - // __classmethod void __fastcall Create@(); - public: __property Canvas; __property RangeX; @@ -3142,6 +3065,7 @@ class PASCALIMPLEMENTATION TVirtualStringTree : public TCustomVirtualStringTree __property OnNodeMoved; __property OnNodeMoving; __property OnPaintBackground; + __property OnPrepareButtonBitmaps; __property OnRemoveFromSelection; __property OnRenderOLEData; __property OnResetNode; @@ -3160,9 +3084,6 @@ class PASCALIMPLEMENTATION TVirtualStringTree : public TCustomVirtualStringTree __property OnCanResize; __property OnGesture; __property Touch; - -private: - // __classmethod void __fastcall Destroy@(); public: /* TCustomVirtualStringTree.Create */ inline __fastcall virtual TVirtualStringTree(System::Classes::TComponent* AOwner) : TCustomVirtualStringTree(AOwner) { } /* TCustomVirtualStringTree.Destroy */ inline __fastcall virtual ~TVirtualStringTree(void) { } @@ -3179,7 +3100,6 @@ typedef void __fastcall (__closure *TVTGetCellContentMarginEvent)(TBaseVirtualTr typedef void __fastcall (__closure *TVTGetNodeWidthEvent)(TBaseVirtualTree* Sender, Vcl::Graphics::TCanvas* HintCanvas, PVirtualNode Node, TColumnIndex Column, int &NodeWidth); -class DELPHICLASS TCustomVirtualDrawTree; class PASCALIMPLEMENTATION TCustomVirtualDrawTree : public TBaseVirtualTree { typedef TBaseVirtualTree inherited; @@ -3207,7 +3127,6 @@ class PASCALIMPLEMENTATION TCustomVirtualDrawTree : public TBaseVirtualTree }; -class DELPHICLASS TVirtualDrawTree; class PASCALIMPLEMENTATION TVirtualDrawTree : public TCustomVirtualDrawTree { typedef TCustomVirtualDrawTree inherited; @@ -3219,9 +3138,6 @@ class PASCALIMPLEMENTATION TVirtualDrawTree : public TCustomVirtualDrawTree protected: virtual TTreeOptionsClass __fastcall GetOptionsClass(void); -private: - // __classmethod void __fastcall Create@(); - public: __property Canvas; __property LastDragEffect; @@ -3422,6 +3338,7 @@ class PASCALIMPLEMENTATION TVirtualDrawTree : public TCustomVirtualDrawTree __property OnNodeMoved; __property OnNodeMoving; __property OnPaintBackground; + __property OnPrepareButtonBitmaps; __property OnRemoveFromSelection; __property OnRenderOLEData; __property OnResetNode; @@ -3440,9 +3357,6 @@ class PASCALIMPLEMENTATION TVirtualDrawTree : public TCustomVirtualDrawTree __property OnGesture; __property Touch; __property StyleElements = {default=7}; - -private: - // __classmethod void __fastcall Destroy@(); public: /* TBaseVirtualTree.Create */ inline __fastcall virtual TVirtualDrawTree(System::Classes::TComponent* AOwner) : TCustomVirtualDrawTree(AOwner) { } /* TBaseVirtualTree.Destroy */ inline __fastcall virtual ~TVirtualDrawTree(void) { } @@ -3453,8 +3367,6 @@ class PASCALIMPLEMENTATION TVirtualDrawTree : public TCustomVirtualDrawTree }; -enum DECLSPEC_DENUM TBlendMode : unsigned char { bmConstantAlpha, bmPerPixelAlpha, bmMasterAlpha, bmConstantAlphaAndColor }; - //-- var, const, procedure --------------------------------------------------- #define VTVersion L"6.0.0" static const System::Int8 VTTreeStreamVersion = System::Int8(0x2); @@ -3501,7 +3413,6 @@ static const System::Word ThemeChangedTimerDelay = System::Word(0x1f4); static const System::Word WM_CHANGESTATE = System::Word(0x8020); static const System::Word CM_DENYSUBCLASSING = System::Word(0xce3); static const System::Word CM_AUTOADJUST = System::Word(0xce8); -static const System::Word CM_UPDATE_VCLSTYLE_SCROLLBARS = System::Word(0xd15); #define CFSTR_VIRTUALTREE L"Virtual Tree Data" #define CFSTR_VTREFERENCE L"Virtual Tree Reference" #define CFSTR_HTML L"HTML Format" @@ -3538,19 +3449,9 @@ extern DELPHI_PACKAGE bool IsWinVistaOrAbove; #define DefaultMiscOptions (System::Set() << TVTMiscOption::toAcceptOLEDrop << TVTMiscOption::toFullRepaintOnResize << TVTMiscOption::toInitOnSave << TVTMiscOption::toToggleOnDblClick << TVTMiscOption::toWheelPanning << TVTMiscOption::toEditOnClick ) #define DefaultColumnOptions (System::Set() << TVTColumnOption::coAllowClick << TVTColumnOption::coDraggable << TVTColumnOption::coEnabled << TVTColumnOption::coParentBidiMode << TVTColumnOption::coParentColor << TVTColumnOption::coResizable << TVTColumnOption::coShowDropMark << TVTColumnOption::coVisible << TVTColumnOption::coAllowFocus << TVTColumnOption::coEditable ) #define DefaultStringOptions (System::Set() << TVTStringOption::toSaveCaptions << TVTStringOption::toAutoAcceptEditChange ) -extern DELPHI_PACKAGE void __fastcall EnumerateVTClipboardFormats(TVirtualTreeClass TreeClass, System::Classes::TStrings* const List)/* overload */; -extern DELPHI_PACKAGE void __fastcall EnumerateVTClipboardFormats(TVirtualTreeClass TreeClass, TFormatEtcArray &Formats)/* overload */; -extern DELPHI_PACKAGE System::UnicodeString __fastcall GetVTClipboardFormatDescription(System::Word AFormat); -extern DELPHI_PACKAGE void __fastcall RegisterVTClipboardFormat(System::Word AFormat, TVirtualTreeClass TreeClass, unsigned Priority)/* overload */; -extern DELPHI_PACKAGE System::Word __fastcall RegisterVTClipboardFormat(System::UnicodeString Description, TVirtualTreeClass TreeClass, unsigned Priority, int tymed = 0x1, Winapi::Activex::PDVTargetDevice ptd = (Winapi::Activex::PDVTargetDevice)(0x0), int dwAspect = 0x1, int lindex = 0xffffffff)/* overload */; extern DELPHI_PACKAGE Vcl::Imglist::TCustomImageList* __fastcall GetUtilityImages(void); -extern DELPHI_PACKAGE void __fastcall ShowError(System::UnicodeString Msg, int HelpContext); +extern DELPHI_PACKAGE void __fastcall ShowError(const System::UnicodeString Msg, int HelpContext); extern DELPHI_PACKAGE TBaseVirtualTree* __fastcall TreeFromNode(PVirtualNode Node); -extern DELPHI_PACKAGE System::UnicodeString __fastcall ShortenString(HDC DC, const System::UnicodeString S, int Width, int EllipsisWidth = 0x0); -extern DELPHI_PACKAGE System::UnicodeString __fastcall WrapString(HDC DC, const System::UnicodeString S, const System::Types::TRect &Bounds, bool RTL, unsigned DrawFormat); -extern DELPHI_PACKAGE void __fastcall GetStringDrawRect(HDC DC, const System::UnicodeString S, System::Types::TRect &Bounds, unsigned DrawFormat); -extern DELPHI_PACKAGE void __fastcall AlphaBlend(HDC Source, HDC Destination, const System::Types::TRect &R, const System::Types::TPoint &Target, TBlendMode Mode, int ConstantAlpha, int Bias); -extern DELPHI_PACKAGE void __fastcall PrtStretchDrawDIB(Vcl::Graphics::TCanvas* Canvas, const System::Types::TRect &DestRect, Vcl::Graphics::TBitmap* ABitmap); } /* namespace Virtualtrees */ #if !defined(DELPHIHEADER_NO_IMPLICIT_NAMESPACE_USE) && !defined(NO_USING_NAMESPACE_VIRTUALTREES) using namespace Virtualtrees; diff --git a/Source/hpp/VirtualTreesReg.hpp b/Source/hpp/VirtualTreesReg.hpp index b94990e..fb1432c 100644 --- a/Source/hpp/VirtualTreesReg.hpp +++ b/Source/hpp/VirtualTreesReg.hpp @@ -1,8 +1,8 @@ // CodeGear C++Builder -// Copyright (c) 1995, 2014 by Embarcadero Technologies, Inc. +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. // All rights reserved -// (DO NOT EDIT: machine generated header) 'VirtualTreesReg.pas' rev: 28.00 (Windows) +// (DO NOT EDIT: machine generated header) 'VirtualTreesReg.pas' rev: 29.00 (Windows) #ifndef VirtualtreesregHPP #define VirtualtreesregHPP @@ -12,24 +12,25 @@ #pragma option -w- // All warnings off #pragma option -Vx // Zero-length empty class member #pragma pack(push,8) -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit -#include // Pascal unit +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include //-- user supplied ----------------------------------------------------------- namespace Virtualtreesreg { -//-- type declarations ------------------------------------------------------- +//-- forward type declarations ----------------------------------------------- class DELPHICLASS TVirtualTreeEditor; +//-- type declarations ------------------------------------------------------- #pragma pack(push,4) class PASCALIMPLEMENTATION TVirtualTreeEditor : public Designeditors::TDefaultEditor { diff --git a/Source/hpp/pasall.hpp b/Source/hpp/pasall.hpp index 5431e02..97304be 100644 --- a/Source/hpp/pasall.hpp +++ b/Source/hpp/pasall.hpp @@ -1,8 +1,8 @@ // CodeGear C++Builder -// Copyright (c) 1995, 2014 by Embarcadero Technologies, Inc. +// Copyright (c) 1995, 2015 by Embarcadero Technologies, Inc. // All rights reserved -// (DO NOT EDIT: machine generated header) 'pasall.pas' rev: 28.00 (Windows) +// (DO NOT EDIT: machine generated header) 'pasall.pas' rev: 29.00 (Windows) #ifndef PasallHPP #define PasallHPP @@ -17,6 +17,7 @@ namespace Pasall { +//-- forward type declarations ----------------------------------------------- //-- type declarations ------------------------------------------------------- //-- var, const, procedure --------------------------------------------------- } /* namespace Pasall */