found:=false;
while not eof(f) and not found do
begin
read(f,x);
found:=Проверяешь условие;
end;
работа с типизированными файлами
Братцы, подскажите, как сделать поиск в типизированном файле, желательно с кодом, обыскал инет, ну ничего путного нет
Перебирать все записи с помощью Read, сравнивать пока не найдем.
А оправдать ник и сделать собственное решение выходит слабо?
Цитата: hardcase
А оправдать ник и сделать собственное решение выходит слабо?
ну во-первых: когда сюда регился не подумал о этом
а во-вторых: форум и создан для того, чтобы помогать друг другу
Цитата: KIV
Перебирать все записи с помощью Read, сравнивать пока не найдем.
простите за мою наглость, а можно в коде это изобразить, пожалуйста
Код: