Changeset 151 for trunk/TestCases.pas

Timestamp:

Jun 6, 2023, 11:15:57 AM (12 months ago)

Author:

chronos

Message:

• Added: New file compare dialog with additional normalize options.
• Modified: Compare action uses external compare tool.

File:

• trunk/TestCases.pas (modified) (1 diff)

trunk/TestCases.pas

@@ -181 +181 @@
         VCardEnd + VCardLineEnding;
     end;
+
+    with TTestCaseLoadSave(AddNew('Merge same cell phone', TTestCaseLoadSave)) do begin
+      Input := VCardBegin + MacLineEnding +
+        VCardVersion + MacLineEnding +
+        'N:Surname;Name' + MacLineEnding +
+        'FN:Name Surname' + MacLineEnding +
+        'TEL;CELL:123456789' + MacLineEnding +
+        VCardEnd + MacLineEnding +
+
+        VCardBegin + MacLineEnding +
+        VCardVersion + MacLineEnding +
+        'N:Surname2;Name' + MacLineEnding +
+        'FN:Name Surname2' + MacLineEnding +
+        'TEL;CELL:123456789' + MacLineEnding +
+        VCardEnd + MacLineEnding;
+      Output := VCardBegin + VCardLineEnding +
+        VCardVersion + VCardLineEnding +
+        'N:Surname;Name' + VCardLineEnding +
+        'FN:Name Surname' + VCardLineEnding +
+        'TEL;CELL:123456789' + MacLineEnding +
+        VCardEnd + VCardLineEnding;
+    end;
   end;
 end;