« EventContext (TTaskContext) » : différence entre les versions

De Wiki1000
Aucun résumé des modifications
Aucun résumé des modifications
 
Ligne 32 : Ligne 32 :
     if Assigned(UserContext.TaskContext.EventContext) then
     if Assigned(UserContext.TaskContext.EventContext) then
       begin
       begin
        aMsg := UserContext.TaskContext.EventContext.ReceivedMsg;
       end
       end
       else UserContext.TaskContext.AddMessage('No context');
       else UserContext.TaskContext.AddMessage('No context');

Dernière version du 3 janvier 2017 à 08:12

Le contexte d'un évènement contient des informations relatives à l'évènement ayant déclenché la tâche d'automate.

Ce contexte est accessible à partir de la propriété EventContext du contexte de la tâche.

Liste des propriétés:

Propriété Usage
receivedMsg Message consommé si l'évènement est du type file d'attente.

Liste des méthodes:

Méthode Usage


<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) then
      begin
        aMsg := UserContext.TaskContext.EventContext.ReceivedMsg;
      end
      else UserContext.TaskContext.AddMessage('No context');
  end
  else showMessage('not in a task');

end; </source>

{{#if:Automates|

{{#if:Automates|— Automates |}} — Développement DSM

|

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

}}