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

Вниз

Как ДИнамический массив в 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]

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

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



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
14-59435
Сатир
2002-10-31 20:14
2002.11.18
Updates for Delphi 6


1-59109
murderer
2002-11-07 11:52
2002.11.18
VCL40.bpl


1-59220
Мутень
2002-11-06 16:50
2002.11.18
Как обращаться к свойствам и перехватывать события....


1-59213
irmantukas
2002-11-06 00:54
2002.11.18
StringGrid


14-59334
Sers
2002-10-31 15:23
2002.11.18
Функторы