Ignore:
Timestamp:
Aug 23, 2022, 10:06:54 AM (21 months ago)
Author:
chronos
Message:
  • Added: Allow to configure visible columns in contacts table.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Forms/UFormContacts.lfm

    r128 r138  
    1313  OnResize = FormResize
    1414  OnShow = FormShow
    15   LCLVersion = '2.2.0.4'
     15  LCLVersion = '2.2.2.0'
    1616  object ListView1: TListView
    1717    Left = 0
    18     Height = 810
     18    Height = 809
    1919    Top = 0
    2020    Width = 1210
     
    6868    Left = 0
    6969    Height = 39
    70     Top = 842
     70    Top = 841
    7171    Width = 1210
    7272    Align = alBottom
     
    116116    Left = 0
    117117    Height = 32
    118     Top = 810
     118    Top = 809
    119119    Width = 1210
    120120    OnChange = ListViewFilter1Change
     
    123123  object StatusBar1: TStatusBar
    124124    Left = 0
    125     Height = 27
    126     Top = 881
     125    Height = 28
     126    Top = 880
    127127    Width = 1210
    128128    Panels = <   
     
    171171    object MenuItem8: TMenuItem
    172172      Action = ASaveToFile
     173    end
     174    object Separator1: TMenuItem
     175      Caption = '-'
     176    end
     177    object MenuItemColumns: TMenuItem
     178      Action = AColumns
    173179    end
    174180  end
     
    233239      ShortCut = 16470
    234240    end
     241    object AColumns: TAction
     242      Caption = 'Columns'
     243      OnExecute = AColumnsExecute
     244    end
    235245  end
    236246  object ListViewSort1: TListViewSort
Note: See TracChangeset for help on using the changeset viewer.