var
f : file;
b : byte;
d : word;
begin
AssignFile(f,'test.dat')
ReWrite(f,1);
b := 100;
d := 5000;
BlockWrite(f,b,sizeof(b));
BlockWrite(f,d,sizeof(d));
CloseFile(f);
end;
Бинарные файлы
Меня всегда интересовал вопрос: как из delphi создать бинарный файл? т.е. не writeln в файл какую-то переменную стандартного типа, а, скажем, побитово записывать файл? if you know what i mean
Цитата:
Originally posted by gufy
Меня всегда интересовал вопрос: как из delphi создать бинарный файл? т.е. не writeln в файл какую-то переменную стандартного типа, а, скажем, побитово записывать файл? if you know what i mean
Меня всегда интересовал вопрос: как из delphi создать бинарный файл? т.е. не writeln в файл какую-то переменную стандартного типа, а, скажем, побитово записывать файл? if you know what i mean
Ну "побитово" ты всё равно никак не сможешь :)
А для работы с бинарными файлами можешь юзать либо стандартные (CreateFile, WriteFile ...) либо дельфийские:
Код:
P.S. Купи себе какой-нибудь самоучитель Delphi :)
да мне не надо delphi я другим занимаюсь:) просто интересно было. а так пасибо