"Для разработчиков", "Серверные скрипты", "Описание функций", "Разное", "GetArrayLength".

 

Получить размер динамического одномерного массива.

 

Синтаксис

function GetArrayLength(Arr: <dynamic array>): integer;

 

Параметры и возвращаемые значения

Параметр

Тип

Значение

Arr

array of...

одномерный массив любого типа.

 

Результат функции

Количество элементов массива. Если 0 — массив пустой. Нумерация элементов массива ведётся с нуля, то есть первый элемент будет иметь нулевой индекс.

 

Пример

var
  ArrData: array of integer;
  i, iLength: integer;
begin
  SetArrayLength(ArrData, random(5) + 5);
  
  iLength := GetArrayLength(ArrData);
  
    for i := 0 to iLength - 1 do
      ArrData[i] := 100 + random(100);
      
  mLogScript('Array length: ' + IntToStr(iLength) + ' elements', '');
    for i := 0 to iLength - 1 do
      mLogScript(IntToStr(i + 1) + ': ' + IntToStr(ArrData[i]), '');
end.

Результат работы скрипта

[13:37:12] (Log "GetArrayLength"): Array length: 8 elements

[13:37:12] (Log "GetArrayLength"): 1: 193

[13:37:12] (Log "GetArrayLength"): 2: 188

[13:37:12] (Log "GetArrayLength"): 3: 144

[13:37:12] (Log "GetArrayLength"): 4: 113

[13:37:12] (Log "GetArrayLength"): 5: 125

[13:37:12] (Log "GetArrayLength"): 6: 133

[13:37:12] (Log "GetArrayLength"): 7: 150

[13:37:12] (Log "GetArrayLength"): 8: 197

[13:37:12] (Run "GetArrayLength"): Время выполнения скрипта: 7 мс

[13:37:12] (Run "GetArrayLength"): Скрипт выполнен успешно.
 

Ещё посмотреть

IntToStr

mLogScript

Random

SetArrayLength