« DeQueueMessage (TdbfMessageBox) » : différence entre les versions

De Wiki1000
(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… »)
 
Aucun résumé des modifications
 
(Une version intermédiaire par le même utilisateur non affichée)
Ligne 1 : Ligne 1 :
<source lang='delphi'>function DeQueueMessage(const iTopicName:string):TdbfMessage;</source>
<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.{{tahoe}}
Cette procédure consomme un message de la queue des messages de la boîte.


{|class="wikitable"
{|class="wikitable"
Ligne 11 : Ligne 11 :
|Un sujet de la queue
|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 :
Exemple :

Dernière version du 12 juillet 2011 à 11:47

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