DeQueueMessage (TdbfMessageBox)

De Wiki1000

<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.

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 :

<source lang='delphi'> //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; </source>

Voir aussi :

{{#if:TdbfMessageBox (class)|

{{#if:TdbfMessageBox (class)|— TdbfMessageBox (class) |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}