Update utslvclstdctl.tsf

按钮颜色修正
2022-11-18 15:52:45 +08:00
parent 95cbbf21fe
commit 25665746f6
1 changed files with 2 additions and 2 deletions
@@ -547,14 +547,14 @@ type tcustombtn = class(TCustomControl) //
        drawrc(dc,r,1);}
        paintfocus(dc,r);
        dc.pen.style := PS_DOT;
-        dc.pen.color := 6440490;//rgb(170,220,250);
+        dc.pen.color := 16440490;//rgb(170,220,250);
        drawrc(dc,r,4);
        dc.pen.style := bps;
    end 
    private 
    function paintfocus(dc,r); //绘制焦点
    begin
-        dc.pen.color := rgb(150,200,230);
+        dc.pen.color := 15124630;//rgb(150,200,230);
        dc.pen.width := 1;
        dc.pen.style := PS_SOLID;        
        drawrc(dc,r,1);