Changeset 52 for trunk/Forms/UFormImportSources.pas

Timestamp:

Jul 25, 2016, 5:37:39 PM (8 years ago)

Author:

chronos

Message:

• Added: Remember last import date for import sources.

File:

• trunk/Forms/UFormImportSources.pas (modified) (3 diffs)

trunk/Forms/UFormImportSources.pas

@@ -64 +64 @@
   SRemoveImportSourceQuery = 'Do you really want to remove selected import sources?';
   SImportSourceAlreadyExists = 'Import source %s already exists!';
+  SProcessSelectedSource = 'Process selected import source';
 
 
@@ -75 +76 @@
     Item.Data := ImportSources[Item.Index];
     Item.SubItems.Add(URL);
+    Item.SubItems.Add(Categories.GetString);
     Item.SubItems.Add(IntToStr(ItemCount));
-    Item.SubItems.Add(Categories.GetString);
+    if LastImportTime <> 0 then
+      Item.SubItems.Add(DateToStr(LastImportTime))
+      else Item.SubItems.Add('');
     Item.Checked := Enabled;
   end;
@@ -158 +162 @@
 begin
   if Assigned(ListView1.Selected) then begin
-    JobProgressView1.AddJob('Process selected import source', ProcessImportJob);
+    JobProgressView1.AddJob(SProcessSelectedSource, ProcessImportJob);
     JobProgressView1.Start;
     ShowMessage(Format(SAddedCount, [TImportSource(ListView1.Selected.Data).ItemCount]));