DeQueueMessage (TdbfMessageBox)

Syfre (discuter | contributions)
(Page créée avec « <source lang='delphi'>function DeQueueMessage(const iTopicName:string):TdbfMessage;</source> Cette procédure consomme un message de la queue des messages de la boîte.{{tah… »)
Modification suivante →

---

Version du 12 juillet 2011 à 10:36

function DeQueueMessage(const iTopicName:string):TdbfMessage;

Cette procédure consomme un message de la queue des messages de la boîte.

Result	Un message obtenu de la queue ou nil si aucun message n'est disponible.
iTopicName	Un sujet de la queue

Exemple :

//Procedure DeQueueMessage;
var msg:TdbfMessage; box:TdbfMessageBox;
begin
  box := TdbfMessageBox.FindBox('mybox');
  if Assigned(box) then
   begin
     msg := box.DeQueueMessage('topic1');
     if Assigned(msg)
        then ShowMessage('found one')
        else showMessage('no message in queue');
   end;
end;

Voir aussi :

• Création d'un message
• File d'attente

— TdbfMessageBox (class) — Développement DSM —