Процедура SetLeftBound

Назначение

Процедура устанавливает левую границу массива.

Описание

До Атлантис 5.1:

prosedure SetLeftBound (var mass : array of anyType; lftBnd : integer);

Параметры

mass : array of anyType - имя массива.

lftBnd : integer- левая граница массива.

Возвращаемое значение

При передаче поля не являющегося массивом выбрасывается исключение ExVip.ExArrayFieldNotValid.

Примечания

Функция недоступна (исключена из состава Атлантис) начиная с Атлантис 5.1.

Пример

var ar :array[1..2] of byte;
begin
  ar[1] := 10;
  ar[2] := 20;
  Message(Count(ar)); //Будет выведено 2
  Message(ar[1]+','+ar[2]);//Будет выведено 10,20
  SetLeftBound(ar,0);
  Message(Count(ar)); //Будет выведено 2
  Message(ar[0]+','+ar[1]);//Будет выведено 10,20 
  Message(ar[1]+','+ar[2]);//Будет выведено 20,0
end;