![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запись динамического массива в нетипизированный файл [D5, D7, Win2k, WinXP]
rummy © (2005-08-22 17:19:00)Уважаемые мастера. Столкнулся с проблемой записи динамического массива в файл. Пишу:
var
bFileArr: array of byte;
bfile: file;
written: integer;
BEGIN
//Выделяю память
SetLength(bfilearr,132);
//Заполняю массив
//Пишу в файл :(
AssignFile(bfile,'C:\1.DAT');
Rewrite(bfile,1);
Seek(bfile,$100);
BlockWrite(bfile,bFileArr,length(bFileArr),written);
CloseFile(bfile);
END;
А в файле вижу совсем не то что писал. Есть ли возможность корректно записать содержимое динамического массива в файл? и в чем моя ошибка?
rummy (2005-08-22 17:35:00) [1]Спасибо за "молнию". Все заработало как надо.
DiamondShark (2005-08-22 17:23:00) [2]
> BlockWrite(bfile,bFileArr,length(bFileArr),written);
BlockWrite(bfile, bFileArr[0],length(bFileArr),written);