ReceivedMsg (TEventContext)

<source lang='delphi'>property receiveMsg:TdbmQueueMessage;</source>

Propriété en lecture seule.

Cette propriété contient une référence vers le message consommé lorsque l'évènement est du type file d'attente.

Cette propriété est du type TdbmQueueMessage.

Exemple :

<source lang="delphi"> //Procedure Execute; var aMsg:TdbmQueueMessage; idx:Integer; begin

 if Assigned(UserContext.TaskContext) then
  begin
    UserContext.TaskContext.AddMessage('MyProcessus.Execute');
    if Assigned(UserContext.TaskContext.EventContext.receivedMsg) then
      begin
        aMsg := UserContext.TaskContext.EventContext.receivedMsg;
        UserContext.TaskContext.AddMessage('Has a message');
        for idx:=0 to aMsg.Count-1 do
         begin
           UserContext.TaskContext.AddMessage(aMsg.DisplayStrings[idx]);
         end;
      end
      else UserContext.TaskContext.AddMessage('No message');
  end
  else showMessage('not in a task');

end; </source>