String aus einer TXT abschneiden(Wichtig)

[Luckie]

Sehr schön. Und jetzt lesen wir das noch mal gemeinsam durch ja?

Die Funktion Pos gibt den Indexwert des ersten Zeichens innerhalb des angegebenen Teil-Strings zurück, der in einem String vorkommt.

function Pos(Substr: string; S: string): Integer;

Pos sucht in dem String S nach dem Teil-String Substr. Die Parameter Substr und S sind String-Ausdrücke.

Wird der Teil-String gefunden, gibt Pos den Integer-Index des ersten Zeichens von Substr in S zurück. Die Groß/Kleinschreibung wird von Pos nicht berücksichtigt. Ist Substr nicht vorhanden, wird der Wert Null zurückgegeben.

-----------------------------------------------

Die Funktion Copy gibt einen Teil-String eines Strings oder [Rest geschenkt].

function Copy(S; Index, Count: Integer): string;

Beschreibung

S ist ein Ausdruck vom Typ String , Index und Count sind Integer-Ausdrücke. Copy gibt einen String zurück, der Count Zeichen enthält.

-----------------------------------------------

Die Prozedur Delete entfernt einen Teilstring aus einem String.

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

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


So und jetzt versuch mal selber.