IVZLongArray.Add

Синтаксис

Add(Value: Integer): Integer;

Параметры

Value. Новый элемент массива.

Описание

Метод Add добавляет новый элемент в массив.

Пример

Модуль, в котором размещается пример, должен иметь ссылку на системную сборку Visualizators. Указанная процедура должна вызываться из точки входа Main.

Создадим новый массив длинных целых чисел и добавим в него элементы. Вставим новый элемент в позицию с индексом 3 и удалим элемент из позиции с индексом 2. Выведем сумму всех элементов массива. Очистим массив и выведем его размер:

Sub UserProc;
Var
    Array: IVZLongArray; // Массив длинных целых чисел
    i: Integer; // Счетчик
    Sum: Double; // Сумма элементов
Begin
    // Создадим новый массив и добавим в него элементы
    Array := New VZLongArray.Create;
    Array.Add(50535648);
    Array.Add(60145664);
    Array.Add(70445645);
    // Вставим новый элемент в позицию с индексом 2
    Array.InsertAt(2, 80447321);
    // Удалим элемент в позиции с индексом 0
    Array.Remove(0);
    // Выведем значение элемента в позиции с индексом 2
    Debug.WriteLine("Элемент в позиции с индексом 2: " + Array.Item(2).ToString);
    // Выведем сумму всех элементов массива
    Sum := 0;
    For i := 0 To Array.Count - 1 Do
        Sum := Sum + Array.Item(i);
    End For;
    Debug.WriteLine("Сумма всех элементов массива: " + Sum.ToString);
    // Очистим массив
    Array.Clear;
    // Выведем размер массива
    Debug.WriteLine("Размер массива после очистки: " + Array.Count.ToString);
End Sub UserProc;

В результате выполнения примера в консоли среды разработки было выведено значение элемента массива в позиции с индексом 2, была выведена сумма всех элементов массива и размер массива после его очистки:

Элемент в позиции с индексом 2: 70445645

Сумма всех элементов массива: 211038630

Размер массива после очистки: 0

См. также:

IVZLongArray