Ignore:
Timestamp:
Jun 7, 2016, 3:56:46 PM (8 years ago)
Author:
chronos
Message:
  • Modified: Now import format supports multiple more generic rules for parsing source content.
  • Added: Show total and filtered number of acronyms in acronyms list.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Forms/UFormImportFormat.lfm

    r25 r27  
    77  ClientHeight = 433
    88  ClientWidth = 664
    9   LCLVersion = '1.7'
     9  OnShow = FormShow
     10  LCLVersion = '1.6.0.4'
    1011  object ButtonOk: TButton
    1112    Left = 560
    … …  
    1314    Top = 384
    1415    Width = 75
     16    Anchors = [akRight, akBottom]
    1517    Caption = 'Ok'
    1618    ModalResult = 1
    … …  
    2224    Top = 384
    2325    Width = 75
     26    Anchors = [akRight, akBottom]
    2427    Caption = 'Cancel'
    2528    ModalResult = 2
    … …  
    2831  object Label1: TLabel
    2932    Left = 20
    30     Height = 22
     33    Height = 20
    3134    Top = 16
    32     Width = 49
     35    Width = 43
    3336    Caption = 'Name:'
    3437    ParentColor = False
    … …  
    3639  object EditName: TEdit
    3740    Left = 179
    38     Height = 32
     41    Height = 28
    3942    Top = 11
    4043    Width = 461
    … …  
    4245    TabOrder = 2
    4346  end
    44   object Label2: TLabel
     47  object Label8: TLabel
    4548    Left = 20
    46     Height = 22
    47     Top = 133
    48     Width = 112
    49     Caption = 'Acronym start:'
    50     ParentColor = False
    51   end
    52   object EditAcronymStart: TEdit
    53     Left = 179
    54     Height = 32
    55     Top = 128
    56     Width = 461
    57     Anchors = [akTop, akLeft, akRight]
    58     TabOrder = 3
    59   end
    60   object Label3: TLabel
    61     Left = 20
    62     Height = 22
    63     Top = 173
    64     Width = 105
    65     Caption = 'Acronym end:'
    66     ParentColor = False
    67   end
    68   object EditAcronymEnd: TEdit
    69     Left = 179
    70     Height = 32
    71     Top = 168
    72     Width = 461
    73     Anchors = [akTop, akLeft, akRight]
    74     TabOrder = 4
    75   end
    76   object Label4: TLabel
    77     Left = 20
    78     Height = 22
    79     Top = 213
    80     Width = 111
    81     Caption = 'Meaning start:'
    82     ParentColor = False
    83   end
    84   object EditMeaningStart: TEdit
    85     Left = 179
    86     Height = 32
    87     Top = 208
    88     Width = 461
    89     Anchors = [akTop, akLeft, akRight]
    90     TabOrder = 5
    91   end
    92   object Label5: TLabel
    93     Left = 20
    94     Height = 22
    95     Top = 253
    96     Width = 104
    97     Caption = 'Meaning end:'
    98     ParentColor = False
    99   end
    100   object EditMeaningEnd: TEdit
    101     Left = 179
    102     Height = 32
    103     Top = 248
    104     Width = 461
    105     Anchors = [akTop, akLeft, akRight]
    106     TabOrder = 6
    107   end
    108   object Label6: TLabel
    109     Left = 20
    110     Height = 22
    111     Top = 293
    112     Width = 132
    113     Caption = 'Description start:'
    114     ParentColor = False
    115   end
    116   object EditDescriptionStart: TEdit
    117     Left = 179
    118     Height = 32
    119     Top = 288
    120     Width = 461
    121     Anchors = [akTop, akLeft, akRight]
    122     TabOrder = 7
    123   end
    124   object Label7: TLabel
    125     Left = 20
    126     Height = 22
    127     Top = 333
    128     Width = 125
    129     Caption = 'Description end:'
    130     ParentColor = False
    131   end
    132   object EditDescriptionEnd: TEdit
    133     Left = 179
    134     Height = 32
    135     Top = 328
    136     Width = 461
    137     Anchors = [akTop, akLeft, akRight]
    138     TabOrder = 8
    139   end
    140   object Label8: TLabel
    141     Left = 24
    142     Height = 22
     49    Height = 20
    14350    Top = 53
    144     Width = 85
     51    Width = 72
    14552    Caption = 'Block start:'
    14653    ParentColor = False
    … …  
    14855  object EditBlockStart: TEdit
    14956    Left = 179
    150     Height = 32
     57    Height = 28
    15158    Top = 48
    15259    Width = 461
    15360    Anchors = [akTop, akLeft, akRight]
    154     TabOrder = 9
     61    TabOrder = 3
    15562  end
    15663  object Label9: TLabel
    157     Left = 24
    158     Height = 22
     64    Left = 20
     65    Height = 20
    15966    Top = 93
    160     Width = 78
     67    Width = 68
    16168    Caption = 'Block end:'
    16269    ParentColor = False
    … …  
    16471  object EditBlockEnd: TEdit
    16572    Left = 179
    166     Height = 32
     73    Height = 28
    16774    Top = 88
    16875    Width = 461
    16976    Anchors = [akTop, akLeft, akRight]
    170     TabOrder = 10
     77    TabOrder = 4
     78  end
     79  object ListViewItemRules: TListView
     80    Left = 20
     81    Height = 230
     82    Top = 144
     83    Width = 620
     84    Anchors = [akTop, akLeft, akRight, akBottom]
     85    Columns = <   
     86      item
     87        Caption = 'Start string'
     88        Width = 100
     89      end   
     90      item
     91        Caption = 'End string'
     92        Width = 100
     93      end   
     94      item
     95        Caption = 'Action'
     96        Width = 100
     97      end   
     98      item
     99        Caption = 'Variable'
     100        Width = 100
     101      end>
     102    OwnerData = True
     103    PopupMenu = PopupMenu1
     104    ReadOnly = True
     105    RowSelect = True
     106    TabOrder = 5
     107    ViewStyle = vsReport
     108    OnData = ListViewItemRulesData
     109    OnDblClick = AModifyExecute
     110  end
     111  object Label2: TLabel
     112    Left = 20
     113    Height = 20
     114    Top = 120
     115    Width = 68
     116    Caption = 'Item rules:'
     117    ParentColor = False
     118  end
     119  object PopupMenu1: TPopupMenu
     120    Images = FormMain.ImageList1
     121    left = 181
     122    top = 240
     123    object MenuItem1: TMenuItem
     124      Action = AAdd
     125    end
     126    object MenuItem2: TMenuItem
     127      Action = AModify
     128    end
     129    object MenuItem3: TMenuItem
     130      Action = ARemove
     131    end
     132    object MenuItem4: TMenuItem
     133      Action = AMoveUp
     134    end
     135    object MenuItem5: TMenuItem
     136      Action = AMoveDown
     137    end
     138  end
     139  object ActionList1: TActionList
     140    Images = FormMain.ImageList1
     141    left = 383
     142    top = 245
     143    object AAdd: TAction
     144      Caption = 'Add'
     145      OnExecute = AAddExecute
     146      ShortCut = 45
     147    end
     148    object AModify: TAction
     149      Caption = 'Modify'
     150      OnExecute = AModifyExecute
     151      ShortCut = 13
     152    end
     153    object ARemove: TAction
     154      Caption = 'Remove'
     155      OnExecute = ARemoveExecute
     156      ShortCut = 46
     157    end
     158    object AMoveUp: TAction
     159      Caption = 'Move up'
     160      OnExecute = AMoveUpExecute
     161    end
     162    object AMoveDown: TAction
     163      Caption = 'Move down'
     164      OnExecute = AMoveDownExecute
     165    end
    171166  end
    172167end
Note: See TracChangeset for help on using the changeset viewer.