From 001af36899fb17a8fd68d37c99c419d9af009297 Mon Sep 17 00:00:00 2001 From: Clayton Arends Date: Sat, 19 Sep 2026 12:42:27 -0700 Subject: [PATCH 1/5] Group by enum --- Source/VirtualTrees.pas | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) diff --git a/Source/VirtualTrees.pas b/Source/VirtualTrees.pas index 80dcaafb..43401383 100644 --- a/Source/VirtualTrees.pas +++ b/Source/VirtualTrees.pas @@ -140,18 +140,29 @@ interface // Aliases for increased compatibility with V7, feel free to extend by pull requests NoColumn = VirtualTrees.Types.NoColumn; InvalidColumn = VirtualTrees.Types.InvalidColumn; + + // TSortDirection sdAscending = VirtualTrees.Types.TSortDirection.sdAscending; sdDescending = VirtualTrees.Types.TSortDirection.sdDescending; + + // TVTAutoOption toAutoSort = VirtualTrees.Types.TVTAutoOption.toAutoSort; + + // TVTMiscOption toCheckSupport = VirtualTrees.Types.TVTMiscOption.toCheckSupport; toEditable = VirtualTrees.Types.TVTMiscOption.toEditable; + + // TVTPaintOption toShowRoot = VirtualTrees.Types.TVTPaintOption.toShowRoot; + + // TCheckType ctNone = VirtualTrees.Types.TCheckType.ctNone; ctTriStateCheckBox = VirtualTrees.Types.TCheckType.ctTriStateCheckBox; ctCheckBox = VirtualTrees.Types.TCheckType.ctCheckBox; ctRadioButton = VirtualTrees.Types.TCheckType.ctRadioButton; ctButton = VirtualTrees.Types.TCheckType.ctButton; + // TCheckState csUncheckedNormal = VirtualTrees.Types.TCheckState.csUncheckedNormal; csUncheckedPressed = VirtualTrees.Types.TCheckState.csUncheckedPressed; csCheckedNormal = VirtualTrees.Types.TCheckState.csCheckedNormal; @@ -162,12 +173,25 @@ interface csCheckedDisabled = VirtualTrees.Types.TCheckState.csCheckedDisabled; csMixedDisable = VirtualTrees.Types.TCheckState.csMixedDisabled; + // TVTColumnOption coVisible = VirtualTrees.Types.TVTColumnOption.coVisible; + + // TVirtualNodeState vsDisabled = VirtualTrees.Types.TVirtualNodeState.vsDisabled; + + // TVTExportType etHTML = VirtualTrees.Types.TVTExportType.etHTML; + + // THitPosition hiOnItemButton = VirtualTrees.Types.THitPosition.hiOnItemButton; + + // TDropMode dmOnNode = VirtualTrees.Types.TDropMode.dmOnNode; + + // TVTTooltipLineBreakStyle hlbForceMultiLine = VirtualTrees.Types.TVTTooltipLineBreakStyle.hlbForceMultiLine; + + // TVTHintMode hmHintAndDefault = VirtualTrees.Types.TVTHintMode.hmHintAndDefault; hmTooltip = VirtualTrees.Types.TVTHintMode.hmTooltip; From bcc6caeddf0ad0bd83bcfd2bdebf484a7531a866 Mon Sep 17 00:00:00 2001 From: Clayton Arends Date: Sat, 19 Sep 2026 13:29:18 -0700 Subject: [PATCH 2/5] Use {$EXTERNALSYM} for aliased constants to avoid C++ ambiguity errors --- Source/VirtualTrees.pas | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) diff --git a/Source/VirtualTrees.pas b/Source/VirtualTrees.pas index 43401383..ab0673a8 100644 --- a/Source/VirtualTrees.pas +++ b/Source/VirtualTrees.pas @@ -139,61 +139,91 @@ interface const // Aliases for increased compatibility with V7, feel free to extend by pull requests NoColumn = VirtualTrees.Types.NoColumn; + {$EXTERNALSYM NoColumn} InvalidColumn = VirtualTrees.Types.InvalidColumn; + {$EXTERNALSYM InvalidColumn} // TSortDirection sdAscending = VirtualTrees.Types.TSortDirection.sdAscending; + {$EXTERNALSYM sdAscending} sdDescending = VirtualTrees.Types.TSortDirection.sdDescending; + {$EXTERNALSYM sdDescending} // TVTAutoOption toAutoSort = VirtualTrees.Types.TVTAutoOption.toAutoSort; + {$EXTERNALSYM toAutoSort} // TVTMiscOption toCheckSupport = VirtualTrees.Types.TVTMiscOption.toCheckSupport; + {$EXTERNALSYM toCheckSupport} toEditable = VirtualTrees.Types.TVTMiscOption.toEditable; + {$EXTERNALSYM toEditable} // TVTPaintOption toShowRoot = VirtualTrees.Types.TVTPaintOption.toShowRoot; + {$EXTERNALSYM toShowRoot} // TCheckType ctNone = VirtualTrees.Types.TCheckType.ctNone; + {$EXTERNALSYM ctNone} ctTriStateCheckBox = VirtualTrees.Types.TCheckType.ctTriStateCheckBox; + {$EXTERNALSYM ctTriStateCheckBox} ctCheckBox = VirtualTrees.Types.TCheckType.ctCheckBox; + {$EXTERNALSYM ctCheckBox} ctRadioButton = VirtualTrees.Types.TCheckType.ctRadioButton; + {$EXTERNALSYM ctRadioButton} ctButton = VirtualTrees.Types.TCheckType.ctButton; + {$EXTERNALSYM ctButton} // TCheckState csUncheckedNormal = VirtualTrees.Types.TCheckState.csUncheckedNormal; + {$EXTERNALSYM csUncheckedNormal} csUncheckedPressed = VirtualTrees.Types.TCheckState.csUncheckedPressed; + {$EXTERNALSYM csUncheckedPressed} csCheckedNormal = VirtualTrees.Types.TCheckState.csCheckedNormal; + {$EXTERNALSYM csCheckedNormal} csCheckedPressed = VirtualTrees.Types.TCheckState.csCheckedPressed; + {$EXTERNALSYM csCheckedPressed} csMixedNormal = VirtualTrees.Types.TCheckState.csMixedNormal; + {$EXTERNALSYM csMixedNormal} csMixedPressed = VirtualTrees.Types.TCheckState.csMixedPressed; + {$EXTERNALSYM csMixedPressed} csUncheckedDisabled = VirtualTrees.Types.TCheckState.csUncheckedDisabled; + {$EXTERNALSYM csUncheckedDisabled} csCheckedDisabled = VirtualTrees.Types.TCheckState.csCheckedDisabled; + {$EXTERNALSYM csCheckedDisabled} csMixedDisable = VirtualTrees.Types.TCheckState.csMixedDisabled; + {$EXTERNALSYM csMixedDisabled} // TVTColumnOption coVisible = VirtualTrees.Types.TVTColumnOption.coVisible; + {$EXTERNALSYM coVisible} // TVirtualNodeState vsDisabled = VirtualTrees.Types.TVirtualNodeState.vsDisabled; + {$EXTERNALSYM vsDisabled} // TVTExportType etHTML = VirtualTrees.Types.TVTExportType.etHTML; + {$EXTERNALSYM etHTML} // THitPosition hiOnItemButton = VirtualTrees.Types.THitPosition.hiOnItemButton; + {$EXTERNALSYM hiOnItemButton} // TDropMode dmOnNode = VirtualTrees.Types.TDropMode.dmOnNode; + {$EXTERNALSYM dmOnNode} // TVTTooltipLineBreakStyle hlbForceMultiLine = VirtualTrees.Types.TVTTooltipLineBreakStyle.hlbForceMultiLine; + {$EXTERNALSYM hlbForceMultiLine} // TVTHintMode hmHintAndDefault = VirtualTrees.Types.TVTHintMode.hmHintAndDefault; + {$EXTERNALSYM hmHintAndDefault} hmTooltip = VirtualTrees.Types.TVTHintMode.hmTooltip; + {$EXTERNALSYM hmTooltip} type TCustomVirtualStringTree = class; From 82582c25b851b882239020ab9ae319055c5bfb4f Mon Sep 17 00:00:00 2001 From: Clayton Arends Date: Sat, 19 Sep 2026 14:02:57 -0700 Subject: [PATCH 3/5] Fix misspelled enum value --- Source/VirtualTrees.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Source/VirtualTrees.pas b/Source/VirtualTrees.pas index ab0673a8..0e7551c9 100644 --- a/Source/VirtualTrees.pas +++ b/Source/VirtualTrees.pas @@ -192,7 +192,7 @@ interface {$EXTERNALSYM csUncheckedDisabled} csCheckedDisabled = VirtualTrees.Types.TCheckState.csCheckedDisabled; {$EXTERNALSYM csCheckedDisabled} - csMixedDisable = VirtualTrees.Types.TCheckState.csMixedDisabled; + csMixedDisabled = VirtualTrees.Types.TCheckState.csMixedDisabled; {$EXTERNALSYM csMixedDisabled} // TVTColumnOption From af934b5aaba79eb8724cff69c953edd9af456152 Mon Sep 17 00:00:00 2001 From: Clayton Arends Date: Sat, 19 Sep 2026 14:03:55 -0700 Subject: [PATCH 4/5] Add {$HPPEMIT} lines to properly alias for C++Builder --- Source/VirtualTrees.pas | 52 +++++++++++++++++++++++++++++++++++++++++ 1 file changed, 52 insertions(+) diff --git a/Source/VirtualTrees.pas b/Source/VirtualTrees.pas index 0e7551c9..fd3ab14e 100644 --- a/Source/VirtualTrees.pas +++ b/Source/VirtualTrees.pas @@ -138,92 +138,144 @@ interface const // Aliases for increased compatibility with V7, feel free to extend by pull requests + // For C++Builder alias compatiblity, use {$EXTERNALSYM} and {$HPPEMIT} + + {$HPPEMIT OPENNAMESPACE} + NoColumn = VirtualTrees.Types.NoColumn; {$EXTERNALSYM NoColumn} + {$HPPEMIT 'using Virtualtrees::Types::NoColumn;'} + InvalidColumn = VirtualTrees.Types.InvalidColumn; {$EXTERNALSYM InvalidColumn} + {$HPPEMIT 'using Virtualtrees::Types::InvalidColumn;'} // TSortDirection sdAscending = VirtualTrees.Types.TSortDirection.sdAscending; {$EXTERNALSYM sdAscending} + {$HPPEMIT 'using Virtualtrees::Types::sdAscending;'} + sdDescending = VirtualTrees.Types.TSortDirection.sdDescending; {$EXTERNALSYM sdDescending} + {$HPPEMIT 'using Virtualtrees::Types::sdDescending;'} // TVTAutoOption toAutoSort = VirtualTrees.Types.TVTAutoOption.toAutoSort; {$EXTERNALSYM toAutoSort} + {$HPPEMIT 'using Virtualtrees::Types::toAutoSort;'} // TVTMiscOption toCheckSupport = VirtualTrees.Types.TVTMiscOption.toCheckSupport; {$EXTERNALSYM toCheckSupport} + {$HPPEMIT 'using Virtualtrees::Types::toCheckSupport;'} + toEditable = VirtualTrees.Types.TVTMiscOption.toEditable; {$EXTERNALSYM toEditable} + {$HPPEMIT 'using Virtualtrees::Types::toEditable;'} // TVTPaintOption toShowRoot = VirtualTrees.Types.TVTPaintOption.toShowRoot; {$EXTERNALSYM toShowRoot} + {$HPPEMIT 'using Virtualtrees::Types::toShowRoot;'} // TCheckType ctNone = VirtualTrees.Types.TCheckType.ctNone; {$EXTERNALSYM ctNone} + {$HPPEMIT 'using Virtualtrees::Types::ctNone;'} + ctTriStateCheckBox = VirtualTrees.Types.TCheckType.ctTriStateCheckBox; {$EXTERNALSYM ctTriStateCheckBox} + {$HPPEMIT 'using Virtualtrees::Types::ctTriStateCheckBox;'} + ctCheckBox = VirtualTrees.Types.TCheckType.ctCheckBox; {$EXTERNALSYM ctCheckBox} + {$HPPEMIT 'using Virtualtrees::Types::ctCheckBox;'} + ctRadioButton = VirtualTrees.Types.TCheckType.ctRadioButton; {$EXTERNALSYM ctRadioButton} + {$HPPEMIT 'using Virtualtrees::Types::ctRadioButton;'} + ctButton = VirtualTrees.Types.TCheckType.ctButton; {$EXTERNALSYM ctButton} + {$HPPEMIT 'using Virtualtrees::Types::ctButton;'} // TCheckState csUncheckedNormal = VirtualTrees.Types.TCheckState.csUncheckedNormal; {$EXTERNALSYM csUncheckedNormal} + {$HPPEMIT 'using Virtualtrees::Types::csUncheckedNormal;'} + csUncheckedPressed = VirtualTrees.Types.TCheckState.csUncheckedPressed; {$EXTERNALSYM csUncheckedPressed} + {$HPPEMIT 'using Virtualtrees::Types::csUncheckedPressed;'} + csCheckedNormal = VirtualTrees.Types.TCheckState.csCheckedNormal; {$EXTERNALSYM csCheckedNormal} + {$HPPEMIT 'using Virtualtrees::Types::csCheckedNormal;'} + csCheckedPressed = VirtualTrees.Types.TCheckState.csCheckedPressed; {$EXTERNALSYM csCheckedPressed} + {$HPPEMIT 'using Virtualtrees::Types::csCheckedPressed;'} + csMixedNormal = VirtualTrees.Types.TCheckState.csMixedNormal; {$EXTERNALSYM csMixedNormal} + {$HPPEMIT 'using Virtualtrees::Types::csMixedNormal;'} + csMixedPressed = VirtualTrees.Types.TCheckState.csMixedPressed; {$EXTERNALSYM csMixedPressed} + {$HPPEMIT 'using Virtualtrees::Types::csMixedPressed;'} + csUncheckedDisabled = VirtualTrees.Types.TCheckState.csUncheckedDisabled; {$EXTERNALSYM csUncheckedDisabled} + {$HPPEMIT 'using Virtualtrees::Types::csUncheckedDisabled;'} + csCheckedDisabled = VirtualTrees.Types.TCheckState.csCheckedDisabled; {$EXTERNALSYM csCheckedDisabled} + {$HPPEMIT 'using Virtualtrees::Types::csCheckedDisabled;'} + csMixedDisabled = VirtualTrees.Types.TCheckState.csMixedDisabled; {$EXTERNALSYM csMixedDisabled} + {$HPPEMIT 'using Virtualtrees::Types::csMixedDisabled;'} // TVTColumnOption coVisible = VirtualTrees.Types.TVTColumnOption.coVisible; {$EXTERNALSYM coVisible} + {$HPPEMIT 'using Virtualtrees::Types::coVisible;'} // TVirtualNodeState vsDisabled = VirtualTrees.Types.TVirtualNodeState.vsDisabled; {$EXTERNALSYM vsDisabled} + {$HPPEMIT 'using Virtualtrees::Types::vsDisabled;'} // TVTExportType etHTML = VirtualTrees.Types.TVTExportType.etHTML; {$EXTERNALSYM etHTML} + {$HPPEMIT 'using Virtualtrees::Types::etHTML;'} // THitPosition hiOnItemButton = VirtualTrees.Types.THitPosition.hiOnItemButton; {$EXTERNALSYM hiOnItemButton} + {$HPPEMIT 'using Virtualtrees::Types::hiOnItemButton;'} // TDropMode dmOnNode = VirtualTrees.Types.TDropMode.dmOnNode; {$EXTERNALSYM dmOnNode} + {$HPPEMIT 'using Virtualtrees::Types::dmOnNode;'} // TVTTooltipLineBreakStyle hlbForceMultiLine = VirtualTrees.Types.TVTTooltipLineBreakStyle.hlbForceMultiLine; {$EXTERNALSYM hlbForceMultiLine} + {$HPPEMIT 'using Virtualtrees::Types::hlbForceMultiLine;'} // TVTHintMode hmHintAndDefault = VirtualTrees.Types.TVTHintMode.hmHintAndDefault; {$EXTERNALSYM hmHintAndDefault} + {$HPPEMIT 'using Virtualtrees::Types::hmHintAndDefault;'} + hmTooltip = VirtualTrees.Types.TVTHintMode.hmTooltip; {$EXTERNALSYM hmTooltip} + {$HPPEMIT 'using Virtualtrees::Types::hmTooltip;'} + + {$HPPEMIT CLOSENAMESPACE} type TCustomVirtualStringTree = class; From 4dbc14fd0ba486733612173e6f66f65b3377c2e2 Mon Sep 17 00:00:00 2001 From: Clayton Arends Date: Sat, 19 Sep 2026 14:20:35 -0700 Subject: [PATCH 5/5] Remove alias alignment spacing --- Source/VirtualTrees.pas | 60 ++++++++++++++++++++--------------------- 1 file changed, 30 insertions(+), 30 deletions(-) diff --git a/Source/VirtualTrees.pas b/Source/VirtualTrees.pas index fd3ab14e..7701904c 100644 --- a/Source/VirtualTrees.pas +++ b/Source/VirtualTrees.pas @@ -142,136 +142,136 @@ interface {$HPPEMIT OPENNAMESPACE} - NoColumn = VirtualTrees.Types.NoColumn; + NoColumn = VirtualTrees.Types.NoColumn; {$EXTERNALSYM NoColumn} {$HPPEMIT 'using Virtualtrees::Types::NoColumn;'} - InvalidColumn = VirtualTrees.Types.InvalidColumn; + InvalidColumn = VirtualTrees.Types.InvalidColumn; {$EXTERNALSYM InvalidColumn} {$HPPEMIT 'using Virtualtrees::Types::InvalidColumn;'} // TSortDirection - sdAscending = VirtualTrees.Types.TSortDirection.sdAscending; + sdAscending = VirtualTrees.Types.TSortDirection.sdAscending; {$EXTERNALSYM sdAscending} {$HPPEMIT 'using Virtualtrees::Types::sdAscending;'} - sdDescending = VirtualTrees.Types.TSortDirection.sdDescending; + sdDescending = VirtualTrees.Types.TSortDirection.sdDescending; {$EXTERNALSYM sdDescending} {$HPPEMIT 'using Virtualtrees::Types::sdDescending;'} // TVTAutoOption - toAutoSort = VirtualTrees.Types.TVTAutoOption.toAutoSort; + toAutoSort = VirtualTrees.Types.TVTAutoOption.toAutoSort; {$EXTERNALSYM toAutoSort} {$HPPEMIT 'using Virtualtrees::Types::toAutoSort;'} // TVTMiscOption - toCheckSupport = VirtualTrees.Types.TVTMiscOption.toCheckSupport; + toCheckSupport = VirtualTrees.Types.TVTMiscOption.toCheckSupport; {$EXTERNALSYM toCheckSupport} {$HPPEMIT 'using Virtualtrees::Types::toCheckSupport;'} - toEditable = VirtualTrees.Types.TVTMiscOption.toEditable; + toEditable = VirtualTrees.Types.TVTMiscOption.toEditable; {$EXTERNALSYM toEditable} {$HPPEMIT 'using Virtualtrees::Types::toEditable;'} // TVTPaintOption - toShowRoot = VirtualTrees.Types.TVTPaintOption.toShowRoot; + toShowRoot = VirtualTrees.Types.TVTPaintOption.toShowRoot; {$EXTERNALSYM toShowRoot} {$HPPEMIT 'using Virtualtrees::Types::toShowRoot;'} // TCheckType - ctNone = VirtualTrees.Types.TCheckType.ctNone; + ctNone = VirtualTrees.Types.TCheckType.ctNone; {$EXTERNALSYM ctNone} {$HPPEMIT 'using Virtualtrees::Types::ctNone;'} - ctTriStateCheckBox = VirtualTrees.Types.TCheckType.ctTriStateCheckBox; + ctTriStateCheckBox = VirtualTrees.Types.TCheckType.ctTriStateCheckBox; {$EXTERNALSYM ctTriStateCheckBox} {$HPPEMIT 'using Virtualtrees::Types::ctTriStateCheckBox;'} - ctCheckBox = VirtualTrees.Types.TCheckType.ctCheckBox; + ctCheckBox = VirtualTrees.Types.TCheckType.ctCheckBox; {$EXTERNALSYM ctCheckBox} {$HPPEMIT 'using Virtualtrees::Types::ctCheckBox;'} - ctRadioButton = VirtualTrees.Types.TCheckType.ctRadioButton; + ctRadioButton = VirtualTrees.Types.TCheckType.ctRadioButton; {$EXTERNALSYM ctRadioButton} {$HPPEMIT 'using Virtualtrees::Types::ctRadioButton;'} - ctButton = VirtualTrees.Types.TCheckType.ctButton; + ctButton = VirtualTrees.Types.TCheckType.ctButton; {$EXTERNALSYM ctButton} {$HPPEMIT 'using Virtualtrees::Types::ctButton;'} // TCheckState - csUncheckedNormal = VirtualTrees.Types.TCheckState.csUncheckedNormal; + csUncheckedNormal = VirtualTrees.Types.TCheckState.csUncheckedNormal; {$EXTERNALSYM csUncheckedNormal} {$HPPEMIT 'using Virtualtrees::Types::csUncheckedNormal;'} - csUncheckedPressed = VirtualTrees.Types.TCheckState.csUncheckedPressed; + csUncheckedPressed = VirtualTrees.Types.TCheckState.csUncheckedPressed; {$EXTERNALSYM csUncheckedPressed} {$HPPEMIT 'using Virtualtrees::Types::csUncheckedPressed;'} - csCheckedNormal = VirtualTrees.Types.TCheckState.csCheckedNormal; + csCheckedNormal = VirtualTrees.Types.TCheckState.csCheckedNormal; {$EXTERNALSYM csCheckedNormal} {$HPPEMIT 'using Virtualtrees::Types::csCheckedNormal;'} - csCheckedPressed = VirtualTrees.Types.TCheckState.csCheckedPressed; + csCheckedPressed = VirtualTrees.Types.TCheckState.csCheckedPressed; {$EXTERNALSYM csCheckedPressed} {$HPPEMIT 'using Virtualtrees::Types::csCheckedPressed;'} - csMixedNormal = VirtualTrees.Types.TCheckState.csMixedNormal; + csMixedNormal = VirtualTrees.Types.TCheckState.csMixedNormal; {$EXTERNALSYM csMixedNormal} {$HPPEMIT 'using Virtualtrees::Types::csMixedNormal;'} - csMixedPressed = VirtualTrees.Types.TCheckState.csMixedPressed; + csMixedPressed = VirtualTrees.Types.TCheckState.csMixedPressed; {$EXTERNALSYM csMixedPressed} {$HPPEMIT 'using Virtualtrees::Types::csMixedPressed;'} - csUncheckedDisabled = VirtualTrees.Types.TCheckState.csUncheckedDisabled; + csUncheckedDisabled = VirtualTrees.Types.TCheckState.csUncheckedDisabled; {$EXTERNALSYM csUncheckedDisabled} {$HPPEMIT 'using Virtualtrees::Types::csUncheckedDisabled;'} - csCheckedDisabled = VirtualTrees.Types.TCheckState.csCheckedDisabled; + csCheckedDisabled = VirtualTrees.Types.TCheckState.csCheckedDisabled; {$EXTERNALSYM csCheckedDisabled} {$HPPEMIT 'using Virtualtrees::Types::csCheckedDisabled;'} - csMixedDisabled = VirtualTrees.Types.TCheckState.csMixedDisabled; + csMixedDisabled = VirtualTrees.Types.TCheckState.csMixedDisabled; {$EXTERNALSYM csMixedDisabled} {$HPPEMIT 'using Virtualtrees::Types::csMixedDisabled;'} // TVTColumnOption - coVisible = VirtualTrees.Types.TVTColumnOption.coVisible; + coVisible = VirtualTrees.Types.TVTColumnOption.coVisible; {$EXTERNALSYM coVisible} {$HPPEMIT 'using Virtualtrees::Types::coVisible;'} // TVirtualNodeState - vsDisabled = VirtualTrees.Types.TVirtualNodeState.vsDisabled; + vsDisabled = VirtualTrees.Types.TVirtualNodeState.vsDisabled; {$EXTERNALSYM vsDisabled} {$HPPEMIT 'using Virtualtrees::Types::vsDisabled;'} // TVTExportType - etHTML = VirtualTrees.Types.TVTExportType.etHTML; + etHTML = VirtualTrees.Types.TVTExportType.etHTML; {$EXTERNALSYM etHTML} {$HPPEMIT 'using Virtualtrees::Types::etHTML;'} // THitPosition - hiOnItemButton = VirtualTrees.Types.THitPosition.hiOnItemButton; + hiOnItemButton = VirtualTrees.Types.THitPosition.hiOnItemButton; {$EXTERNALSYM hiOnItemButton} {$HPPEMIT 'using Virtualtrees::Types::hiOnItemButton;'} // TDropMode - dmOnNode = VirtualTrees.Types.TDropMode.dmOnNode; + dmOnNode = VirtualTrees.Types.TDropMode.dmOnNode; {$EXTERNALSYM dmOnNode} {$HPPEMIT 'using Virtualtrees::Types::dmOnNode;'} // TVTTooltipLineBreakStyle - hlbForceMultiLine = VirtualTrees.Types.TVTTooltipLineBreakStyle.hlbForceMultiLine; + hlbForceMultiLine = VirtualTrees.Types.TVTTooltipLineBreakStyle.hlbForceMultiLine; {$EXTERNALSYM hlbForceMultiLine} {$HPPEMIT 'using Virtualtrees::Types::hlbForceMultiLine;'} // TVTHintMode - hmHintAndDefault = VirtualTrees.Types.TVTHintMode.hmHintAndDefault; + hmHintAndDefault = VirtualTrees.Types.TVTHintMode.hmHintAndDefault; {$EXTERNALSYM hmHintAndDefault} {$HPPEMIT 'using Virtualtrees::Types::hmHintAndDefault;'} - hmTooltip = VirtualTrees.Types.TVTHintMode.hmTooltip; + hmTooltip = VirtualTrees.Types.TVTHintMode.hmTooltip; {$EXTERNALSYM hmTooltip} {$HPPEMIT 'using Virtualtrees::Types::hmTooltip;'}