Changeset 104 for trunk/Forms/UFormContact.pas

Timestamp:

Feb 9, 2022, 5:07:14 PM (2 years ago)

Author:

chronos

Message:

• Modified: Updated speed of loading of big number of contacts.
• Added: Contact field indexes cache for faster reverse search of contact fields by its index.

File:

• trunk/Forms/UFormContact.pas (modified) (2 diffs)

trunk/Forms/UFormContact.pas

@@ -685 +685 @@
   if EditHomeAddressCity.Text <> '' then Address := Address + ' ' + EditHomeAddressCity.Text;
   if EditHomeAddressCountry.Text <> '' then Address := Address + ' ' + EditHomeAddressCountry.Text;
-  OpenURL(Core.MapUrl + URLEncode(Trim(Address)));
+  if Trim(Address) <> '' then
+    OpenURL(Core.MapUrl + URLEncode(Trim(Address)));
 end;
 
@@ -704 +705 @@
   if EditWorkAddressCity.Text <> '' then Address := Address + ' ' + EditWorkAddressCity.Text;
   if EditWorkAddressCountry.Text <> '' then Address := Address + ' ' + EditWorkAddressCountry.Text;
-  OpenURL(Core.MapUrl + URLEncode(Trim(Address)));
+  if Trim(Address) <> '' then
+    OpenURL(Core.MapUrl + URLEncode(Trim(Address)));
 end;