DeQueueMessage (TdbfMessageBox)

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

Tip : Cette fonction ne tient pas compte du fait que le message soit envoyé ou reçu par la boite.

Tip : Cette fonction ne détache pas le message.

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 :

— TdbfMessageBox (class) — Développement DSM —