| Описание |
Процедура AssignFile назначает значение FileName значению FileHandle при подготовке к чтению или записи этого файла.
Версия 1
Берет тип переменной текстового файла как дескриптор. Когда файл открыт он обрабатывается как textfile.
Если имя файла пустая строка, то доступ к файлу осушествляется через стандартные потоки input и output.
Версия 2
Берет бинарный тип файла как дескриптор. Файл обрабатывается как двоичный файл.
В обоих случаях, когда файл открыт с помощью Append, Reset или ReWrite предполагается, что он находится в текущем каталоге.
|
|
| Примечания |
|
FileHandle не должен быть перепутанным с дескриптором файла, используемым для файла низкого уровня, обращающегося с подпрограммами типа FileOpen и FileRead.
|
|
| Похожие команды |
Append Открывает текстовый файл, для добавления записей в файл (добавляет в конец файла)
AssignPrn Обрабатывает принтер как текстовый файл - простой способ печати текста
File Определяет типизированный или нетипизированный файл
Reset Открывает текстовый файл для чтения, или двоичный файл для чтения/записи
ReWrite Открывает текстовый или двоичный файл для записи
TextFile Объявляет типа файл для того, чтобы сохранить строки текста
| |
|
| Пример кода : Запись в текстовый файл, и затем чтение его содержимого |
var
myFile : TextFile;
text : string;
begin
// Попытка открыть файл Test.txt
для записи
AssignFile(myFile, 'Test.txt');
ReWrite(myFile);
// Запись нескольких известных слов в
этот файл
WriteLn(myFile, 'Hello');
WriteLn(myFile, 'World');
// Закрытие файла
CloseFile(myFile);
// Повторное открытие файла для
чтения
Reset(myFile);
// Показ содержимого файла
while not Eof(myFile) do
begin
ReadLn(myFile, text);
ShowMessage(text);
end;
// Закрытие файла в последний раз
CloseFile(myFile);
end;
|
Hello
World
|
|
