Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.05.2007, 21:48   #1
мандарин
Пользователь
 
Регистрация: 22.04.2007
Сообщений: 31
По умолчанию записать байт файл

мне надо массив байт записать в ранне существующий файл вот че написал но это не работает в чем ошибка или че то другое подскажите.


bayt: byte;
mas: array [1..300] of byte;

AssignFile(fail1, 'd:\3.bmp');
reset(fail1);
command_vnutr:=('02');


i:=0;
while i<300 do
begin
i:=i+1;
bayt:=mas[i];
write(fail1, bayt);
мандарин вне форума Ответить с цитированием
Старый 08.05.2007, 21:58   #2
Viteef
stopfake.org
Участник клуба
 
Регистрация: 03.05.2007
Сообщений: 1,927
По умолчанию

А что за ошибка, что компилятор говорит?
Viteef вне форума Ответить с цитированием
Старый 08.05.2007, 22:26   #3
мандарин
Пользователь
 
Регистрация: 22.04.2007
Сообщений: 31
По умолчанию

да ошибки то нет просто не работает не записывает
мандарин вне форума Ответить с цитированием
Старый 08.05.2007, 22:43   #4
Viteef
stopfake.org
Участник клуба
 
Регистрация: 03.05.2007
Сообщений: 1,927
По умолчанию

Файл типизированный? Если да то:

Удобнее изпользовать FOR:

for i:=0 to 300 do
begin
bayt:=mas[i];
seek(fail1,filesize(fail1)); //Кажется так...
write(fail1, bayt);
end;
Надеюсь после записи ты делаешь CloseFile(fail1);?
Viteef вне форума Ответить с цитированием
Старый 08.05.2007, 22:53   #5
мандарин
Пользователь
 
Регистрация: 22.04.2007
Сообщений: 31
По умолчанию

вроде работает спасибо большое если че оброщайся
мандарин вне форума Ответить с цитированием
Старый 08.05.2007, 23:27   #6
BOBAH13
Android Developer
Старожил Подтвердите свой е-майл
 
Аватар для BOBAH13
 
Регистрация: 19.02.2007
Сообщений: 3,708
По умолчанию

а можно поинтерисоватся ? а зачем переберать целый массив ? разве нельзя сделать так

assignfile(f, 'file');
reset(f,1);
blockwrite(f, masiv, sizeof(masiv));
closefile(f);

??? вроде не ошибся в коде
BOBAH13 вне форума Ответить с цитированием
Старый 09.05.2007, 01:21   #7
Viteef
stopfake.org
Участник клуба
 
Регистрация: 03.05.2007
Сообщений: 1,927
По умолчанию

Цитата:
Сообщение от BOBAH13 Посмотреть сообщение
а можно поинтерисоватся ? а зачем переберать целый массив ? разве нельзя сделать так

assignfile(f, 'file');
reset(f,1);
blockwrite(f, masiv, sizeof(masiv));
closefile(f);

??? вроде не ошибся в коде
Если небольшой массив то можно и так.
Viteef вне форума Ответить с цитированием
Старый 09.05.2007, 07:58   #8
zetrix
Delphi/C++/C#
Участник клуба
 
Аватар для zetrix
 
Регистрация: 29.10.2006
Сообщений: 1,972
По умолчанию

Да? Хм... Судя по входящим типам размер записываемой структуры (хоть массив, хоть что) до 2147483647 байт. Этого вполне достаточно.
zetrix вне форума Ответить с цитированием
Старый 09.05.2007, 20:45   #9
rpy3uH
добрый няша
Старожил
 
Аватар для rpy3uH
 
Регистрация: 29.10.2006
Сообщений: 4,804
По умолчанию

Цитата:
Сообщение от BOBAH13 Посмотреть сообщение
а можно поинтерисоватся ? а зачем переберать целый массив ? разве нельзя сделать так

assignfile(f, 'file');
reset(f,1);
blockwrite(f, masiv, sizeof(masiv));
closefile(f);

??? вроде не ошибся в коде
этот код должен работать!

но лучше использовать API, примерно так:
Код:
h:=CreateFile(.....);
Writefile(h,massiv,sizeof(massiv),_writed,0);
closehandle(h);
rpy3uH вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как записать record в файл Kn793 Общие вопросы Delphi 5 01.08.2008 08:10
Как побайтно считать файл и записать в другой SeRhy Общие вопросы Delphi 2 09.06.2008 21:54
Заполнить массив и записать в файл Amery Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 9 27.05.2008 20:02
Как в С++ вывести(записать ) информацию в файл, когда инфа находится в методе класса? Artur_cod Общие вопросы C/C++ 1 06.05.2007 00:34
(Это снова я) Как записать в файл? Air Общие вопросы Delphi 5 03.05.2007 20:36