Changeset 138 for trunk/Forms/UFormMain.lfm

Timestamp:

Dec 2, 2016, 12:41:40 PM (8 years ago)

Author:

chronos

Message:

• Modified: Use more precise term "Same length" rather then "Exact match" for acronym text filtering.
• Fixed: Application directory location for Windows installer script.

File:

• trunk/Forms/UFormMain.lfm (modified) (7 diffs)

trunk/Forms/UFormMain.lfm

@@ -1 +1 @@
 object FormMain: TFormMain
-  Left = 675
+  Left = 526
   Height = 447
-  Top = 668
+  Top = 394
   Width = 782
   Caption = 'Acronym Decoder'
-  ClientHeight = 417
+  ClientHeight = 422
   ClientWidth = 782
   Menu = MainMenu1
@@ -14 +14 @@
   OnHide = FormHide
   OnShow = FormShow
-  LCLVersion = '1.6.0.4'
+  LCLVersion = '1.6.2.0'
   object PanelMain: TPanel
     Left = 0
-    Height = 361
+    Height = 366
     Top = 56
     Width = 782
     Align = alClient
     BevelOuter = bvNone
-    ClientHeight = 361
+    ClientHeight = 366
     ClientWidth = 782
     TabOrder = 1
@@ -35 +35 @@
     object ListViewAcronyms: TListView
       Left = 8
-      Height = 319
+      Height = 324
       Top = 35
       Width = 767
@@ -148 +148 @@
       Left = 258
       Top = 2
-      Action = AFilterExactMatch
+      Action = AFilterSameLength
       Style = tbsCheck
     end
@@ -154 +154 @@
       Left = 281
       Top = 2
-      Action = AFilterCaseSensitive
+      Action = AFilterSameLetterCase
       Style = tbsCheck
     end
@@ -168 +168 @@
     ClientWidth = 782
     TabOrder = 2
-    object CheckBoxExactMatch: TCheckBox
+    object CheckBoxExactLength: TCheckBox
       Left = 8
-      Height = 29
+      Height = 24
       Top = 3
-      Width = 124
-      Action = AFilterExactMatch
+      Width = 107
+      Action = AFilterSameLength
       TabOrder = 0
     end
     object CheckBoxCaseSensitive: TCheckBox
-      Left = 216
-      Height = 29
+      Left = 160
+      Height = 24
       Top = 3
-      Width = 139
-      Action = AFilterCaseSensitive
+      Width = 133
+      Action = AFilterSameLetterCase
       TabOrder = 1
     end
@@ -280 +280 @@
       OnExecute = AExportExecute
     end
-    object AFilterExactMatch: TAction
+    object AFilterSameLength: TAction
       AutoCheck = True
-      Caption = 'Exact match'
+      Caption = 'Same length'
       ImageIndex = 18
-      OnExecute = AFilterExactMatchExecute
-    end
-    object AFilterCaseSensitive: TAction
+      OnExecute = AFilterSameLengthExecute
+    end
+    object AFilterSameLetterCase: TAction
       AutoCheck = True
-      Caption = 'Case sensitive'
+      Caption = 'Same letter case'
       ImageIndex = 17
-      OnExecute = AFilterCaseSensitiveExecute
+      OnExecute = AFilterSameLetterCaseExecute
     end
   end