Changeset 572 for trunk/Packages

Timestamp:

May 14, 2024, 12:05:39 PM (6 months ago)

Author:

chronos

Message:

• Fixed: Incorrect drawing of the list items if clicked on the first item in the list on Windows.

File:

• trunk/Packages/CevoComponents/ListBoxEx.pas (modified) (2 diffs)

trunk/Packages/CevoComponents/ListBoxEx.pas

@@ -42 +42 @@
   Blue = $d77800;
 begin
+  {$IFDEF UNIX}
+  // Clear blank area under the items
   if Index = 0 then begin
     Canvas.Brush.Color := Color;
@@ -47 +49 @@
     Canvas.FillRect(0, 0, Width, Height);
   end;
+  {$ENDIF}
 
   if odSelected in State then begin