Как избежать изменений оригинального массива при копировании многомерных массивов в Delphi

Delphi , Синтаксис , Массивы

При работе с многомерными массивами в Delphi иногда возникает проблема, связанная с копированием данных. В частности, при передаче многомерного массива в функцию и попытке его изменения внутри этой функции, изменения затрагивают и исходный массив. Это происходит из-за особенностей реализации динамических массивов в языке Object Pascal, которые являются ссылками на данные.

Проблема

Представим, что у нас есть многомерный массив типа TBMArray = TArray<TArray<byte>>;, и функция, принимающая его в качестве аргумента:

function goForSolve(bData: TBMArray; const iSize: integer): TBMArray;
var
  tempData: TBMArray;
begin
  // Здесь происходит работа с tempData, которая должна не влиять на bData
end;

При попытке скопировать bData в tempData с помощью функции copyData, результатом становится изменение и исходного массива bData, так как функция фактически копирует ссылки, а не значения.

Решение

Для копирования многомерного массива с созданием полной копии данных, необходимо использовать функцию Copy, предоставляемую системным модулем. Однако, стоит отметить, что Copy скопирует только внешний массив, а не внутренние массивы. Поэтому, для полного копирования многомерного массива, необходимо итеративно применить функцию Copy для каждого внутреннего массива.

Пример функции для копирования многомерного массива:

type
  TBMArray = TArray<TArray<Byte>>;

function CopyBMArray(const src: TBMArray): TBMArray;
var
  i: Integer;
begin
  SetLength(Result, Length(src));
  for i := 0 to High(Result) do
    Result[i] := Copy(src[i]);
end;

Также рекомендуется использовать обобщённый тип TArray<T> везде, где это возможно, что упростит разработку и сделает код более композиционным.

Заключение

При работе с многомерными массивами в Delphi важно понимать, что динамические массивы реализованы как ссылки на данные. Для создания полной копии многомерного массива необходимо использовать функцию Copy и итеративно применить её к каждому внутреннему массиву. Это позволит избежать изменений оригинального массива при копировании.

Создано по материалам из источника по ссылке.

Вопрос связан с копированием многомерных массивов в языке программирования Delphi таким образом, чтобы изменения копии не влияли на оригинальный массив.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Массивы ::