Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.21;
Скачать: CL | DM;

Вниз

Сохранение динамического массива в файл..   Найти похожие ветки 

 
Condor ©   (2003-08-07 13:24) [0]

Скажите, пожалуйста, можно ли сохранить динамический массив в файл?


 
PVOzerski ©   (2003-08-07 13:26) [1]

В нетипизированный через blockwrite, причем как буфер передавать не массив, а его начальный элемент.


 
PVOzerski ©   (2003-08-07 13:26) [2]

Уточнение: это если массив одномерный.


 
Condor ©   (2003-08-07 13:36) [3]

А можно простой пример? array of integer


 
Serginio1   (2003-08-07 13:41) [4]

FileStream.Write(ar[0],Length(ar)*SizeOf(Integer));


 
PVOzerski ©   (2003-08-07 13:46) [5]

var
x:array of integer;
f:file;
begin
setlength(x,10);
assignfile(f,"x");
rewrite(f,sizeof(integer));
blockwrite(f,x[0],length(x));
closefile(f);
end.


 
pasha_golub ©   (2003-08-07 13:49) [6]


var
a:array of integer;
f:file;
begin
SetLength(a,5);
A[0]:=5;
A[1]:=3;
A[2]:=6;
A[3]:=1;
A[4]:=8;
AssignFile(f,"d:\temp.txt");
Rewrite(f,sizeof(integer));
showmessage(inttostr(high(a)));
BlockWrite(F,a[0],High(a)+1);
CloseFile(f);
end;


 
Condor ©   (2003-08-07 13:53) [7]

Спасибо



Страницы: 1 вся ветка

Текущий архив: 2003.08.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
1-68332
Chizh
2003-08-07 10:51
2003.08.21
ShellTreeView


14-68446
Igor__
2003-08-04 16:51
2003.08.21
Кто ХОРОШО знает ООП в Delphi


1-68344
den74
2003-08-08 15:05
2003.08.21
функция FindNext


7-68561
_ALEXey_
2003-06-06 09:19
2003.08.21
Информация по раскладкам клавиатуры


14-68475
vopros
2003-08-06 10:09
2003.08.21
Приехал из отпуска. Настроение на 0.