Советы по Delphi



         

Доступ к нетипизированному файлу


Вы можете организовать доступ к файлу "без определенного типа" следующим образом:

Var MyFile : file;beginassign(MyFile,Filename);reset(MyFile,1);{для записи}Blockwrite(MyFile,item,sizeof(item));{для чтения}BlockRead(MyFile,item,sizeof(item));
close(MyFile);end;

Имейте в виду, что для чтения/записи нетипизированного файла необходимо использовать функции blockread и blockwrite, т.к. для использования нормальных функций Read/Write компилятору необходимо знать формат файла. [000519]




Содержание  Назад  Вперед