Archive (TStereotypeClassQueue)
procedure Archive;
Cette méthode modifie l'état de l'objet à cstQUEUE_STATE_ARCHIVED.
Exemple :
function MyProcesss.ProcessReadyJob(const Atopic:string):Boolean;
var AJob:JobQueue;
begin
AJob := JobQueue.DeQueue(ATopic);
if Assigned(AJob) and ICanProcessThisObject(AJob) then
begin
// I can't process this one now so i requeue it
// doProcess(AJob);
AJob.Archive();
end;
end;
Voir aussi