Как ДИнамический массив в recordе сделать, неполучается

← →
bearoman (2002-11-08 15:50) [0]

Такая структура
type
bytes2 = array[1..2] of byte;
bytes3 = array[1..3] of byte;
bytes4 = array[1..4] of byte;

data_down_paket_arhiv = record
date : bytes4;
data : array[1..17] of bytes2; end;

down_paket_achiv = record
start_ : bytes2;
razmer_data : bytes2;
data_ : array of data_down_paket_arhiv; // это динамический массив

end_ : bytes2;
end;

ТЕПЕРЬ ПРОГРАММА КАК УВЕЛИЧИВАТЬ ЕГО

var paket_ : paket;
priem : down_paket_achiv;
...

for i:=1 to 1920 do begin
// SetLength(priem.data_,Length(priem.data_)+1);
^^ вот так ошибку выдает
priem.data_[i].date[1]:=random(31);
priem.data_[i].date[2]:=random(12);
priem.data_[i].date[3]:=random(2);
priem.data_[i].date[4]:=random(24);
...

Помогите МАСТЕРА.

← →
TTCustomDelphiMaster (2002-11-08 15:55) [1]

for i:= 0 to 1920 do begin

← →
bearoman (2002-11-08 15:59) [2]

О действительно как я незаметил спасибо друг все заработало.

Целый час мучался надо пойти отдохнуть.

Как ДИнамический массив в recordе сделать, неполучается Найти похожие ветки