nesco писал(а):
это даст прирост производительности"Чистим" функцию. Оставляем только, например:
function PosEx2(const SubStr,S: string; Offset: integer = 1): integer;
begin
end;
и получаем на длинной строке время ~220 мс.
Это ни о чем не говорит ?