Changeset 74 for trunk/Forms/UFormImportSources.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/Forms/UFormImportSources.pas (modified) (1 diff)

trunk/Forms/UFormImportSources.pas

@@ -274 +274 @@
            if Pos(UTF8LowerCase(StringGrid.Cells[2, 0]),
              UTF8LowerCase(TImportSource(List.Items[I]).Categories.GetString)) > 0 then Inc(FoundCount);
-           if Pos(UTF8LowerCase(StringGrid.Cells[2, 0]),
+           if Pos(UTF8LowerCase(StringGrid.Cells[3, 0]),
              UTF8LowerCase(IntToStr(TImportSource(List.Items[I]).ItemCount))) > 0 then Inc(FoundCount);
-           if Pos(UTF8LowerCase(StringGrid.Cells[2, 0]),
+           if Pos(UTF8LowerCase(StringGrid.Cells[4, 0]),
              UTF8LowerCase(DateTimeToStr(TImportSource(List.Items[I]).LastImportTime))) > 0 then Inc(FoundCount);
            if FoundCount <> EnteredCount then List.Delete(I);