* Fixes

OleksiyPenkov · May 19, 2023 · a007f77 · a007f77
1 parent b0cfe60
commit a007f77
Show file tree

Hide file tree

Showing 15 changed files with 458 additions and 569 deletions.
diff --git a/Components/MHLComponents/MHLComponents.identcache b/Components/MHLComponents/MHLComponents.identcache
diff --git a/Program/Forms/Editors/frm_EditGroup.dfm b/Program/Forms/Editors/frm_EditGroup.dfm
@@ -3,7 +3,7 @@ object frmEditGroup: TfrmEditGroup
   Top = 0
   AutoSize = True
   BorderStyle = bsDialog
-  Caption = #1053#1086#1074#1072#1103' '#1075#1088#1091#1087#1087#1072
+  Caption = #1053#1086#1074#1072' '#1075#1088#1091#1087#1072
   ClientHeight = 94
   ClientWidth = 312
   Color = clBtnFace
@@ -12,10 +12,8 @@ object frmEditGroup: TfrmEditGroup
   Font.Height = -11
   Font.Name = 'Tahoma'
   Font.Style = []
-  OldCreateOrder = False
   Position = poMainFormCenter
   OnShow = FormShow
-  PixelsPerInch = 96
   TextHeight = 13
   object Label1: TLabel
     AlignWithMargins = True
@@ -27,8 +25,8 @@ object frmEditGroup: TfrmEditGroup
     Margins.Top = 10
     Margins.Right = 8
     Align = alTop
-    Caption = #1053#1072#1079#1074#1072#1085#1080#1077' '#1075#1088#1091#1087#1087#1099':'
-    ExplicitWidth = 92
+    Caption = #1053#1072#1079#1074#1072' '#1075#1088#1091#1087#1080':'
+    ExplicitWidth = 66
   end
   object pnButtons: TPanel
     Left = 0
@@ -49,7 +47,7 @@ object frmEditGroup: TfrmEditGroup
       Width = 75
       Height = 25
       Anchors = [akTop, akRight]
-      Caption = '&'#1057#1086#1093#1088#1072#1085#1080#1090#1100
+      Caption = '&'#1047#1073#1077#1088#1077#1075#1090#1080
       Default = True
       ModalResult = 1
       TabOrder = 0
@@ -61,7 +59,7 @@ object frmEditGroup: TfrmEditGroup
       Height = 25
       Anchors = [akTop, akRight]
       Cancel = True
-      Caption = '&'#1054#1090#1084#1077#1085#1072
+      Caption = '&'#1042#1110#1076#1084#1110#1085#1072
       ModalResult = 2
       TabOrder = 1
     end

diff --git a/Program/Forms/Editors/frm_EditGroup.pas b/Program/Forms/Editors/frm_EditGroup.pas
@@ -1,4 +1,4 @@
-unit frm_EditGroup;
+unit frm_EditGroup;
 
 interface
 
@@ -35,8 +35,8 @@ function EditGroup(var groupName: string): Boolean;
 implementation
 
 resourcestring
-  rstrNewGroup = 'Новая группа';
-  rstrEditGroup = 'Редактирование группы';
+   rstrNewGroup = 'Нова група';
+   rstrEditGroup = 'Редагування групи';
 
 {$R *.dfm}