Процедура Reset в Delphi – відкриває текстовий файл для читання, або двійковий файл для читання/запису.
System unit
- procedure Reset (var FileHandle : TextFile);
- procedure Reset (var FileHandle : File {RecordSize);
Процедура Reset відкриває файл вказаний у FileHandle для читання, запису, або читання та запису.
Ви повинні використовувати AssignFile, щоб призначити файл на FileHandle перед використанням Reset.
Використовуйте Write або WriteLn для запису у файл після виконання цього Reset.
Варіант 1.
Використовується для текстових файлів. Вони можуть читатись тільки після відкриття за допомогою Reset.
Варіант 2.
Ця процедура для бінарних файлів. Перед використанням Reset ви повинні встановити FileMode в один із наведених нижче параметрів:
- fmOpenRead : Тільки для читання
- fmOpenWrite : Тільки для запису
- fmOpenReadWrite : Читання і записи
Використовується додаткове значення RecordSize, щоб змінити заданий за замовчуванням 128-байтовий розмір запису для подвійних файлів (нетипізованих). Для таких файлів може використовуватися лише BlockRead і BlockWrite.
Процедура Reset: Запис і читання рядків тексту в/з текстового файлу
var
myFile : TextFile;
text : string;
begin
// Спроба відкрити файл Test.txt для запису
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);
// Запис кількох відомих слів у цей файл
WriteLn(myFile, 'Hello');
WriteLn(myFile, 'World');
// Закрытие файла
CloseFile(myFile);
// Перевідкриття файлу в режимі лише для читання
FileMode := fmOpenRead;
Reset(myFile);
// Показ вмісту файлу
while not Eof(myFile) do
begin
ReadLn(myFile, text);
ShowMessage(text);
end;
// Закриття файлу востаннє
CloseFile(myFile);
end;Результат
Hello
World
Подібні функції, процедури та команди
Append — відкриває текстовий файл для додавання записів у файл (додає в кінець файлу).
AssignFile — пов'язує дескриптор файлу з бінарним чи текстовим файлом.
CloseFile — закриває відкритий файл.
File — визначає типізований чи нетипізований файл.
ReWrite — відкриває текстовий або двійковий файл для запису.
TextFile — оголошує тип файлу для того, щоб зберегти рядки тексту.
Пригостити автора кавою