From 3635aa304475f4f66374d723c7fedf8309c8fac8 Mon Sep 17 00:00:00 2001
From: wp_xyz <wp_xxyyzzz@gmx.net>
Date: Sun, 26 May 2024 00:54:50 +0200
Subject: [PATCH] VirtualTreeview: Move LCL implementation units in
 laz.VirtualTrees to interface uses section. Fixes building Laz/main with
 FPC/main.

---
 .../virtualtreeview/laz.virtualtrees.pas      | 23 ++++++++-----------
 1 file changed, 10 insertions(+), 13 deletions(-)

diff --git a/components/virtualtreeview/laz.virtualtrees.pas b/components/virtualtreeview/laz.virtualtrees.pas
index cee8a4f8a5..5902108c08 100644
--- a/components/virtualtreeview/laz.virtualtrees.pas
+++ b/components/virtualtreeview/laz.virtualtrees.pas
@@ -89,12 +89,13 @@ uses
   LCLType, LMessages, LCLVersion, Types,
   SysUtils, Classes, Graphics, Controls, Forms, ImgList, StdCtrls, Menus, Printers,
   SyncObjs,  // Thread support
-  Clipbrd // Clipboard support
+  Clipbrd,   // Clipboard support
+  TypInfo,   // for migration stuff
+  ActnList,
+  StdActns,  // for standard action support
+  GraphType
   {$ifdef LCLCocoa}
   ,CocoaGDIObjects // hack: while using buffered drawing, multiply the context
-                   //       by the retina scale to achieve the needed scale for Retina
-                   //       Ideally - not to use Buffered. but Unbuffered drawing
-                   //       seems to need a fix
   {$endif}
   {$ifdef ThemeSupport}
   , Themes , TmSchema
@@ -4150,21 +4151,17 @@ implementation
 {$R laz.virtualtrees.res}
 
 uses
-  StrUtils, Math,
+  StrUtils, Math
   {$ifdef EnableOLE}
-  //AxCtrls,       // TOLEStream
+  //, AxCtrls       // TOLEStream
   {$endif}
   {$ifdef Windows}
-  MMSystem,                // for animation timer (does not include further resources)
+  , MMSystem        // for animation timer (does not include further resources)
   {$else}
-  laz.FakeMMSystem,
+  , laz.FakeMMSystem
   {$endif}
-  TypInfo,                 // for migration stuff
-  ActnList,
-  StdActns,                // for standard action support
-  GraphType
   {$ifdef EnableAccessible}
-  ,laz.VTAccessibilityFactory
+  , laz.VTAccessibilityFactory
   {$endif};  // accessibility helper class
 
 resourcestring