IStack.Push

Синтаксис

Push(Value: Variant);

Параметры

Value — значение, которое необходимо поместить в стек.

Описание

Метод Push помещает элемент, значение которого передается посредством параметра Value, в стек. Значение помещается в начало стека.

Пример

Sub Main;

Var

Stack1: IStack;

i: Integer;

Begin

Stack1:=New Stack.Create;

For i:=0 To Math.RandBetweenI(50,100) Do

Stack1.Push("Value "+Math.RandBetweenI(0,100).ToString);

End For;

For i:=0 To Math.RandBetweenI(0,50) Do

Stack1.Pop;

End For;

i:=Stack1.Count;

End Sub Main;

После выполнения примера будет создан стек случайных элементов, часть элементов будет извлечена и в переменной «i» будет содержаться количество элементов, оставшихся в стеке.

См. также:

IStack