diff --git a/components/virtualtreeview-unstable/VirtualTrees.pas b/components/virtualtreeview-unstable/VirtualTrees.pas
index 502fd92a1..5160a7c02 100644
--- a/components/virtualtreeview-unstable/VirtualTrees.pas
+++ b/components/virtualtreeview-unstable/VirtualTrees.pas
@@ -4764,6 +4764,7 @@ begin
else
Images.Handle := LoadBitmap(FindClassHInstance(TBaseVirtualTree), PChar(ImageName));
}
+ Images.TransparentColor := clNone;
Images.LoadFromLazarusResource(ImageName);
Logger.SendBitmap([lcCheck],ImageName,Images);
try
@@ -13702,8 +13703,7 @@ begin
if NeedLines then
begin
- //Workaround till LCL gets fixed
- {$ifdef Windows}
+ //WARNING: It requires a patched LCL
if FDottedBrush <> 0 then
DeleteObject(FDottedBrush);
@@ -13719,9 +13719,6 @@ begin
PatternBitmap := CreateBitmap(8, 8, 1, 1, Bits);
FDottedBrush := CreatePatternBrush(PatternBitmap);
DeleteObject(PatternBitmap);
- {$else}
- FDottedBrush := CreatePatternBrush(0);
- {$endif}
end;
end;
diff --git a/components/virtualtreeview-unstable/demos/images/images.lpi b/components/virtualtreeview-unstable/demos/images/images.lpi
index 53d063726..d33ffa3c9 100644
--- a/components/virtualtreeview-unstable/demos/images/images.lpi
+++ b/components/virtualtreeview-unstable/demos/images/images.lpi
@@ -17,7 +17,6 @@
-
diff --git a/components/virtualtreeview-unstable/demos/mininal/minimal_lcl.lpi b/components/virtualtreeview-unstable/demos/mininal/minimal_lcl.lpi
index 13ccd0eba..97358a693 100644
--- a/components/virtualtreeview-unstable/demos/mininal/minimal_lcl.lpi
+++ b/components/virtualtreeview-unstable/demos/mininal/minimal_lcl.lpi
@@ -64,6 +64,9 @@
+
+
+