Функція Slice створює частину масиву з параметром "Відкритий Масив"

Функція Slice в Delphi створює частину масиву з параметром "Відкритий Масив".

Функція Slice: Передача сектору масиву у процедуру

var
  i : Integer;
  Source : array[0..4] of Integer;

begin
  // Створення вихідного масиву із значеннями елементів 0..4 для елементів 0..4
  for i := 0 to 4 do
    Source[i] := i;

  // Використання команди Slice, щоб передати тільки перші 3 елементи
  // Source як відкритий масив у процедуру ShowSlice.
  ShowSlice(Slice(Source, 3));
end;

// Показ масиву невідомого розміру - його передано як 'Відкритий' масив
procedure TForm1.ShowSlice(SubArray : array of Integer);
var
  i : Integer;

begin
  // Показ кожного елемента цього масиву
  for i := 0 to Length(SubArray)-1 do
    ShowMessage('SubArray['+IntToStr(i)+'] : '+ IntToStr(SubArray[i]));
end;