We meanwhile have two InitializeGlobalStructures() methods, make sure…

… to call them both. Issue #1134
JAM-Software · Nov 14, 2023 · 26deba0 · 26deba0
1 parent 1aac7ef
commit 26deba0
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/Source/VirtualTrees.pas b/Source/VirtualTrees.pas
@@ -649,6 +649,7 @@ procedure InitializeGlobalStructures();
 constructor TCustomVirtualStringTree.Create(AOwner: TComponent);
 
 begin
+  InitializeGlobalStructures();
   inherited;
   FPreviouslySelected := nil;
   FDefaultText := cDefaultText;