Поиск текста в файле ПОМОГИТЕ!!!

← →
rtooo (2003-08-26 17:42) [0]

Как найти текс в закрытом файле.
Ну как это делает windows в поиске "слово или фраза в файле"
Заранее огромное спасибо

← →
[lamer]Barmaglot (2003-08-26 17:44) [1]

Она его открывает - ищет текст - закрывает.
А в чем проблема?

← →
tulen (2003-08-26 17:45) [2]

Но это само сабой ...просто чтоб понятнее было написал...
Ты знаешь как это сделать? ...
Я ламер :)

← →
rtooo (2003-08-26 17:46) [3]

Но это само сабой ...просто чтоб понятнее было написал...
Ты знаешь как это сделать? ...
Я ламер :)

← →
[lamer]Barmaglot (2003-08-26 17:52) [4]

Ну если ламер, то наш человек. Как не помочь...

Самый простой метод перебором. Загружаешь файл в память (в стреам, в массив и т.д.) после чего сравниваешь первую букву с буквой в памяти если совпало ищещь вторую букву следом за первой и т.д. если совпали все буквы подряд, ты нашел свое слово. Если не совпало продолжаем искать...

Если на более сложном уровне то: http://algolist.manual.ru/

← →
jack128 (2003-08-26 18:29) [5]

var
f : file;
s : string;
begin
AssignFile(f,Filename);
reset(f,1);
try
SetLength(s,FileSize(f));
BlockRead(f,PChar(s)^, Length(s));
finally
CloseFile(f);
end;
// в строке s весь файл, поиск в строке - фнкция pos
end;

← →
rtooo (2003-08-26 20:39) [6]

спасибо большое!

Поиск текста в файле ПОМОГИТЕ!!! Найти похожие ветки