Changeset 53 for trunk/UCore.pas

Timestamp:

Dec 8, 2021, 2:02:17 PM (3 years ago)

Author:

chronos

Message:

• Added: Allow to load from file or save to file individual selected contacts from the list.

File:

• trunk/UCore.pas (modified) (3 diffs)

trunk/UCore.pas

@@ -82 +82 @@
     ReopenLastFileOnStart: Boolean;
     LastContactTabIndex: Integer;
+    LastContactFileName: string;
     ToolbarVisible: Boolean;
     function GetProfileImage: TImage;
@@ -431 +432 @@
     ReopenLastFileOnStart := ReadBoolWithDefault('ReopenLastFileOnStart', True);
     LastContactTabIndex := ReadIntegerWithDefault('LastContactTabIndex', 0);
+    LastContactFileName := ReadStringWithDefault('LastContactFileName', '');
   finally
     Free;
@@ -453 +455 @@
     WriteBool('ReopenLastFileOnStart', ReopenLastFileOnStart);
     WriteInteger('LastContactTabIndex', LastContactTabIndex);
+    WriteString('LastContactFileName', LastContactFileName);
   finally
     Free;