Delphi-Help

  • Increase font size
  • Default font size
  • Decrease font size

AssignFile

Печать
Рейтинг пользователей: / 3
ХудшийЛучший 

 


AssignFile

Описание

Процедура AssignFile назначает значение FileName значению FileHandle при подготовке к чтению или записи этого файла.

Версия 1
Берет тип переменной текстового файла как дескриптор. Когда файл открыт он обрабатывается как textfile.
Если имя файла пустая строка, то доступ к файлу осушествляется через стандартные потоки input и output.

Версия 2
Берет бинарный тип файла как дескриптор. Файл обрабатывается как двоичный файл.
В обоих случаях, когда файл открыт с помощью Append, Reset или ReWrite предполагается, что он находится в текущем каталоге.

Пример кода

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

Примечание

FileHandle не должен быть перепутанным с дескриптором файла, используемым для файла низкого уровня, обращающегося с подпрограммами типа FileOpen и FileRead.

Авторизация



Счетчики