Changeset 113 for tags/1.3.0/UContactImage.pas

Timestamp:

Feb 15, 2022, 10:11:54 AM (3 years ago)

Author:

chronos

Message:

• Modified: Version 1.3.0 release releated changes.

Merged revision(s) 112 from trunk:

• Fixed: Contact photo was not saved correctly.
• Fixed: URL contact photo was incorrectly encoded with BASE64 encoding.
• Fixed: Disabled not correctly working autodetection of max. line length.
• Fixed: Tab order in Contact name details window.

Location:

tags/1.3.0

Files:

• . (modified) (1 prop)
• UContactImage.pas (modified) (3 diffs)

tags/1.3.0/UContactImage.pas

@@ -295 +295 @@
       if Url <> '' then begin
         Contact.Fields[FieldIndex] := Url;
+        PhotoProperty.Encoding := '';
       end else begin
         PhotoProperty.Encoding := VCardBase64;
@@ -322 +323 @@
   Url := '';
   Used := False;
+  Modified := True;
 end;
 
@@ -332 +334 @@
     Url := '';
     Used := True;
+    Modified := True;
   finally
     Free;