Substring

Version 3

Substring (Ursprung; Von{; Länge}) String

Die Funktion Substring gibt eine Zeichenkette aus den Zeichen des Textes Ursprung ab dem Zeichen Von mit der Länge Länge zurück.

Ist Von größer als die Länge von String, wird Teilstring nicht ausgeführt.

Ist Von kleiner oder gleich 0, gibt Teilstring alle Zeichen bis zu dem Wert Länge zurück.

Wurde Länge nicht angegeben, gibt Teilstring alle Zeichen ab dem Wert Von bis zum Ende des Textes Ursprung zurück.

1. Dieses Beispiel zeigt die Verwendung von Substring. Die Ergebnisse werden der Variablen vsResult zugewiesen.

   vsResult := Substring ("08/04/62"; 4; 2) ` vsResult ergibt "04" 
   vsResult := Substring ("Hilfestellung"; 1; 5) ` vsResult ergibt "Hilfe" 
   vsResult := Substring (var; 2) ` vsResult ergibt alle Zeichen außer dem ersten

2. Folgende Projektmethode hängt die im Text gefundenen Abschnitte (als erster Parameter übergeben) in einer Tabelle vom Typ alpha oder Text an (der als zweiter Parameter übergebene Zeiger):

      ` EXTRACT PARAGRAPHS
      ` EXTRACT PARAGRAPHS (Text ; Zeiger )
      ` EXTRACT PARAGRAPHS (Zu übertragender Text; -> Array der ¶-Zeichen )

   C_TEXT ($1)
   C_POINTER ($2)

   $vlElem:=Size of array($2->)
   Repeat
      $vlElem:=$vlElem+1
      INSERT ELEMENT($2->;$vlElem)
      $vlPos:=Position(Char(Carriage return);$1)
      If ($vlPos>0)
         $2->{$vlElem}:=Substring($1;1;$vlPos-1)
         $1:=Substring($1;$vlPos+1)
      Else
         $2->{$vlElem}:=$1
      End if
   Until ($1="")

Position.

Anwendung des Befehls

Email–Embedded Tags, Filter Keystroke, Format Telephone, Passing Parameters, Text To Array, vCard Import Export

---