Changeset 131 for trunk/Forms/UFormContact.pas

Timestamp:

Apr 9, 2022, 12:13:45 PM (3 years ago)

Author:

chronos

Message:

• Modified: Contact image unit moved into VCard package.

File:

• trunk/Forms/UFormContact.pas (modified) (1 diff)

trunk/Forms/UFormContact.pas

@@ -814 +814 @@
   FContact := nil;
   FormProperties := TFormProperties.Create(nil);
-  FPhoto := TContactImage.Create;
+  FPhoto := TContactImage.Create(nil);
   FPhoto.FieldIndex := cfPhoto;
   FPhoto.OnChange := PhotoChange;