Главная страница
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.019 c
6-59319
Dash
2002-09-20 18:18
2002.11.18
Где хранитса информация о соединениях в Internet Explorer-е и можно ли её перенасить с компа на комп


3-59066
Leoni
2002-10-30 16:52
2002.11.18
Не работает фильтр в компонентах ADO


1-59217
denis-a
2002-11-06 16:21
2002.11.18
Документация по компоненту Async Professional ver. 4 for Delphi


6-59310
EgnA
2002-09-23 11:36
2002.11.18
Как реализовать параметр в ActiveX


4-59515
TankMan
2002-10-07 00:52
2002.11.18
Список запущенных процессов