Changeset 101 for trunk/Forms/UFormSettings.pas

Timestamp:

Feb 8, 2022, 6:07:35 PM (3 years ago)

Author:

chronos

Message:

• Added: Buttons to show contact home and work addresses on online map. Predefined map uses openstreetmap.org.

File:

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

trunk/Forms/UFormSettings.pas

@@ -22 +22 @@
     ComboBoxTheme: TComboBox;
     EditDefaultVcardVersion: TEdit;
+    EditMapUrl: TEdit;
     Label1: TLabel;
     Label2: TLabel;
@@ -103 +104 @@
   CheckBoxReopenLastFileOnStart.Checked := Core.ReopenLastFileOnStart;
   EditDefaultVcardVersion.Text := Core.DefaultVcardVersion;
+  EditMapUrl.Text := Core.MapUrl;
   UpdateInterface;
 end;
@@ -112 +114 @@
   Core.ReopenLastFileOnStart := CheckBoxReopenLastFileOnStart.Checked;
   Core.DefaultVcardVersion := EditDefaultVcardVersion.Text;
+  Core.MapUrl := EditMapUrl.Text;
 end;