function pos

Syntax:

function pos(SubStr: string; s: string): string;

Beschreibung:

Die Funktion gibt den Indexwert des ersten Zeichens innerhalb des angegebenen Teil-Strings zurück, der in einem String vorkommt.
In Delphi sucht Pos 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.

Beispiel:


procedure copyLastname;
  var
  Person, Nachname: string;
  aIndex: integer;
begin
  Person := 'Mustermann Max';
  aIndex := Pos(' ', Person);
  if aIndex > 0 then
  begin
    Nachname := copy(Person, 0, aIndex-1);
    Message_dlg(Nachname);
  end;
end;