Tad, ты последний выложенный код проверил, или как Насколько он меньше или больше штатного, да и в сравнении с твоим, тоже.
Как его быстродействие
На твоем супер-пупер слове, результат у меня не в пользу штатного и позиция первого вхождения определяется совершенно правильно.
То, что я предложил ни на какие внешние функции не ссылается, ни на Pos, ни на CopyEnd, он чисто -- сам в себе