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

Varian - массив в массиве   Найти похожие ветки 

← →
AlexanderSK   (2003-10-10 15:01) [0]

Прблема в следующем - есть массив вариантов - v := VarArrayCreate([0,1], varVariant);
Нужно: в v[1] засунуть еще один массив (например - VarArrayCreate([0,10], varVariant)).

Вопрос - как это правильно сделать и как потом его от туда достать?

Заранее спасибо!

---

← →
[lamer]Barmaglot ©   (2003-10-10 15:07) [1]

?????

Type
VA: Array[0..10,0..15] of Variant;

Вроде так...

---

← →
AlexanderSK   (2003-10-10 15:15) [2]

>[lamer]Barmaglot
>VA: Array[0..10,0..15] of Variant;
Это во первых будет статический массив! а во воторых квадратная матрица! Мне же нужно несколько другое!

---

← →
[lamer]Barmaglot ©   (2003-10-10 15:19) [3]

Уточни что надо...

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

VA: Array of Array of Variant;

Динамический массив, динамических массивов...

Type

a = array of variant;

var

b: Array of A;

---

← →
Palladin ©   (2003-10-10 15:21) [4]

Элипс это круг вписаный в квардрат 2 на 3...

что тебе мешает v[1]:=VarArrayCreate([0,10],varVariant)

---

← →
Palladin ©   (2003-10-10 15:25) [5]

а... извиняюсь, всмысле как достать, вот так...
var
v,v2:variant;

v:=VarArrayCreate([0,1],varVariant);
v[0]:=VarArrayCreate([0,10],varVariant);
v2:=v[0];
v2[0]:=10;
ShowMessage(v2[0]);

---

← →
AlexanderSK   (2003-10-10 15:37) [6]

>Palladin
Спасибо!

---

← →
icWasya ©   (2003-10-10 17:11) [7]

нащёт достать
в Pascal (и Delphi)
конструкция A[0][0] - эквивалентна A[0,0]
поэтому

var
v,v2:variant;

v:=VarArrayCreate([0,1],varVariant);
v[0]:=VarArrayCreate([0,10],varVariant);
v[0,0]:=10;
ShowMessage(v[0,0]);



---

← →
Palladin ©   (2003-10-10 17:19) [8]

ну раз так, то тогда наверное ты сможешь объяснить почему твоя конструкция не работает?

---

← →
Ketmar   (2003-10-10 19:15) [9]

>icWasya © (10.10.03 17:11) [7]
в ПАСКАЛЕ. а не в Delphi. см. детали реализации компилятора.

---

← →
oomneeq ©   (2003-10-10 20:23) [10]

Вот вырвал из рабочего кода и слегка упростил


CurArr,
VVV: variant;

...
VVV:=VarArrayCreate([0,N],varVariant);

CurArr:=VarArrayCreate([0, M], varVariant);
CurArr[0]:=0;
CurArr[1]:=1;

VVV[i]:=CurArr;
...



---

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

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



Память: 0.47 MB
Время: 0.025 c