Не знам как да получа достъп до съдържанието на масив от указатели чрез указател. Ето един пример:
Type
PInteger = ^Integer;
IntegerArrayP = array of PInteger;
PIntegerArrayP = ^IntegerArray;
var
variable: Integer;
parrp: PIntegerArrayP;
arrp: IntegerArrayP;
begin
SetLength(arrp, 5);
parrp := @arrp;
For variable := Low(arrp) to High(arrp) do
begin
arrp[variable] := New(PInteger);
(parrp^)[variable]^ := variable;
WriteLn('parrp: ', arrp[variable]^);
end;
end.
Според мен трябва да се направи така (ptabp^)[variable]^ := variable;
Но предполагам, че греша.