Поиск слов в тексте

[pleer]

Появилась нужда в програмке, которая отыскивает в текстовом файле имена собственные(например, названия городов и т.д.) и записывает их, например в файл.Не аодскажите как ее сделать?

[mutabor]

Подскажем, а что конкретно подсказать? Как файл открыть или же как в строке нужное слово искать? Или и то и другое и можно без хлеба?

[pleer]

Ну собственно подсказать то нужно только как выискивать слова пока они в тексте не закончатся.Но желательно конечно и с записью в файл, хотя можно слова вывести какнибуть подругому, например, записать в TMemo

[bill]

Как выискивать-по любому у вас должен быть список имен собсвенных. И его лучше держать в файле, потом считать думаю в

 
stringlist(stringlist.add()). Запись в файл-
var f:textfile;
begin
assignfile(f,'c:\d.txt');
append(f);
write(f,'то что хотите записать');
closefile(f);
end; ....

Можно делать типизированый файл,можно ini. на форуме много примеров.

[mutabor]

Тебе нужна функция Pos. Она ищет в строке подстроку (нужное слово) и если находит передает индекс первого символа, если не находит то ноль.
Надо в цикле перебрать все строки в файле этой функцией. Условие - while not EOf(f) где f - файловая переменная.

Работа с текстовыми файлами
AssignFile - назначить файловую переменную
Reset - открыть для чтения
Rewrite - открыть для перезаписи
Append - открыть для добавления
Read - прочесть символ
ReadLn - прочесть строку
CloseFile - закрыть

Более подробно все это есть в справке Дельфи.

[pleer]

mutabor
А можно небольшой примерчик, как мне можно ее использовать?