Переглянути джерело

Fix proposed by @phoenixfenix to bug #26

lainz 7 роки тому
батько
коміт
32bec09fba
1 змінених файлів з 2 додано та 2 видалено
  1. 2 2
      bctrackbarupdown.pas

+ 2 - 2
bctrackbarupdown.pas

@@ -463,8 +463,8 @@ begin
     else
     begin
       s := ABitmap.TextSize(inSel);
-      ABitmap.FillRect(x,y+1,x+s.cx,y+s.cy,clHighlight,dmSet);
-      ABitmap.TextOut(x,y,inSel,clHighlightText);
+      ABitmap.FillRect(x,y+1,x+s.cx,y+s.cy,ColorToRGB(clHighlight),dmSet);
+      ABitmap.TextOut(x,y,inSel,ColorToRGB(clHighlightText));
       inc(x,s.cx);
     end;
     ABitmap.TextOut(x,y,afterSel,fgcolor);