新版本DELPHI增加的泛型语法带来的是编写代码的异常方便。
uses System.Generics.Collections;
// 创建队列
FPrintQueue := TQueue<TOneTimePrint>.Create;
end;
// 出队:从队列中获取一个任务
OneTimePrint := FPrintQueue.Dequeue;
// 入队:往队列中增加一个任务
FPrintQueue.Enqueue(OneTimePrint)
如果从队列中获取一个任务后执行失败,可以将这一个任务重新入队,排在队尾,后面将获重新执行的机会。