Dequeue: Variant;
The Dequeue method gets a value of the element that is placed as the first one from a queue.
After extracting, the element is removed from a queue.
Sub UserProc;
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 UserProc;
After executing the example a queue of random elements is created, part of elements is extracted, and the "i" variable contains the number of elements left in the queue.
See also: