Changeset 62 for trunk/Forms/UFormGenerate.pas

Timestamp:

Dec 9, 2021, 10:53:52 PM (3 years ago)

Author:

chronos

Message:

• Added: New feature to split multiple contacts into separate files. Accessible from File menu.

File:

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

trunk/Forms/UFormGenerate.pas

@@ -46 +46 @@
   for I := 1 to SpinEditCount.Value do begin
     Contact := Contacts.AddNew;
+    Contact.Fields[cfVersion] := '2.1';
     Contact.Fields[cfFirstName] := 'First ' + IntToStr(Random(10000));
     Contact.Fields[cfLastName] := 'Last ' + IntToStr(Random(10000));