Intern kann man es die Pos-Methode umschreiben auf
function Pos(const SubString, S: String): Integer;
begin
result := S.IndexOf(SubString) + 1;
end;
Diese neue Pos Funktion wird es "dann" hoffentlich in den sysutils geben, genau wie alle anderen "klassischen" Stringfunktionen...