Changeset 109 for trunk/Packages/Common/UCommon.pas

Timestamp:

Feb 14, 2022, 5:43:30 PM (2 years ago)

Author:

chronos

Message:

• Added: Synced edit of full name and name parts.

File:

• trunk/Packages/Common/UCommon.pas (modified) (1 diff)

trunk/Packages/Common/UCommon.pas

@@ -304 +304 @@
     end else Break;
   until False;
-  SetLength(Result, Length(Result) + 1);
-  Result[High(Result)] := Data;
+  if Data <> '' then begin
+    SetLength(Result, Length(Result) + 1);
+    Result[High(Result)] := Data;
+  end;
 end;