Beende die Klasse am Cursor funktioniert nicht

Gibt es eine schnelle GetToken-Routine für Delphi?

In meinem Programm verarbeite ich Millionen von Zeichenfolgen, die einen speziellen Charakter haben, z. "|" Token innerhalb jeder Zeichenfolge zu t...