2
0
Эх сурвалжийг харах

Rename "Delete" button to "Close" to reflect true meaning.

Margers 1 сар өмнө
parent
commit
3a9d524113

+ 1 - 0
packages/ide/fpide.pas

@@ -474,6 +474,7 @@ resourcestring  menu_local_gotosource = '~G~oto source';
                 button_Delete      = '~D~elete';
                 button_Delete      = '~D~elete';
                 button_Show        = '~S~how';
                 button_Show        = '~S~how';
                 button_Hide        = '~H~ide';
                 button_Hide        = '~H~ide';
+                button_Close       = '~C~lose';
 
 
                 { dialogs }
                 { dialogs }
                 dialog_fillintemplateparameter = 'Fill in template parameter';
                 dialog_fillintemplateparameter = 'Fill in template parameter';

+ 2 - 2
packages/ide/fpmwnd.inc

@@ -181,7 +181,7 @@ constructor TWindowListDialog.Init;
 var R,R2: TRect;
 var R,R2: TRect;
     SB: PScrollBar;
     SB: PScrollBar;
 begin
 begin
-  R.Assign(0,0,Max(60,round(ScreenWidth*5/8)),Max(13,round(ScreenHeight*3/5)));
+  R.Assign(0,0,Max(60,round(ScreenWidth*5/8)),Max(14,round(ScreenHeight*3/5)));
   inherited Init(R, dialog_windowlist);
   inherited Init(R, dialog_windowlist);
   HelpCtx:=hcWindowList;
   HelpCtx:=hcWindowList;
   New(C, Init(20,10));
   New(C, Init(20,10));
@@ -203,7 +203,7 @@ begin
   GetExtent(R); R.Grow(-2,-2); Inc(R.A.Y); R.A.X:=R.B.X-13+1; R.B.Y:=R.A.Y+2;
   GetExtent(R); R.Grow(-2,-2); Inc(R.A.Y); R.A.X:=R.B.X-13+1; R.B.Y:=R.A.Y+2;
   Insert(New(PButton, Init(R, button_OK, cmOK, bfDefault)));
   Insert(New(PButton, Init(R, button_OK, cmOK, bfDefault)));
   R.Move(0,2);
   R.Move(0,2);
-  Insert(New(PButton, Init(R, button_Delete, cmDeleteItem, bfNormal)));
+  Insert(New(PButton, Init(R, button_Close, cmDeleteItem, bfNormal)));
   R.Move(0,2);
   R.Move(0,2);
   New(BtnShow, Init(R, button_Show, cmShowItem, bfNormal));
   New(BtnShow, Init(R, button_Show, cmShowItem, bfNormal));
   Insert(BtnShow);
   Insert(BtnShow);