EventContext (TTaskContext) - Historique des versions

Syfre le 3 janvier 2017 à 08:12

2017-01-03T08:12:28Z

← Version précédente		Version du 3 janvier 2017 à 08:12
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');

Syfre le 4 février 2013 à 10:53

2013-02-04T10:53:03Z

← Version précédente		Version du 4 février 2013 à 10:53
Ligne 41 :		Ligne 41 :
	{{footer\|Automates}}		{{footer\|Automates}}
	[[Category:Automate]]		[[Category:Automate]]
			[[Category:Contexte de tâche d'automate]]
	[[Category:Contexte d'évènement d'automate]]		[[Category:Contexte d'évènement d'automate]]

Syfre le 4 février 2013 à 10:51

2013-02-04T10:51:14Z

← Version précédente		Version du 4 février 2013 à 10:51
Ligne 30 :		Ligne 30 :
	begin		begin
	UserContext.TaskContext.AddMessage('MyProcessus.Execute');		UserContext.TaskContext.AddMessage('MyProcessus.Execute');
	if Assigned(UserContext.TaskContext.EventContext~~.receivedMsg~~) then		if Assigned(UserContext.TaskContext.EventContext) then
	begin		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		end
	else UserContext.TaskContext.AddMessage('No ~~message~~');		else UserContext.TaskContext.AddMessage('No context');
	end		end
	else showMessage('not in a task');		else showMessage('not in a task');
Ligne 47 :		Ligne 41 :
	{{footer\|Automates}}		{{footer\|Automates}}
	[[Category:Automate]]		[[Category:Automate]]
			[[Category:Contexte d'évènement d'automate]]

Syfre : Page créée avec « 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é… »

2013-02-04T08:21:55Z

Page créée avec « 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é… »

Nouvelle page

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_tâche_(automate)|contexte de la tâche]].

'''Liste des propriétés:'''

{|class="wikitable"
|-
!Propriété
!Usage
|-
|[[receivedMsg (TEventContext)|receivedMsg]]
|Message consommé si l'évènement est du type file d'attente.
|}

'''Liste des méthodes:'''

{|class="wikitable"
|-
!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.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>

{{footer|Automates}}
[[Category:Automate]]

EventContext (TTaskContext) - Historique des versions

Syfre le 3 janvier 2017 à 08:12

Syfre le 4 février 2013 à 10:53

Syfre le 4 février 2013 à 10:51

Syfre : Page créée avec « 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é… »

Syfre : Page créée avec « 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é… »