function PosEx(const SubStr, S: string; Offset: Cardinal = 1): Integer;[/code]

этот интерфейс в точности совместим с интерфейсом стандартной ф-ции pos. И все же это отдельная ф-ция с префиксом, явно указывающим на её расширение.

Однако вопрос даже не в этом, а в том, что в тех кусках кода, где такое расширение совершенно ни к чему на пустом месте возникнет пусть и небольшая, но всетаки задержка в сравнение с оригиналом. Конечно это смешной аргумент с учетом уже существующих потерь(достаточно больших потерь) времени выполнения, но все же.