Скачать: CL | DM;

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

← →
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;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c