From 888ec1c7d994c2cb714cb7c52867ace28594b365 Mon Sep 17 00:00:00 2001
From: JianjunLiu <cqljj123@126.com>
Date: Thu, 17 Nov 2022 16:40:24 +0800
Subject: [PATCH] Update utslcodeeditor.tsf
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

优化图标
---
 designer/utslcodeeditor.tsf | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/designer/utslcodeeditor.tsf b/designer/utslcodeeditor.tsf
index 15a4852..7f28d14 100644
--- a/designer/utslcodeeditor.tsf
+++ b/designer/utslcodeeditor.tsf
@@ -165,11 +165,10 @@ type TPage=class(TCustomControl) //
             begin
                 if FItemIndex=i then //Ñ¡ÖÐ
                 begin
-                    //dc.Brush.Color := rgb(244,205,205);   
                     dc.Brush.Color := 0xFa901E;
                 end else
                 begin
-                    dc.Brush.Color := rgb(238,238,228) //rgb(244,244,244);  
+                    dc.Brush.Color := 0xe4eeee;
                 end
                 dc.draw("roundrect",array(rc[0:1],rc[2:3],array(5,5)));
                 if it.BitmapB then
@@ -494,7 +493,7 @@ type TPage=class(TCustomControl) //
         for i := 0 to FPageitems.Length()-1 do
         begin
             it := FPageitems[i];
-            itwidth := length(it.Caption) * cw+40;
+            itwidth := length(it.Caption) * cw+50;
             if xct>0 and(r[2]-(FCloseBtn?20:0))<x+itwidth then
             begin
                 li++;