Enqueue(Value: Variant);
Value — значение, которое необходимо поместить в очередь.
Метод Enqueue помещает элемент, значение которого передается посредством параметра Value, в очередь. Значение помещается в конец очереди.
Sub Main;
Var
Que: IQueue;
i: Integer;
Begin
Que:=New Queue.Create;
For i:=0 To Math.RandBetweenI(50,100) Do
Que.Enqueue("Value "+Math.RandBetweenI(0,100).ToString);
End For;
For i:=0 To Math.RandBetweenI(0,50) Do
Que.Dequeue;
End For;
i:=Que.Count;
End Sub Main;
После выполнения примера будет создана очередь случайных элементов, часть элементов будет извлечена и в переменной «i» будет содержаться количество элементов, оставшихся в очереди.
См. также: