Вниз
Скачать: CL | DM;

Функция поиска подстроки   Найти похожие ветки 

← →
kull   (2002-03-14 03:04) [0]

Знает кто-нибудь в Delphi функцию поиска подстроки в строки типа Pos(), но чтобы была не чувствительна к регистру?
Пробовал сначала AnsiUpperCase(), а потом использовать Pos(), но AnsiUpperCase() сильно тормозит...


← →
~Sergius   (2002-03-14 03:18) [1]

В чем тормозит ANSIUpperCase??


← →
kull   (2002-03-14 03:24) [2]

Дело в том, что если пропустить использование AnsiUpperCase то все работает раза в 2 быстрее.
А вообще то у меня имеется список строк и надо найти строки, которые содержат нужный текст.


← →
~Sergius   (2002-03-14 03:37) [3]

Разумеется, что оно без ANSIuppercase будет работать быстрее, поскольку ANSIuppercase вызывает еще OemToChar для преобразования из дос кодировки. Если строки не содержать русских символов в дос кодировке, тогда используй просто uppercase


← →
kull   (2002-03-14 03:40) [4]

Втом то и дело, что содержат русские символы и не русские.


← →
~Sergius   (2002-03-14 04:11) [5]

ну, тут разве что самому переводить через chartooem, но быстрее вряд ли будет -- посмотри исходники ANSIuppercase и поймешь, что оптимизировать там нечего. Разве что пересмотреть логику программы


← →
kull   (2002-03-14 13:15) [6]

Да... Я так и думал...


← →
Alx2 ©   (2002-03-14 13:37) [7]

Попробуй UpperCase почти вручную сделать.
Делаем массив
Var cnvMap : array ["а".."я"] of char = ("А","Б"...)
и через него конвертим в uppercase.
а cnvMap предварительно заполняем через AnsiUpperCase


← →
lipskiy ©   (2002-03-14 13:53) [8]

Согласен с Alx2. Я тоже делаю так - работает быстро.


← →
kull   (2002-03-15 02:05) [9]

Ok! Спасибо! Попробую...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c
3-90755
DeNN
2002-02-28 18:23
2002.03.28
Что за база такая???


14-91064
Sergo
2002-02-15 08:25
2002.03.28
Насчет здоровья


1-90848
lipskiy
2002-03-16 18:54
2002.03.28
Memo: как погасить курсор и прокрутить программно.


4-91114
Delphi 5.01
2002-01-27 07:38
2002.03.28
Как вывести сообшения выбора папки только в котором видны и рабочий стол и все остальное в пиктогарамах ну такое сообшение кода драивер меняеш и предлагается выбрать папкуб ну вот точно такое окно нужно!


1-90948
HELP!!!!!!!!!!!!!!!
2002-03-14 16:23
2002.03.28
!!!!!!!!!!!!!!!!!!




   Наверх