Форум: "Основная";
Текущий архив: 2002.09.16;
Скачать: [xml.tar.bz2];

Вниз

Pointer&Dynamic Array   Найти похожие ветки 

← →
nimble   (2002-09-05 05:51) [0]


PMas = ^TMas;
TMas = record
i: integer;
st: string[10];
f: float;
end;
...
procedure proc(pt: PMas);
begin

end;
...
var
mas: array of TMas;
pBase: PMas;

Как в процедуре proc работать с этим массивом?
...
pBase:=@mas;
proc(pBase);


---

← →
SPeller   (2002-09-05 06:04) [1]

PMas^[index];

---

← →
nimble   (2002-09-05 06:40) [2]

Чего-то не работает:(

---

← →
ЮЮ   (2002-09-05 06:52) [3]

type TArrOfMass=array of TMas;

procedure proc(ArrOfMass:TArrOfMass);
begin
...ArrOfMass[i]...
end;

Mas:TArrOfMass;

Proc(Mas);

---

← →
nimble   (2002-09-05 07:19) [4]

Вроде работает. СПАСИБО!!!

---

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

Форум: "Основная";
Текущий архив: 2002.09.16;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.008 c