Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Динамический массив [D2005, XP]


sadasd ©   (2007-04-26 11:03:00) 

здраствуйте, не моглибы вы подсказать такую вещь...
у меня есть массивы
buf1: array of byte;
buf2: array of byte;

я их так объявляю потому что они меняются(размер в смысле)...
и мне нужнопримерно вот это сделать:
razmer_otpr:=4000*1024;
     SetLength(buf1,razmer_otpr);
     SetLength(buf2,razmer_otpr+16);
     BlockRead(F,buf1[0],razmer_otpr);
     buf2[0]:=zag; (????)
     buf2[16]:=buf1[0];

zag - это структура которая имеет размер 16 байт...
во второй массив, мне нужно записать сначала этот заголовок, а потом то что я считал из файла, и потом это все надо отправить, но ничего не получается, подскажите как работать с массивами...


sadasd   (2007-04-26 11:56:00) [1]


> begin...end

респект и уважуха, 2 дня бился, спасибо огромнейшее, всё помогло... =)


> Правильный Вася  

тоже спасибо, не знал об этой функции, теперь буду пользоваться, ели понадобится...


begin...end   (2007-04-26 11:40:00) [2]

var
 buf: array of Byte;
 ...
begin
 ...
 SetLength(buf, razmer_otpr + 16);
 Move(zag, buf[0], 16);
 ...
 Reset(F, 1);
 ...
 BlockRead(F, buf[16], razmer_otpr);
 ...
end


Правильный Вася   (2007-04-26 11:09:00) [3]

здесьcopymemory


Наверх

Титульная страница Поиск, карта сайта Написать письмо