Changeset 56 for trunk/Forms/UFormImportSources.pas

Timestamp:

Jul 26, 2016, 2:13:41 PM (8 years ago)

Author:

chronos

Message:

• Added: Show how many new acronyms were imported.

File:

• trunk/Forms/UFormImportSources.pas (modified) (1 diff)

trunk/Forms/UFormImportSources.pas

@@ -162 +162 @@
 begin
   if Assigned(ListView1.Selected) then begin
+    FormMain.AcronymDb.AddedCount := 0;
     JobProgressView1.AddJob(SProcessSelectedSource, ProcessImportJob);
     JobProgressView1.Start;
-    ShowMessage(Format(SAddedCount, [TImportSource(ListView1.Selected.Data).ItemCount]));
+    ShowMessage(Format(SAddedCount, [TImportSource(ListView1.Selected.Data).ItemCount, FormMain.AcronymDb.AddedCount]));
   end;
 end;