Changeset 21 for trunk/Forms/UFormMain.lfm

Timestamp:

May 4, 2016, 9:51:49 PM (9 years ago)

Author:

chronos

Message:

• Added: About application information form.

File:

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

trunk/Forms/UFormMain.lfm

@@ -5 +5 @@
   Width = 631
   Caption = 'Acronym Decoder'
-  ClientHeight = 421
+  ClientHeight = 414
   ClientWidth = 631
   Menu = MainMenu1
@@ -13 +13 @@
   OnDestroy = FormDestroy
   OnShow = FormShow
-  LCLVersion = '1.6.0.4'
+  LCLVersion = '1.7'
   object ListViewAcronyms: TListView
     Left = 8
-    Height = 340
-    Top = 72
+    Height = 333
+    Top = 64
     Width = 613
     Anchors = [akTop, akLeft, akRight, akBottom]
@@ -51 +51 @@
   object CheckBoxExactMath: TCheckBox
     Left = 8
-    Height = 24
+    Height = 28
     Top = 3
-    Width = 104
+    Width = 129
     Caption = 'Exact match'
     OnChange = CheckBoxExactMathChange
@@ -4420 +4420 @@
       OnExecute = AShowImportSourcesExecute
     end
+    object AShowAbout: TAction
+      Caption = 'About'
+      OnExecute = AShowAboutExecute
+    end
   end
   object PersistentForm1: TPersistentForm
@@ -4430 +4434 @@
     Images = ImageList1
     left = 464
-    top = 80
+    top = 96
     object MenuItem8: TMenuItem
       Caption = 'File'
@@ -4479 +4483 @@
       end
     end
+    object MenuItem5: TMenuItem
+      Caption = 'Help'
+      object MenuItem6: TMenuItem
+        Action = AShowAbout
+      end
+    end
   end
   object OpenDialog1: TOpenDialog
@@ -4503 +4513 @@
     OnCompareItem = ListViewSort1CompareItem
     OnFilter = ListViewSort1Filter
-    Column = 0
-    Order = soDown
+    Column = 2
+    Order = soUp
     left = 464
     top = 208