[QUOTE=himitsu;1153106]
Zitat:
Oder eine kleine Änderung und schon paßt es:
Delphi-Quellcode:
...
{ Show the last enqueued element by modifying the Queue. }
MessageDlg('Enqueued element is: "' + Queue.Dequeue() + '".', mtInformation, [mbOK], 0);
"Enqueues element is" ... Queue.Dequeue ?
Enqueued ist das zuletzt hinzugefügte Element (Ende der Warteschlange).
Dequeue entfernt am Anfang.
Mein Vorschlag wäre:
MessageDlg('Dequeued element is: "' + Queue.Dequeue() + '".', mtInformation, [mbOK], 0);