Changeset 69 for trunk/UAcronym.pas

Timestamp:

Aug 1, 2016, 12:43:49 PM (8 years ago)

Author:

chronos

Message:

• Fixed: Set zero imported acronyms count before start of processing import sources.
• Modified: Open dialogs positioned at center of screen.
• Added: Open example acronyms by default if no other files were openned yet.

File:

• trunk/UAcronym.pas (modified) (2 diffs)

trunk/UAcronym.pas

@@ -430 +430 @@
   AddedAcronym: TAcronymMeaning;
 begin
-  ItemCount := 0;
   NewAcronym := TAcronymEntry.Create;
   try
@@ -550 +549 @@
 procedure TImportSource.Process;
 begin
+  ItemCount := 0;
   case Format.Kind of
     ifkParseURL: ProcessTextParseURL;