Функція Length – повертає кількість елементів у масиві чи рядку

Функція Length в Delphi повертає кількість елементів у масиві чи рядку.

Функція Length: Отримання довжини рядка та масивів

var
  openArray  : array of char;
  fixedArray : array[2..4] of Integer;
  multiArray : array[2..4, 1..9] of Integer;
  shortStr   : shortstring;
  longStr    : string;
  i          : Integer;

begin
  // Визначення довжини відкритого масиву
  SetLength(openArray, 17);

  // Показ довжини масивів
  ShowMessage('Длина openArray = '+IntToStr(Length(openArray)));
  ShowMessage('Длина fixedArray = '+IntToStr(Length(fixedArray)));
  ShowMessage('Длина multiArray = '+IntToStr(Length(multiArray)));

  // Застосування до рядків
  shortStr := 'ABCDEFGH';
  longStr  := '12345678901234567890';
  ShowMessage('Довжина shortStr = '+IntToStr(Length(shortStr)));
  ShowMessage('Довжина longStr = '+IntToStr(Length(longStr)));

  // Посимвольне відображення всіх символів короткого рядка
  for i := 1 to Length(shortStr) do
    ShowMessage('Символ '+IntToStr(i)+' = '+shortStr[i]);
end;