Ein Zeichen aus einem String extrahieren...?

[uwewo]

Hallo,

dafür gibt es doch einen Befehl in Delphi siehe Hilfe.

procedure Delete(var S: string; Index, Count:Integer); Beschreibung

Delete entfernt, beginnend mit S[Index], Count Zeichen aus dem String S. S ist eine String-Variable. Index und Count sind Integer-Ausdrücke.

Ist der Wert von Index größer als die Länge von S, werden keine Zeichen gelöscht. Werden mit Count mehr Zeichen angegeben, als beginnend bei S[Index] im String vorhanden sind, wird der Rest des Strings gelöscht.