Показать сообщение отдельно
  #4  
Старый 28.10.2011, 17:49
t116 t116 вне форума
Новичок
 
Регистрация: 29.06.2011
Адрес: Луганск
Сообщения: 92
Версия Delphi: Delphi7
Репутация: выкл
По умолчанию

Цитата:
Var I : Byte;
F : File of Zap;
S : zap; Sr:real;
begin
AssignFile(F, Edit2.Text);

Файлы объявляются следующим образом:
Код:
var
    f1 : File of <тип>;  //типизированные файлы
    f2 : TextFile;  //текстовый тип файлов
    f3 : File;  //нетипизированные файлы

Однако, присвоив какой-то переменной файловый тип, мы еще не можем работать с файлом. Для этого вначале надо связать эту переменную с файлом.
Код:
AssignFile(f1, 'filename.txt');  //связывание переменной с файлом

После этой функции, можем обращаться с переменной f1 как с файлом filename.txt. Если такого файла нет, получим ошибку, поэтому перед использованием связывания желательно делать проверку на наличие файла. Такая проверка проводится функцией
Код:
FileExists().
Ответить с цитированием