доплачивают за Сбер скорее всего. это куда вреднее D7 :)

Всем привет, кто работал с двумерными массивами через указатели ? Помогите чем сможете. Есть двумерный массив расположенный в памяти. Есть функция указатель на адрес в памяти. Как вывести значения масссива. Как правильнее объявить переменные и типы. Кидаю код, подскажите кто чем сможет

procedure TForm1.Button27Click(Sender: TObject);
type
 TIntArr=array of array of integer;
 pIntArr=^TIntArr;
var
 p:pointer;
 v:oleVariant;
 x,y:integer;
 pArr:pIntArr;
begin
  v:=Mat.Get2dArray; //Указатель на адрес в памяти
  Pinteger(@p)^:=v;
  pArr:=pIntArr(p);

  for x:=0 to 10 do
     begin
       for y:=0 to 10 do
         begin
             ListBox1.Items.Add(pArr^[x,y].toString);
         end;
    end;
end;

Массив в памяти 10x10

лучше с oleVariant работать без указателей как с массивом variant

v[i][j] по идее должно быть достаточно в цикле

О Дмитрий приветствую, там функцию возвращает именно указателб

ну ок. указатель на вариант, если как есть не работает, то можно разименовать

если есть какой-то указатель на вариантый массив - то стоит так с ним и работать

Как с вариантным массивом. внутри должна случится магия сама. нет необходимости в дополнительной обвязке

Сейчас попробую

гугли как вообще с oleVariant массивами работать

Только если и работа с массивом и указателями на элементы надо помнить, что при изменение размера массива, он может поменять расположение в памяти, и указатели станут не валидны

с указателями будут сложности, нет необходимости мне кажется их сюда тащить, нужно работать нативно как с обычным массивом oleVariant, тем более что это он и есть

даже если и через указатель

Я знаю что этот массив точно имеет размер 10x10 и точно там тип Integer

ну и отлично. осталось до данный добраться

Dim p as Long

Data=Mat.Get2dArray
x=16
y=32
p=Data(x,y)

Вот код vb он рабочий

можно или как есть попробовать. или разименовать. вот ты разименовние делаешь:
 Pinteger(@p)^:=v;