delphi pos function not working code example

Example: pos in delphi

Semicolon := Pos(';', Remaining);