From 744eece50d60786105b7482260f13f35ebbe3784 Mon Sep 17 00:00:00 2001
From: blikblum <blikblum@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sun, 21 Sep 2008 17:35:20 +0000
Subject: [PATCH] * Declare DelphiCompat after LCLIntf in uses clause

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@568 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/virtualtreeview-unstable/VirtualTrees.pas | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/components/virtualtreeview-unstable/VirtualTrees.pas b/components/virtualtreeview-unstable/VirtualTrees.pas
index d4de3f308..6838c0de0 100644
--- a/components/virtualtreeview-unstable/VirtualTrees.pas
+++ b/components/virtualtreeview-unstable/VirtualTrees.pas
@@ -127,10 +127,11 @@ uses
   {$endif}
   ActiveX,
   OleUtils,
+  LCLIntf,
   DelphiCompat,
   LclExt,
   virtualpanningwindow,
-  vtlogger,  LCLType, LResources, LCLIntf,  LMessages, Types,
+  vtlogger,  LCLType, LResources, LMessages, Types,
   SysUtils, Classes, Graphics, Controls, Forms, ImgList, StdCtrls, Menus, Printers,
   SyncObjs  // Thread support
   //Clipbrd // Clipboard support
@@ -3375,7 +3376,7 @@ const
 
 var
   //Workaround to LCL bug 8553
-  {$ifndef Windows}
+  {$ifndef LCLWin32}
   pf32bit: TPixelFormat = pfDevice;
   {$endif}