Советы по Delphi

         

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


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

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

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



Содержание раздела