DeQueueMessage (TdbfMessageBox)

<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

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 :

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

{{#if:TdbfMessageBox (class)|

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

|

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

}}