[Delphi] Usuwanie pionowych kresek z danych odbieranych przez Comport

Cytat:

procedure Delete(var S: String; Index: Integer; Count: Integer);

Description
Removes a substring from a string.

In Delphi code, Delete removes a substring of Count characters from string S starting with S[Index]. S is a string-type variable. Index and Count are integer-type expressions.

If index is larger than the length of the string or less than 1, no characters are deleted.

If count specifies more characters than remain starting at the index, Delete removes the rest of the string. If count is less than or equal to 0, no characters are deleted.