Changeset 32 for trunk/Forms/UFormContacts.lfm

Timestamp:

Nov 25, 2021, 11:32:55 AM (3 years ago)

Author:

chronos

Message:

• Added: Bottom column filter bar in contacts list.
• Added: Allow to sort columns in contacts list.

File:

• trunk/Forms/UFormContacts.lfm (modified) (3 diffs)

trunk/Forms/UFormContacts.lfm

@@ -14 +14 @@
   object ListView1: TListView
     Left = 0
-    Height = 869
+    Height = 837
     Top = 0
     Width = 1210
@@ -80 +80 @@
     end
   end
+  object ListViewFilter1: TListViewFilter
+    Left = 0
+    Height = 32
+    Top = 837
+    Width = 1210
+    OnChange = ListViewFilter1Change
+    Align = alBottom
+  end
   object PopupMenuContact: TPopupMenu
     Images = Core.ImageList1
@@ -125 +133 @@
     end
   end
+  object ListViewSort1: TListViewSort
+    ListView = ListView1
+    OnCompareItem = ListViewSort1CompareItem
+    OnFilter = ListViewSort1Filter
+    OnColumnWidthChanged = ListViewSort1ColumnWidthChanged
+    Column = 0
+    Order = soNone
+    Left = 528
+    Top = 428
+  end
 end