Changeset 104 for trunk/Forms/UFormTest.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/UFormTest.pas (modified) (1 diff)

trunk/Forms/UFormTest.pas

@@ -76 +76 @@
 
 procedure TFormTest.UpdateInterface;
-begin
-  ARun.Enabled := Assigned(ListViewTestCases.Selected);
-  AShow.Enabled := Assigned(ListViewTestCases.Selected);
+var
+  Selected: Boolean;
+begin
+  Selected := Assigned(ListViewTestCases.Selected);
+  ARun.Enabled := Selected;
+  AShow.Enabled := Selected;
 end;