Changeset 133 for trunk/Forms/UFormProperties.lfm

Timestamp:

Apr 10, 2022, 1:39:35 PM (2 years ago)

Author:

chronos

Message:

• Modified: Show number of removed duplicates.
• Fixed: Set document as modified only if data are really changed.

File:

• trunk/Forms/UFormProperties.lfm (modified) (9 diffs)

trunk/Forms/UFormProperties.lfm

@@ -1 +1 @@
 object FormProperties: TFormProperties
   Left = 400
-  Height = 946
+  Height = 908
   Top = 212
-  Width = 1260
+  Width = 1210
   Caption = 'Contacts'
-  ClientHeight = 946
-  ClientWidth = 1260
-  DesignTimePPI = 150
+  ClientHeight = 908
+  ClientWidth = 1210
+  DesignTimePPI = 144
   OnClose = FormClose
   OnCreate = FormCreate
@@ -14 +14 @@
   object ListView1: TListView
     Left = 0
-    Height = 844
+    Height = 810
     Top = 0
-    Width = 1260
+    Width = 1210
     Align = alClient
     Columns = <    
       item
         Caption = 'Name'
-        Width = 312
+        Width = 300
       end    
       item
         Caption = 'Attributes'
-        Width = 156
+        Width = 150
       end    
       item
         Caption = 'Values'
-        Width = 777
+        Width = 746
       end>
     MultiSelect = True
@@ -45 +45 @@
   object ToolBar1: TToolBar
     Left = 0
-    Height = 41
-    Top = 877
-    Width = 1260
+    Height = 39
+    Top = 842
+    Width = 1210
     Align = alBottom
     Images = Core.ImageList1
@@ -60 +60 @@
     end
     object ToolButton2: TToolButton
-      Left = 37
+      Left = 36
       Top = 2
       Action = AModify
     end
     object ToolButton3: TToolButton
-      Left = 109
+      Left = 106
       Top = 2
       Action = ARemove
     end
     object ToolButton4: TToolButton
-      Left = 73
+      Left = 71
       Top = 2
       Action = AClone
     end
     object ToolButton5: TToolButton
-      Left = 145
-      Height = 34
+      Left = 141
+      Height = 33
       Top = 2
       Style = tbsSeparator
     end
     object ToolButton6: TToolButton
-      Left = 153
+      Left = 149
       Top = 2
       Action = ALoadValueFromFile
     end
     object ToolButton7: TToolButton
-      Left = 189
+      Left = 184
       Top = 2
       Action = ASaveValueToFile
@@ -93 +93 @@
   object ListViewFilter1: TListViewFilter
     Left = 0
-    Height = 33
-    Top = 844
-    Width = 1260
+    Height = 32
+    Top = 810
+    Width = 1210
     OnChange = ListViewFilter1Change
     Align = alBottom
@@ -101 +101 @@
   object StatusBar1: TStatusBar
     Left = 0
-    Height = 28
-    Top = 918
-    Width = 1260
+    Height = 27
+    Top = 881
+    Width = 1210
     Panels = <    
       item
-        Width = 52
+        Width = 50
       end>
     SimplePanel = False
@@ -112 +112 @@
   object PopupMenuField: TPopupMenu
     Images = Core.ImageList1
-    Left = 453
-    Top = 274
+    Left = 435
+    Top = 263
     object MenuItem1: TMenuItem
       Action = AAdd
@@ -141 +141 @@
   object ActionList1: TActionList
     Images = Core.ImageList1
-    Left = 763
-    Top = 268
+    Left = 732
+    Top = 257
     object AAdd: TAction
       Caption = 'Add'
@@ -189 +189 @@
     Column = 0
     Order = soNone
-    Left = 550
-    Top = 446
+    Left = 528
+    Top = 428
   end
   object SaveDialog1: TSaveDialog
-    Left = 792
-    Top = 467
+    Left = 760
+    Top = 448
   end
   object OpenDialog1: TOpenDialog
-    Left = 792
-    Top = 542
+    Left = 760
+    Top = 520
   end
 end