Доступ к нетипизированному файлу
Вы можете организовать доступ к файлу "без определенного типа" следующим
образом:
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 компилятору необходимо знать формат файла.
|
|
  |
|
Натяжные потолки комплектующие информация. Комплектующие натяжные потолки в россии. . Тендеры Москвы и области - проведение тендеров. Тендеры! Аукционы! Торги. . заказать клоуна на дом . Ателье Балконов - остекление балконов и лоджий. . Электронные медицинские термометры. Электронный термометр медицинский (495) 603-32-82. . |