Справочник функций и процедур Delphi: Slice

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

Slice
Функция
Создает часть массива с параметром "Открытый Массив" System unit
  function Slice ( SourceArray : array; Count : Integer ) : array;

Delphi Sources

Описание
Функция Slice создает подмассив из первых Count элементов массива SourceArray.

Эта функция может использоваться ТОЛЬКО как аргумент для параметра с типом "открытый массив" в процедуре или функции.

Параметр с типом "открытый массив" имеет неизвестное число элементов на момент компиляции.

Это позволяет процедурам работать с массивами переменной длины.
Похожие команды
Array  Тип данных содержащий индексируемую коллекцию данных

Copy  Создает копию части строки или части массива

 
Пример кода : Передача сектора массива в процедуру
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;
SubArray[0] : 0
SubArray[1] : 1
SubArray[2] : 2
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте