« DeQueueMessage (TdbfMessageBox) » : différence entre les versions
(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 |
||
| 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. | Cette procédure consomme un message de la queue des messages de la boîte. | ||
{|class="wikitable" | {|class="wikitable" | ||
Version du 12 juillet 2011 à 09:36
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 |
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 :