Changeset 100 for trunk/Forms/UFormMain.lfm

Timestamp:

Aug 31, 2016, 9:57:15 AM (8 years ago)

Author:

chronos

Message:

• Added: Resize ListView filter column width according ListView column width.
• Fixed: Row height in ListView to respect visual styles.

File:

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

trunk/Forms/UFormMain.lfm

@@ -1 +1 @@
 object FormMain: TFormMain
-  Left = 603
+  Left = 454
   Height = 446
-  Top = 342
+  Top = 401
   Width = 782
   Caption = 'Acronym Decoder'
-  ClientHeight = 421
+  ClientHeight = 422
   ClientWidth = 782
   Menu = MainMenu1
@@ -17 +17 @@
   object Panel1: TPanel
     Left = 0
-    Height = 395
+    Height = 396
     Top = 26
     Width = 782
     Align = alClient
     BevelOuter = bvNone
-    ClientHeight = 395
+    ClientHeight = 396
     ClientWidth = 782
     TabOrder = 1
     object CheckBoxExactMath: TCheckBox
       Left = 8
-      Height = 24
+      Height = 21
       Top = 3
-      Width = 104
+      Width = 102
       Caption = 'Exact match'
       OnChange = CheckBoxExactMathChange
@@ -44 +44 @@
     object ListViewAcronyms: TListView
       Left = 8
-      Height = 323
+      Height = 324
       Top = 64
       Width = 767
@@ -1434 +1434 @@
     OnCompareItem = ListViewSort1CompareItem
     OnFilter = ListViewSort1Filter
+    OnColumnWidthChanged = ListViewSort1ColumnWidthChanged
     Column = 0
     Order = soUp