Презентация Работа с файлами ( Delphi/Pascal, глава 5) онлайн
На нашем сайте вы можете скачать и просмотреть онлайн доклад-презентацию на тему Работа с файлами ( Delphi/Pascal, глава 5) абсолютно бесплатно. Урок-презентация на эту тему содержит всего 43 слайда. Все материалы созданы в программе PowerPoint и имеют формат ppt или же pptx. Материалы и темы для презентаций взяты из открытых источников и загружены их авторами, за качество и достоверность информации в них администрация сайта не отвечает, все права принадлежат их создателям. Если вы нашли то, что искали, отблагодарите авторов - поделитесь ссылкой в социальных сетях, а наш сайт добавьте в закладки.
Презентации » Устройства и комплектующие » Работа с файлами ( Delphi/Pascal, глава 5)
Оцените!
Оцените презентацию от 1 до 5 баллов!
- Тип файла:ppt / pptx (powerpoint)
- Всего слайдов:43 слайда
- Для класса:1,2,3,4,5,6,7,8,9,10,11
- Размер файла:758.00 kB
- Просмотров:87
- Скачиваний:0
- Автор:неизвестен
Слайды и текст к этой презентации:
№2 слайд
![. Файловая система Файл](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img1.jpg)
Содержание слайда: 5.1 Файловая система
Файл – поименованная последовательность элементов данных (компонентов файла), хранящихся, как правило, во внешней памяти.
Как исключение данные файла могут не храниться, а вводиться с внешних устройств (ВУ), например клавиатуры или выводиться на ВУ.
Полное имя файла включает:
<Имя диска>:<Список имен каталогов>\<Имя файла>.<Расширение>
Имя файла в Windows составляют из строчных и прописных букв латинского и русского алфавитов, арабских цифр и некоторых специальных символов, например, символов подчеркивания «_» или доллара «$»
Расширение определяет тип хранящихся данных, например:
COM, EXE – исполняемые файлы (программы);
PAS, BAS, CPP – исходные тексты программ на алгоритмических языках ПАСКАЛЬ, БЭЙСИК и С++;
BMP, JPG, PIC – графические файлы (рисунки, фотографии);
WAV,MP3,WMA – музыкальные файлы.
№4 слайд
![Файлы Delphi Pascal Файл](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img3.jpg)
Содержание слайда: Файлы Delphi Pascal
Файл языка Pascal – последовательность однотипных компонентов: файл записей, файл целых чисел, файл строк.
В зависимости от типа компонентов различают три типа файлов: типизированные, текстовые и нетипизированные.
Количество компонентов файла при объявлении файловой переменной не указывается.
Максимальный размер файла определяется свободным пространством на устройстве, например, диске.
Физически операции ввода-вывода с файлами выполняются с использованием буфера.
Для файлов принципиально возможен не только последовательный, но и произвольный доступ, при котором чтение информации осуществляется из указанного места.
№5 слайд
![Указатель файла Доступ к](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img4.jpg)
Содержание слайда: Указатель файла
Доступ к компонентам файла осуществляется через указатель файла.
При выполнении операции чтения или записи указатель автоматически перемещается на следующий компонент.
После вывода последнего компонента файла система пишет специальную запись – маркер «Конец файла» (байт #26).
При обнаружении во время операции чтения маркера конца файла – операция завершается. Попытка читать маркер вызывает прерывание по ошибке чтения.
№6 слайд
![Описание файловых переменных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img5.jpg)
Содержание слайда: Описание файловых переменных
1. Типизированные файлы: file of <Тип компонента>,
где <Тип компонента> – любой тип данных, кроме файлового.
2. Текстовые файлы: text
3. Нетипизированные файлы: file
Примеры:
1) Var F1: file of real;
F2: file;
F3: Text; …
2) Type FF = file of integer;
FR = file;
FC = text;
Var F1:FF;
F2,F3:FC;
F4:FC; …
№8 слайд
![Работа с файлами Работа с](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img7.jpg)
Содержание слайда: Работа с файлами
Работа с файлами включает:
инициализацию файловой переменной – установление связи файловой переменной с файлом;
открытие файла – подготовку файла для выполнения операций ввода-вывода;
обработку компонентов файла – выполнение операций ввода-вывода элементов данных;
закрытие файла.
№9 слайд
![Инициализация файловой](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img8.jpg)
Содержание слайда: Инициализация файловой переменной
Процедура Assign или AssignFile (Var f; st:string) – связывает файловую переменную f с файлом, имя которого указано в строке st.
Если файл находится в текущем каталоге, то достаточно задать имя файла и его расширение. В противном случае необходимо указать полное имя файла.
Пример:
Type FI1 = file of integer;
Var f1,f2: FI1;
...
AssignFile (f1, ’F1.dat’); {файл в текущем каталоге}
AssignFile (f2, ’d:\iva\a.dat’); {файл в другом каталоге}
№10 слайд
![Открытие файла При открытии](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img9.jpg)
Содержание слайда: Открытие файла
При открытии файла необходимо задать направление передачи данных: запись или чтение. Кроме того текстовый файл можно открыть для добавления компонентов.
1. Процедура ReSet(Var f) – открывает файл для чтения данных.
Устанавливает указатель файла на первый компонент. Если файл не существует, выдается сообщение об ошибке.
2. Процедура ReWrite(Var f) – открывает файл для записи.
Если указанный файл существовал, то он уничтожается без выдачи предупреждения пользователю, иначе он создается и указатель устанавливается на начало.
3. Процедура AppEnd(Var f:text) – открывает текстовый файл для добавления данных.
Указатель файла устанавливается на конец файла.
№11 слайд
![Контроль операций](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img10.jpg)
Содержание слайда: Контроль операций ввода-вывода
4. Функция IOResult:Word – возвращает код завершения операции ввода-вывода: 0 – если операция прошла нормально, код ошибки, если нет. Функция применяется при отключенном контроле операций ввода-вывода {$I-}.
Пример. Проверка существования файла.
Var f:file of char;
Begin
AssignFile(f,’a.dat’); {инициализация ф. п.}
{$I-} {отключение контроля ошибок ввода-вывода}
ReSet(f); {открытие файла для чтения}
{$I+} {включение контроля ошибок ввода-вывода}
if IOResult<>0 then WriteLn(’File was not found’)
else WriteLn(’File was found’); ...
№12 слайд
![Обработка компонентов файла](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img11.jpg)
Содержание слайда: Обработка компонентов файла
Основные операции над компонентами – операции записи и чтения. На базе этих операций выполняют более сложные операции:
создание файла – занесение в файл требуемых записей;
модификация файла – изменение всех или нескольких записей, добавление и удаление записей;
поиск нужной информации в файле.
Операции записи и чтения для каждого типа файла осуществляется по-своему.
№13 слайд
![Закрытие файла Процедура](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img12.jpg)
Содержание слайда: Закрытие файла
Процедура Close или CloseFile(Var f) - выполняет закрытие файла. При этом вновь созданный файл регистрируется в каталоге.
Процедура закрытия файла обеспечивает вывод оставшихся компонентов из буфера в файл.
Связь файловой переменной с файлом при закрытии сохраняется, поэтому при продолжении обработки повторно процедуру AssignFile() можно не выполнять.
Пример:
CloseFile(f);
№14 слайд
![Стандартные процедуры и](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img13.jpg)
Содержание слайда: Стандартные процедуры и функции обслуживания файлов (библ. System)
1. Процедура ReName(Var f; name:string) – выполняет переименование файла f, где name – новое имя файла.
При совпадении нового имени файла с ранее существовавшим выдается сообщение об ошибке.
2. Процедура Erase(Var f) – выполняет удаление файла. Перед уничтожением файл должен быть закрыт.
3. Функция EOF(Var f):boolean – проверяет конец файла, возвращает TRUE, если указатель стоит после последней записи и FALSE, если нет.
Другие функции обслуживания файлов см. Help.
№15 слайд
![. Текстовые файлы Текстовый](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img14.jpg)
Содержание слайда: 5.2 Текстовые файлы
Текстовый файл – файл, компонентами которого являются символьные строки переменной длины, заканчивающиеся специальным маркером – маркером «Конец строки».
Текстовые файлы используют для хранения и обработки символов, строк, символьных массивов. Числовые и логические данные при записи в текстовые файлы должны преобразовываться в символьные строки.
Текстовый файл можно открыть для записи, чтения и добавления записей в конец. Файл, открытый для записи, не может использоваться для чтения и наоборот.
№16 слайд
![Стандартные текстовые файлы](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img15.jpg)
Содержание слайда: Стандартные текстовые файлы
Программе, работающей в консольном режиме, без объявления, инициализации файловой переменной и открытия доступны два стандартных текстовых файла, связанных с логическими устройствами ввода и вывода:
INPUT – файловая переменная для обозначения файла данных, вводимых с клавиатуры;
OUTPUT – файловая переменная для обозначения файла данных, выводимых на экран.
№17 слайд
![Процедуры и функции обработки](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img16.jpg)
Содержание слайда: Процедуры и функции обработки
текстовых файлов
1. Функция EOLn([Var f]): Boolean – возвращает TRUE, если во входном текстовом файле достигнут маркер конца строки; при отсутствии файловой переменной проверяется файл INPUT, связанный с клавиатурой.
При работе с клавиатурой функция EOLn возвращает TRUE, если последним считанным был символ #13.
При работе с диском функция EOLn возвращает TRUE, если следующим считанным будет символ #13.
2. Процедура Read([Var f:text;]v1,v2,...vn) – обеспечивает ввод символов, строк и чисел. При вводе чисел пробелы и символы табуляции игнорируются. Если файловая переменная не указана, то ввод осуществляется из файла INPUT.
№18 слайд
![Процедуры и функции обработки](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img17.jpg)
Содержание слайда: Процедуры и функции обработки
текстовых файлов (2)
3. Процедура ReadLn([Var f;][v1,v2,...,vn]) – осуществляет ввод символов, строк и чисел. После чтения последней переменной оставшаяся часть строки до маркера конца строки пропускается так, что следующее обращение к ReadLn или Read начинается с первого символа новой строки.
4. Процедура Write([Var f;]v1,v2, ...,vn ) – осуществляет вывод одного или более выражений типа CHAR, STRING, BOOLEAN, а также целого или вещественного типов. При выводе числовых значений последние преобразуются в символьное представление. Если файловая переменная не указана, то вывод осуществляется в файл OUTPUT.
Любой параметр из списка вывода может иметь формат:
<Параметр> [: <Целое1> [: < Целое2> ]].
№19 слайд
![Процедуры и функции обработки](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img18.jpg)
Содержание слайда: Процедуры и функции обработки
текстовых файлов (3)
5. Процедура WriteLn([Var f;][v1,v2, ...,vn]) – осуществляет вывод в текстовый файл. Если файловая переменная не указана, то вывод осуществляется в файл OUTPUT.
Выводимая строка символов завершается маркером конца строки. Если список вывода не указан, то в файл передается только маркер конца строки.
6. Функция SeekEOLn([Var f]):boolean – пропускает пробелы и знаки табуляции до маркера конца строки или до первого значащего символа и возвращает TRUE, при обнаружении маркера. Если файловая переменная не указана, то функция проверяет файл INPUT.
7. Функция SeekEOF([Var f]):boolean – пропускает все пробелы, знаки табуляции и маркеры конца строки до маркера конца файла или до первого значащего символа и возвращает TRUE при обнаружении маркера. Если файловая переменная отсутствует, то функция проверяет файл INPUT.
№20 слайд
![Формирование текстового файла](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img19.jpg)
Содержание слайда: Формирование текстового файла
Пример. Разработать программу, которая формирует текстовый файл из 26 строк, содержащих случайное количество соответствующих прописных букв латинского алфавита, например:
ААААА
BBBBBBB
CCCC
DDDDDDDDDD и т.д.
program EX5_1;
{$APPTYPE CONSOLE}
uses SysUtils;
Var f:text;
a:char; n,i:integer;
fname,st:string[30];
№22 слайд
![. Типизированные файлы](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img21.jpg)
Содержание слайда: 5.3 Типизированные файлы
Типизированный файл – файл, все компоненты которого одного типа, заданного при объявлении файловой переменной.
Компоненты хранятся на диске во внутреннем (двоичном) формате.
Типизированный файл можно открыть для записи и чтения. Файл, открытый для записи, может использоваться для чтения. В файл, открытый для чтения, можно писать.
Поскольку размер компонентов одинаков, принципиально возможен не только последовательный, но и прямой доступ.
№23 слайд
![Процедуры и функции обработки](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img22.jpg)
Содержание слайда: Процедуры и функции обработки типизированных файлов
1. Процедура Read(Var f; c1,c2,...,cn) – осуществляет чтение компонентов типизированного файла. Список ввода содержит одну или несколько переменных того же типа, что и компоненты файла. Если файл исчерпан, обращение к процедуре вызывает ошибку ввода-вывода.
2. Процедура Write(Var f; c1,c2,...,cn) – осуществляет запись компонентов в типизированный файл. Список вывода содержит одно или более выражений того же типа, что и компоненты файла.
3. Процедура Seek(Var f; numcomp:longint) – осуществляет установку указателя файла на компонент с номером numcomp.
4. Функция FileSize(Var f):longint – возвращает количество компонентов файла. Может использоваться для установки на конец файла совместно с Seek():
Seek(f, FileSize(f));
5. Функция FilePos(Var f):longint – возвращает порядковый номер компонента, который будет обрабатываться следующим.
6. Процедура Truncate(Var f) – выполняет «усечение» файла.
№24 слайд
![Обработка типизированных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img23.jpg)
Содержание слайда: Обработка типизированных файлов
Пример 1. Разработать программу, которая создает файл, компонентами которого являются символы, введенные с клавиатуры, изменяет символы, записанные в файл, организует чтение символов из файла попеременно сначала и с конца (прямой доступ), затем находит указанный символ в файле и удаляет его из файла.
program Ex5_2;
{$APPTYPE CONSOLE}
uses SysUtils;
Var f, f1:file of char;
ch,i:Ansichar;
j:longint;
name:string[8];
begin
WriteLn('Input file name:');
ReadLn(name);
№25 слайд
![Обработка типизированных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img24.jpg)
Содержание слайда: Обработка типизированных файлов (2)
{открытие и создание файла}
AssignFile(f, name+'.dat');
ReWrite(f); {открываем файл для записи }
{занесение записей в файл}
WriteLn('Input symbol or «#»:');
ReadLn(ch);
while ch<>'#'do {пока не введено «#» с клавиатуры}
begin
Write(f,ch); {записываем символ в файл}
ReadLn(ch); {вводим символ с клавиатуры}
end;
WriteLn;
№27 слайд
![Обработка типизированных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img26.jpg)
Содержание слайда: Обработка типизированных файлов (4)
{изменение записей в файле}
ReSet(f); {открываем файла для чтения}
while not EOF(f) do {пока не достигнут конец файла}
begin
Read(f,i); {читаем символ из файла}
Write(i,' '); {выводим символ на экран}
i:=chr(ord(i)+10); {изменяем символ}
WriteLn(i); {выводим на экран измененный символ}
Seek(f,FilePos(f)-1); {возвращаемся на один
компонент}
Write(f,i); {перезаписываем символ}
end;
WriteLn;
№28 слайд
![Обработка типизированных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img27.jpg)
Содержание слайда: Обработка типизированных файлов (5)
{попеременное чтение записей с начала и конца файла}
ReSet(f); {открываем файл для чтения}
j:=0; {устанавливаем номер компонента равным 0}
while not EOF(f) do {пока не достигнут конец файла}
begin
Read(f,i); {читаем символ из начала файла}
Write(i); {выводим символ на экран}
Seek(f,FileSize(f)-FilePos(f)); {устанавливаем
указатель для чтения из конца файла}
Read(f,i); {читаем символ из конца файла}
Write(i); {выводим символ на экран}
j:=j+1; {увеличиваем номер компонента}
Seek(f,j); {устанавливаем указатель на следующий от
начала компонент}
end;
WriteLn;
WriteLn('Input symbol for erase:');
ReadLn(ch);
№29 слайд
![Обработка типизированных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img28.jpg)
Содержание слайда: Обработка типизированных файлов (6)
{подготовка к удалению записей: переименование исходного файла и открытие нового файла с тем же именем}
CloseFile(f); {закрываем файл}
ReName(f,name+'.bak'); {переименовываем файл}
ReSet(f); {открываем файл для чтения}
AssignFile(f1,name+'.dat');
ReWrite(f1); {открываем новый файл для записи}
{удаление записей - перепись остающихся записей в другой файл}
while not EOF(f) do
begin
Read(f,i); {читаем символ из файла}
if i<>ch then Write(f1,i); {если символ не подлежит
удалению, то записываем его в новый файл}
end;
CloseFile(f);
Erase(f); {удаляем старый файл, после закрытия в нем ничего не изменилось, поэтому повторно его можно не закрывать}
№31 слайд
![Обработка типизированных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img30.jpg)
Содержание слайда: Обработка типизированных файлов (8)
Пример 2. Создать файл букв латинского алфавита и удалить буквы, код которых не кратен 2.
program Ex5_3a;
{$APPTYPE CONSOLE}
uses SysUtils;
Var f:file of Char;
i:Char;
begin
AssignFile(f,'a.dat');
ReWrite(f);
For i:='A' to 'Z' do Write(f,i);
CloseFile(f);
end.
№32 слайд
![Обработка типизированных](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img31.jpg)
Содержание слайда: Обработка типизированных файлов (9)
program Ex5_3b;
{$APPTYPE CONSOLE}
uses SysUtils;
Var f:file of Char;
i:Integer;n:Char; j,j1:longInt;
begin
AssignFile(f,'a.dat');
Reset(f); j:=0;
while not EOF(f) do
begin
Read(f,n);
if (ord(n) mod 2) = 0 then
begin
j1:=FilePos(f);
Seek(f,j); Write(f,n); inc(j); Seek(f,j1);
end
end;
Seek(f,j); truncate(f);
end.
№33 слайд
![Поиск данных в файле Пример .](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img32.jpg)
Содержание слайда: Поиск данных в файле
Пример 3. Разработать программу, которая создает файл, содержащий список фамилий и даты рождения. Осуществить поиск в этом файле даты рождения по заданной фамилии.
program Ex5_4;
{$APPTYPE CONSOLE}
uses SysUtils;
Type fam=record
ff:string[20]; {фамилия}
year:word; {год рождения}
month:1..12; {месяц рождения}
day:1..31 {день рождения}
end;
Var f:file of fam;
fb:fam; n,i:integer; fff:string; key:boolean;
begin
AssignFile(f,'a.dat');
ReWrite(f);
№34 слайд
![Поиск данных в файле WriteLn](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img33.jpg)
Содержание слайда: Поиск данных в файле (2)
WriteLn('Input family or empty string');
Readln(fb.ff);
while length(fb.ff)<>0 do {пока строка не пустая}
begin
WriteLn('Input birthday: year month day');
ReadLn(fb.year, fb.month, fb.day); {фамилию вводим
в отдельной строке, так как ввод строки
завершается нажатием клавиши Enter}
Write(f,fb);
WriteLn('Input family or empty string');
Readln(fb.ff);
end;
CloseFile(f);
Write('Input family: ');
Readln(fff);
№35 слайд
![Поиск данных в файле key](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img34.jpg)
Содержание слайда: Поиск данных в файле (3)
key:=false; {признак "запись найдена"}
ReSet(f);
while (not EOF(f)) and (not key) do {пока не
обнаружен конец файла и не найдена запись}
begin
Read(f,fb);
if fb.ff=fff then
begin
WriteLn('DATA: ',fb.year,fb.month:3,fb.day:3);
key:=true; { "запись найдена"}
end;
end;
if not key then WriteLn('No information');
CloseFile(f);
ReadLn;
end.
№36 слайд
![Чтение текстового файла как](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img35.jpg)
Содержание слайда: Чтение текстового файла как типизированного
Пример 4. Разработать программу, которая открывает текстовый файл как типизированный с компонентом типа CHAR и читает его по символу.
program Ex5_5;
{$APPTYPE CONSOLE}
uses SysUtils;
Type ff=file of char;
Var f:ff;
a:char; n,i:integer;
fname,st:string[30];
begin
Write('Input file name:');
ReadLn(fname);
AssignFile(f,fname);
ReSet(f);
№37 слайд
![Чтение текстового файла как](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img36.jpg)
Содержание слайда: Чтение текстового файла как типизированного(2)
while not EOF(f) do
begin
st:='';
Read(f,a);
while (a<>#13) and not EOF(f) do {до маркера конца
строки или конца файла}
begin
st:=st+a;
Read(f,a);
end;
if not EOF(f) then Read(f,a); {пропускаем символ #10}
WriteLn(st);
end;
CloseFile(f);
Readln;
end.
№38 слайд
![. Нетипизированные файлы](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img37.jpg)
Содержание слайда: 5.4 Нетипизированные файлы
Нетипизированными называют файлы, объявленные без указания типа компонентов.
Операции чтения и записи с такими файлами осуществляются блоками, что позволяет организовать высокоскоростной обмен данными между диском и памятью. Отсутствие типа делает эти файлы совместимыми с любыми другими.
Нетипизированные файлы, как и типизированные, допускают организацию прямого доступа.
Нетипизированный файл можно открыть для записи и для чтения:
ReSet(Var f;[recsize:word]);
ReWrite(Var f;[recsize:word]);
где recsize – размер записи файла в байтах. Длину записи задают кратной 512 байт, например: 1024, 2048. Если длина записи не указана, она принимается равной 128.
№39 слайд
![Процедуры и функции обработки](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img38.jpg)
Содержание слайда: Процедуры и функции обработки нетипизированных файлов
1. Процедура
BlockRead(Var f:file; Var buf;Count:word[;Var res:word])– осуществляет чтение блока записей из файла в буфер buf.
Параметр res будет содержать количество фактически обработанных записей. Если последняя запись – неполная, то значение параметра res ее не учтет.
2. Процедура
BlockWrite(Var f:file;Var buf;Count:word[;Var res:word])– осуществляет запись блока из буфера buf в файл.
№40 слайд
![Копирование файлов Пример.](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img39.jpg)
Содержание слайда: Копирование файлов
Пример. Разработать программу копирования файлов
program Ex5_6;
{$APPTYPE CONSOLE}
Uses SysUtils;
Const recs=1024;
Var fi,fo:file;
buf: array [1..2*recs] of byte;
i:integer; namein,nameout: string;
begin
WriteLn('Input file name:');
ReadLn(namein);
AssignFile(fi,namein);
{$I-} ReSet(fi,1); {$I+}
if IOResult <> 0 then
begin
WriteLn(#7,' File with name ',namein,' not found');
Readln; Halt
end;
№42 слайд
![Дополнительные процедуры и](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img41.jpg)
Содержание слайда: Дополнительные процедуры и функции для работы с файлами
1. Function ChangeFileExt(const FileName,
Extension: string): string –изменяет существующее расширение файла на указанное.
2. Procedure ChDir(const S:string); overload;
Procedure ChDir(P:PChar); overload; – изменяет текущий каталог (каталог по умолчанию).
3. Function CreateDir(const Dir: string): Boolean – создает новый каталог.
4. Function DeleteFile(const FileName: string): Boolean – удаляет указанный файл.
5. Function DirectoryExists(const Directory: string): Boolean – проверяет существование каталога по указанному адресу.
6. Function DiskFree(Drive: Byte): Int64 – возвращает объем в байтах свободного пространства на указанном диске:
0 – устройства по умолчанию; 1 – диск А; 2 – диск В и т.д. Функция возвращает -1, если указанный диск не существует.
№43 слайд
![Дополнительные процедуры и](/documents_6/97d93fdd5c9838bcfcc288842c71045d/img42.jpg)
Содержание слайда: Дополнительные процедуры и функции для работы с файлами (2)
7. Function DiskSize(Drive: Byte): Int64 – возвращает объем памяти указанного диска.
8. Function FileExists(const FileName: string): Boolean – проверяет существование файла по указанному адресу;
9. Function FileSearch(const Name, DirList: string): string – ищет файл в указанных через точку с запятой каталогах, если не находит, то возвращает пустую строку.
10. Function FindFirst(const Path: string; Attr: Integer; var F: TSearchRec): Integer – ищет в каталоге первый файл с указанной маской и атрибутами;
11. Function FindNext(var F: TSearchRec): Integer – ищет следующие файлы.
12. Function GetCurrentDir: string – возвращает имя текущего каталога.
13. Function ForceDirectories(Dir: string): Boolean – создает каталоги и подкаталоги.
14. Function RemoveDir(const Dir: string): Boolean – удаляет указанный пустой каталог.
15. Function SetCurrentDir(const Dir: string): Boolean – устанавливает текущий каталог.
Скачать все slide презентации Работа с файлами ( Delphi/Pascal, глава 5) одним архивом:
Похожие презентации
-
Работа с файлами в Pascal
-
Основы алгоритмизации и процедурное программирование. Простейшие конструкции языка Delphi / Pascal (Глава 1)
-
Управляющие конструкции (Delphi / Pascal, глава 2)
-
Структурные типы данных (Delphi / Pascal, глава 3)
-
Модульное программирование (Delphi / Pascal, глава 4)
-
Использование динамически выделяемой памяти (Delphi / Pascal, глава 6)
-
Средства объектно-ориентированного программирования (Delphi / Pascal, глава 7)
-
Работа с файлами в Паскале
-
Работа в системе Turbo Pascal. (Тема 3)
-
Операции для работы с файлами