Changeset 31 for trunk/Forms/UFormImportFormat.lfm

Timestamp:

Jul 13, 2016, 10:34:13 AM (8 years ago)

Author:

chronos

Message:

• Added: Import format for MS Access database.
• Added: Show text hints on toolbar buttons.

File:

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

trunk/Forms/UFormImportFormat.lfm

@@ -33 +33 @@
     Left = 20
     Height = 20
-    Top = 16
+    Top = 53
     Width = 43
     Caption = 'Name:'
@@ -41 +41 @@
     Left = 179
     Height = 28
-    Top = 11
+    Top = 48
     Width = 461
     Anchors = [akTop, akLeft, akRight]
@@ -49 +49 @@
     Left = 20
     Height = 20
-    Top = 53
+    Top = 90
     Width = 72
     Caption = 'Block start:'
@@ -57 +57 @@
     Left = 179
     Height = 28
-    Top = 48
+    Top = 85
     Width = 461
     Anchors = [akTop, akLeft, akRight]
@@ -65 +65 @@
     Left = 20
     Height = 20
-    Top = 93
+    Top = 130
     Width = 68
     Caption = 'Block end:'
@@ -73 +73 @@
     Left = 179
     Height = 28
-    Top = 88
+    Top = 125
     Width = 461
     Anchors = [akTop, akLeft, akRight]
@@ -80 +80 @@
   object ListViewItemRules: TListView
     Left = 20
-    Height = 230
-    Top = 144
+    Height = 192
+    Top = 181
     Width = 620
     Anchors = [akTop, akLeft, akRight, akBottom]
@@ -117 +117 @@
     Left = 20
     Height = 20
-    Top = 120
+    Top = 157
     Width = 68
     Caption = 'Item rules:'
     ParentColor = False
   end
+  object Label3: TLabel
+    Left = 20
+    Height = 20
+    Top = 13
+    Width = 35
+    Caption = 'Type:'
+    ParentColor = False
+  end
+  object ComboBoxType: TComboBox
+    Left = 179
+    Height = 28
+    Top = 13
+    Width = 197
+    ItemHeight = 20
+    Items.Strings = (
+      'Text parse'
+      'MS Access database'
+    )
+    Style = csDropDownList
+    TabOrder = 6
+  end
   object PopupMenu1: TPopupMenu
     Images = FormMain.ImageList1
     left = 181
-    top = 240
+    top = 277
     object MenuItem1: TMenuItem
       Action = AAdd
@@ -145 +166 @@
     Images = FormMain.ImageList1
     left = 383
-    top = 245
+    top = 282
     object AAdd: TAction
       Caption = 'Add'