|
|
A simple example |
program Project1;
{$APPTYPE CONSOLE}
uses
System.Collections;
var
MyQueue : System.Collections.Queue;
begin
// Create our queue
MyQueue := Queue.Create(10); // Start with a capacity of 10
// Add entries to it
MyQueue.EnQueue('Hello World');
MyQueue.EnQueue(TObject(123));
MyQueue.Enqueue(DateTime.Create(2004, 9, 15));
Console.WriteLine('Count = ' + MyQueue.Count.ToString);
Console.WriteLine;
Console.WriteLine('Clearing the Queue :');
// Clear the Queue
MyQueue.Clear;
Console.WriteLine;
Console.WriteLine('Count = ' + MyQueue.Count.ToString);
Console.Readline;
end.
| Show full unit code | Count = 3
Clearing the Queue :
Count = 0
|
|
|
|