Browse Source

Remove XPM workaround.

Martijn Laan 1 year ago
parent
commit
069ff6255b
1 changed files with 0 additions and 4 deletions
  1. 0 4
      Projects/Src/CompForm.pas

+ 0 - 4
Projects/Src/CompForm.pas

@@ -3402,10 +3402,6 @@ begin
       try
         BkBrush.Color := FTheme.Colors[tcMarginBack];
 
-        { Workaround for DPI over 200%, has too many colors for current XPM usage }
-        if (ImageList.Width > 24) or (ImageList.Height > 24) then
-          ImageList.SetSize(24, 24);
-
         var BitmapInfo := CreateBitmapInfo(ImageList.Width, -ImageList.Height, 32);
 
         var NamedMarkers := [