Справочник по Delphi

VarArrayRef, функция

Синтаксис


function VarArrayRef(const V: Variant): variant;

Описание

Функция VarArrayRef создает новый массив Variant с установленным битом varByRef в поле VarType. Новый Variant непосредственно ссылается на данные массива V. Любые изменения в размерах или содержимом V также отражаются на новом массиве.
VarArrayRef - настоящая функция.

Ошибки

Советы и приемы

Создав ссылку на массив, следует позаботиться, чтобы ссылка не могла "пережить" исходный массив. Если оба Variant имеют одинаковые области действия, все нормально, однако не возвращайте ссылку на массив из функции, для которой исходный массив является локальным.
Нельзя изменить размеры массива по его ссылке.

Пример


var
  Orig, Ref: Variant;
begin
  Orig := VarArrayCreate([1,  10], varInteger);
  Ref := VarArrayRef(Orig);
  Orig[1] := 42;
  WriteLn(Ref[1]);                        // Печатает 42
  VarArrayRedim(Orig,  5);                // Отражается также и на Ref
  WriteLn(VarArrayHighBound(Ref, 1));     // Печатает 5
end;                                      // Ref и Orig очищаются

Смотрите также

Функции VarArrayCreate, VarArrayDimCount, VarArrayHighBound, VarArrayLock, VarArrayLowBound, VarArrayOf, VarArrayUnlock, VarIsArray, VarType, процедура VarArrayRedim.

Учебник по языку Pascal Лабораторные работы по программированию Справочник

Нет комментариев.

Оставить комментарий: