Всем привет! Люди, в субботу зачет, помогите! Задача: "Прочитать из корневого каталога дискеты, все файлы с расширением *.doc" Кто знает, киньте, пожалуйста, пример кода!
volvo
21.12.2006 14:55
Что значит "прочитать"? Список что-ли вывести? Тогда это FindFirst+FindNext - три строчки кода...
=MaZaTRaKer=
21.12.2006 14:57
Да, вывести список, а ты не мог бы напечать три этих строчки?
volvo
21.12.2006 15:00
uses dos;
var DirInfo: SearchRec;
begin
FindFirst('A:\*.DOC', Archive, DirInfo);
while DosError = 0dobegin
Writeln(DirInfo.Name);
FindNext(DirInfo);
end;
end.
Гость
23.12.2006 9:25
Кто-нибудь сможет, буквально за 10 мин помощь мне?!Мне необходимо написать программу на Паскале, считающую количество файлов созданных в текущем месяце на корневом каталоге дискеты
=MaZaTRaKer=
23.12.2006 9:36
Volvo, большое спасибо, все работает! Но где там идет использование прерывания 13h?
volvo
23.12.2006 12:52
Цитата
Но где там идет использование прерывания 13h?
А где у тебя в задании было сказано про использование этого прерывания? Я что, телепат?
Гость
26.12.2006 14:57
Это =MaZaTRaKeR=! Volvo, прости пожалуйста, но, нам нельзя использовать dos как сделать эту же задачу с использованием 13h?
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.