Changeset 74 for trunk/Packages/Common/UListViewSort.pas

Timestamp:

Aug 2, 2016, 12:27:13 PM (8 years ago)

Author:

chronos

Message:

• Fixed: Wrong column indexes in list of import sources.
• Fixed: Do not sort items in TListSort component if soNone order is set.

File:

• trunk/Packages/Common/UListViewSort.pas (modified) (1 diff)

trunk/Packages/Common/UListViewSort.pas

@@ -209 +209 @@
   if ListView.Items.Count <> List.Count then
     ListView.Items.Count := List.Count;
-  if Assigned(FOnCompareItem) then Sort(FOnCompareItem);
+  if Assigned(FOnCompareItem) and (Order <> soNone) then Sort(FOnCompareItem);
   //ListView.Items[-1]; // Workaround for not show first row if selected
   ListView.Refresh;