Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Вниз
поиск строки в строке Найти похожие ветки
← →
Pa5ha (2004-03-23 13:27) [0]Нужно проверить наличие строки в строке и вернуть желательно правду или ложь. Не подскажете ли функцию побыстрее, а то файлов очень много, которые проверять надо.
← →
Fay © (2004-03-23 13:30) [1]pos
← →
spirit © (2004-03-23 13:30) [2]Функция F1
← →
Fay © (2004-03-23 13:33) [3]Могу угадать следующий вопрос.
"Как загрузить/преобразовать файл в строку?!! Срочно!! Файлов очень много!!!!!"
← →
panov © (2004-03-23 13:33) [4]Не функцию тебе надо, а алгоритм поиска.
Ищи в яндексе по словам Мур delphi.
здесь смотри -
http://program.rin.ru/cgi-bin/print.pl?id=828
← →
Digitman © (2004-03-23 13:34) [5]Pos, AnsiPos, AnsiStrPos
выбирай на вкус
← →
Pa5ha (2004-03-24 14:14) [6]
> "Как загрузить/преобразовать файл в строку?!! Срочно!! Файлов
> очень много!!!!!"
Нет, не угадал. Как установить TListView, чтоб был виден найденый файл? Короче, как скролом пользоваться?
← →
vk_3057 © (2004-03-24 15:13) [7]function ExisySubStr(lpSubStr,lpStr:string):boolean;
begin
Result:=Pos(lpSubStr,lpStr)<>0;
end;
← →
Pa5ha (2004-03-24 15:29) [8]
vk_3057Сенкс.
← →
Defunct © (2004-03-24 15:31) [9]ЗЫ: если нужно искать строку в файле (с как можно более высокой скоростью поиска) - загружайте файл частично или полностью в массив символов или в TMemoryStream, и посимвольно ищите то, что Вам необходимо найти.
← →
Pa5ha (2004-03-24 16:12) [10]
> function ExisySubStr(lpSubStr,lpStr:string):boolean;
> begin
> Result:=Pos(lpSubStr,lpStr)<>0;
> end;
ERROR: не <>0, а >0;
А так все руль, всем спасибо, работает даже быстрее, чем я думал...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.042 c
