Динамический массив

← →
Futji (2003-05-16 13:32) [0]

Требуется создать динамический массив своего типа (record). Можно ли это сделать? Я когда-то пробовал - программа работала некорректно. Сейчас сделал контрольный примерчик - вроде все работает. В справке говорится только про использование простых типов (integer etc). Так можно или нет создать такой массив?

← →
Skier (2003-05-16 13:33) [1]

>Futji

> Так можно или нет создать такой массив?

Вполне.

← →
Anatoly Podgoretsky (2003-05-16 13:39) [2]

Можно, массив может быть любого типа, кроме файлового.

← →
dtrn (2003-05-16 13:58) [3]

type
Arr = record
T1:integer;
T2:string
end;
var
Arr1:array of Arr;
procedure TForm1.Button1Click(Sender: TObject);
var
I:integer;
begin
SetLength(Arr1,5);
for I:=Low(Arr1) to High(Arr1) do
begin
Arr1[I].T1:=I;
Arr1[I].T2:=Format("Str%d",[I]);
end;
end;

Динамический массив Найти похожие ветки