Guten Abend,
ich würde da noch delete einwerfen wollen:
Zitat von
DelphiHilfe:
procedure Delete(var S: string; Index, Count:Integer);
Description
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 S 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 0, no characters are deleted.