Обращение к элементам массива через указатель

[Miha85193]

Как можно получить доступ к каждому элементу массива с помощью указателя на него? Вот пример для наглядности:

type
  TByteArray = array[0..0] of Byte;
  PByteArray = ^TByteArray;

var
  A: array[0..9] of Byte;


procedure InitArrai(Array_: PByteArray);
begin
  // Определение длины
  // Инициализация
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  InitArrai(@A); // Вызываем метод
end;

[Karabash]

Такой подмены компилятор не поймет и длина массива, переданного в параметре всегда будет равна 1. Независимо от того какой массив передается. Адрес @А (а это и есть указатель) реального массива транслируется в тип TByteArray, а он имеет длину в 1 байт.

[Miha85193]

А если сделать вот так:

type
  TByteArray = array[0..0] of Byte;
  PByteArray = ^TByteArray;

var
  A: PByteArray;


procedure InitArrai(Array_: PByteArray);
begin
  // Определение длины
  // Инициализация
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  GetMem(A, 10);
  InitArrai(A); // Вызываем метод
end;

[Пепел Феникса]

указательные массивы это не array. вообще такого типа нет.
посмотрите примеры работы со ScanLine

[DomiNick]

Вы не сможете таким образом узнавать размер массива. Его придётся помнить отдельно - или в глобальных или передавать вместе с указателем в функции/процедуры...

[Serge_Bliznykov]

Сообщение от DomiNick

Вы не сможете таким образом узнавать размер массива. Его придётся помнить отдельно - или в глобальных или передавать вместе с указателем в функции/процедуры...

+1
Полностью согласен!

к слову, а зачем этот огород? Если речь идёт о Delphi - то там есть динамические массивы (это которые array of тип). Чем они не устраивают?!

[Miha85193]

к слову, а зачем этот огород? Если речь идёт о Delphi - то там есть динамические массивы (это которые array of тип). Чем они не устраивают?!

Тем, что динамический массив не возможно передать в качестве параметра так, как размер не постоянный.

[ZaRDaK]

Куда его нельзя передать в качестве параметра, пример бы.
Размер спокойно опередляется Length(arr);

[Miha85193]

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

[Don Karleone]

Сообщение от Miha85193

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

а почему не передать его как открытый массив?