Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2010-04-22 21:28:08 ЛС | профиль | цитата
nesco писал(а):
это даст прирост производительности
ну насчет производительности, помоему, лишняя цель.
"Чистим" функцию. Оставляем только, например:

function PosEx2(const  SubStr,S: string; Offset: integer = 1): integer;
begin

end;

и получаем на длинной строке время ~220 мс.

Это ни о чем не говорит ?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0