вопрос | ответ |
Пример 3 считывание всех записей из типизированного файла | procedure TForm1.Button6Click(Sender: TObject); var i:Integer; begin FileName :='Test'; AssignFile(f_C |
Пример 2 считывание 3 записи из типизированного файла | procedure TForm1.Button4Click(Sender: TObject); begin FileName :='Test'; AssignFile(f_Config, Filename); |
Для контроля конца файла полезно использовать функцию | Eof( F1 ) – принимает значение True, если при работе с файлом текущая позиция оказывается в конце файла, при этом считывание не возможно. |
Переход к конкретной записи | Seek( F1, N ) – где значение N указывает номер записи |
Этапы работы с файлом: 4. Закрытие файла | CloseFile(F1) выполняется обязательно при завершении работы с файлом. |
Этапы работы с файлом: 3. Запись в файл, чтение из файла | Write(F1,X ) – запись значения переменной X , тип X должен соответствовать типу файла, при записи указатель становится на последнюю запись. Или Wr |
Этапы работы с файлом: 2. Создание или открытие файла | ReWrite(F1) – создание Reset(F2) – открытие файла. |
Этапы работы с файлом: 1. Связь файловой переменной с физическим файлом. | AssignFile( F1, ‘C:\Test.dat’) |
При работе с файлом информация записывается / считывается частями (записями), при этом каждая часть представляет значение типа, указанного в файловой | Файл состоит из последовательности пронумерованных записей ( отсчет от 0). |
При работе с типизированным файлом необходимо описать файловую переменную | var F1 : file of String[10]; F2 : file of record Name:String[10]; Age:Byte; end; |