Changeset 82 for trunk/Forms/UFormFind.pas

Timestamp:

Dec 21, 2021, 5:16:41 PM (2 years ago)

Author:

chronos

Message:

• Fixed: Settings option to load previously opened file wasn't working for disabled state.
• Fixed: Disable Find action if no file is opened.
• Modified: Move fields initialization method to TContact class and made it static so it is initialized only once.
• Added: Allow to set default vCard version in settings dialog.
• Modified: Add GTK2 theming support to snap package.

File:

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

trunk/Forms/UFormFind.pas

@@ -63 +63 @@
     Items := TStringList.Create;
     try
-      Contacts.ContactsFile.Fields.LoadToStrings(Items);
+      TContact.GetFields.LoadToStrings(Items);
 
       // Remove fields which are not used in contacts
@@ -75 +75 @@
       Items.Free;
     end;
-    ContactField := Contacts.ContactsFile.Fields.GetByIndex(ContactFieldIndex);
+    ContactField := TContact.GetFields.GetByIndex(ContactFieldIndex);
     ComboBoxField.ItemIndex := ComboBoxField.Items.IndexOfObject(ContactField);
     if (ComboBoxField.Items.Count > 0) and (ComboBoxField.ItemIndex = -1) then