Changeset 90 for trunk/Forms/UFormMain.lfm

Timestamp:

Aug 10, 2016, 11:24:45 PM (8 years ago)

Author:

chronos

Message:

• Added: Acronym export action in menu Tools - Export. Supported formats are CSV and MediaWiki list/table.

File:

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

trunk/Forms/UFormMain.lfm

@@ -3 +3 @@
   Height = 446
   Top = 342
-  Width = 631
+  Width = 782
   Caption = 'Acronym Decoder'
-  ClientHeight = 421
-  ClientWidth = 631
+  ClientHeight = 414
+  ClientWidth = 782
   Menu = MainMenu1
   OnClose = FormClose
@@ -17 +17 @@
   object Panel1: TPanel
     Left = 0
-    Height = 395
+    Height = 388
     Top = 26
-    Width = 631
+    Width = 782
     Align = alClient
     BevelOuter = bvNone
-    ClientHeight = 395
-    ClientWidth = 631
+    ClientHeight = 388
+    ClientWidth = 782
     TabOrder = 1
     object CheckBoxExactMath: TCheckBox
       Left = 8
-      Height = 24
+      Height = 28
       Top = 3
-      Width = 104
+      Width = 129
       Caption = 'Exact match'
       OnChange = CheckBoxExactMathChange
@@ -38 +38 @@
       Height = 30
       Top = 32
-      Width = 616
+      Width = 767
       OnChange = ListViewFilter1Change
       Anchors = [akTop, akLeft, akRight]
@@ -44 +44 @@
     object ListViewAcronyms: TListView
       Left = 8
-      Height = 323
+      Height = 316
       Top = 64
-      Width = 616
+      Width = 767
       Anchors = [akTop, akLeft, akRight, akBottom]
       Columns = <      
@@ -54 +54 @@
         end      
         item
-          Caption = 'Description'
+          Caption = 'Meaning'
           Width = 300
         end      
         item
           Caption = 'Categories'
-          Width = 300
+          Width = 347
         end>
       OwnerData = True
@@ -75 +75 @@
     Height = 26
     Top = 0
-    Width = 631
+    Width = 782
     Caption = 'ToolBar1'
     Images = ImageList1
@@ -699 +699 @@
     end
     object MenuItem3: TMenuItem
-      Action = AManualImport
+      Action = AImport
     end
     object MenuItem19: TMenuItem
@@ -793 +793 @@
       OnExecute = AShowExecute
     end
-    object AManualImport: TAction
-      Caption = 'Manual import'
-      OnExecute = AManualImportExecute
+    object AImport: TAction
+      Caption = 'Import'
+      OnExecute = AImportExecute
     end
     object AFileOpen: TAction
@@ -866 +866 @@
       OnExecute = AProcessImportsExecute
       ShortCut = 119
+    end
+    object AExport: TAction
+      Caption = 'Export'
+      OnExecute = AExportExecute
     end
   end
@@ -1290 +1294 @@
       Caption = 'Tools'
       object MenuItem17: TMenuItem
-        Action = AManualImport
+        Action = AImport
+      end
+      object MenuItem25: TMenuItem
+        Action = AExport
       end
       object MenuItem23: TMenuItem
@@ -2002 +2009 @@
   end
   object PopupMenuOpenRecent: TPopupMenu
-    left = 379
-    top = 136
+    left = 672
+    top = 144
   end
 end