Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ работа с текстовым файлом

Автор: Jeeb 25.01.2006 22:36

Есть текстовый файл... В нем располагаются записи, вот так:
Кличка - Шарик; Порода - Пудель; Возраст - 7; Владелец - Пупкин
и т.д. построчно...

Как осуществить поиск в текстовом файле по фамилии владельца и вывести всю эту строку на экран?

Автор: volvo 25.01.2006 23:04

Построчно читать из файла информацию в строку S, и использовать Pos для нахождения в строке слова "Владелец":

name := copy(s, pos('Владелец', s) + Length('Владелец - '),  255);

В переменной name будет фамилия записанного в данной строке владельца... И дальше - сравнение с заданной фамилией...

Автор: Jeeb 26.01.2006 0:57

спасибо, попробую....