Pos

Search for substring in a string.

Declaration

Source position: systemh.inc line 1254

  function Pos(const substr: shortstring; const s: shortstring; 
              Offset: SizeInt) : SizeInt;
  function Pos(C: Char; const s: shortstring; Offset: SizeInt) : SizeInt;
  function Pos(const Substr: ShortString; const Source: RawByteString; 
              Offset: SizeInt) : SizeInt;
  function Pos(const substr: shortstring; c: Char; Offset: SizeInt)
               : SizeInt;
  function Pos(const Substr: RawByteString; const Source: RawByteString; 
              Offset: SizeInt) : SizeInt;
  function Pos(c: AnsiChar; const s: RawByteString; Offset: SizeInt)
               : SizeInt;
  function Pos(const Substr: UnicodeString; const Source: UnicodeString; 
              Offset: SizeInt) : SizeInt;
  function Pos(c: Char; const s: UnicodeString; Offset: SizeInt) : SizeInt;
  function Pos(c: UnicodeChar; const s: UnicodeString; Offset: SizeInt)
               : SizeInt;
  function Pos(const c: RawByteString; const s: UnicodeString; 
              Offset: SizeInt) : SizeInt;
  function Pos(const c: UnicodeString; const s: RawByteString; 
              Offset: SizeInt) : SizeInt;
  function Pos(const c: ShortString; const s: UnicodeString; 
              Offset: SizeInt) : SizeInt;
  function Pos(const Substr: WideString; const Source: WideString; 
              Offset: SizeInt) : SizeInt;
  function Pos(c: Char; const s: WideString; Offset: SizeInt) : SizeInt;
  function Pos(c: WideChar; const s: WideString; Offset: SizeInt)
               : SizeInt;
  function Pos(c: WideChar; const s: RawByteString; Offset: SizeInt)
               : SizeInt;
  function Pos(const c: RawByteString; const s: WideString; 
              Offset: SizeInt) : SizeInt;
  function Pos(const c: WideString; const s: RawByteString; 
              Offset: SizeInt) : SizeInt;
  function Pos(const c: ShortString; const s: WideString; Offset: SizeInt)
               : SizeInt;
  function Pos(c: Char; const v: Variant) : SizeInt;
  function Pos(s: ShortString; const v: Variant) : SizeInt;
  function Pos(const a: AnsiString; const v: Variant) : SizeInt;
  function Pos(const w: WideString; const v: Variant) : SizeInt;
  function Pos(const w: UnicodeString; const v: Variant) : SizeInt;
  function Pos(const v: Variant; const c: Char) : SizeInt;
  function Pos(const v: Variant; const s: ShortString) : SizeInt;
  function Pos(const v: Variant; const a: AnsiString) : SizeInt;
  function Pos(const v: Variant; const w: WideString) : SizeInt;
  function Pos(const v: Variant; const w: UnicodeString) : SizeInt;
  function Pos(const v1: Variant; const v2: Variant) : SizeInt;

Description

Pos returns the index of Substr in S, if S contains Substr. In case Substr isn't found, 0 is returned. The search is case-sensitive.

Errors

None

See also

Name Description
Copy Copy part of a string.
Delete Delete elements (characters) from a string or dynamic array.
Insert Insert one string or dynamic array in another.
Length Returns length of a string or array.

Example

Program Example48;
{ Program to demonstrate the Pos function. }
Var
  S : String;
begin
  S:='The first space in this sentence is at position : ';
  Writeln (S,pos(' ',S));
  S:='The last letter of the alphabet doesn''t appear in this sentence ';
  If (Pos ('Z',S)=0) and (Pos('z',S)=0) then
    Writeln (S);
end.