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.{{#images:versionTahoe-32x32.png|stock}}

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 —

}}