SubscribeToEvent (TitTask)
De Wiki1000
(Différences entre les versions)
(2 révisions intermédiaires par un utilisateur sont masquées) | |||
Ligne 26 : | Ligne 26 : | ||
<source lang="delphi"> | <source lang="delphi"> | ||
+ | //Procedure TTestTaskCallBack.RegisterCallBack; | ||
+ | var aReason:string; | ||
+ | begin | ||
+ | if not SubscribeToEvent(TTestTask.OnTerminateSuccessID(),aReason) then | ||
+ | showMessage('subscribe failed '+aReason); | ||
+ | end | ||
</source> | </source> | ||
Voir aussi: | Voir aussi: | ||
+ | * [[OnTerminateID (TitTask)|OnTerminateID]] | ||
* [[ExecuteOnEvent (TitTask)|ExecuteOnEvent]] | * [[ExecuteOnEvent (TitTask)|ExecuteOnEvent]] | ||
* [[UnSubscribeFromEvent (TitTask)|UnSubscribeFromEvent]] | * [[UnSubscribeFromEvent (TitTask)|UnSubscribeFromEvent]] | ||
+ | * [[CreateTaskEvent (TdbmEvent)|CreateTaskEvent]] | ||
{{Footer|Classe_tâche_(stereotype)}} | {{Footer|Classe_tâche_(stereotype)}} | ||
[[Category:Stéréotype tâche]] | [[Category:Stéréotype tâche]] |
Version actuelle en date du 29 mars 2020 à 15:45
function SubscribeToEvent(const iEventID:string; var aReason:string):boolean;
Cette fonction abonne la tâche à un évènement.
La tâche sera exécutée à chaque fois que l'évènement est déclenché jusqu'au désabonnement de la tâche.
Paramètre | Usage |
---|---|
iEventID | Identifiant de l'évènement sur lequel abonner la tâche |
aReason | Informations sur l'erreur |
Result | True si la tâche a été posté |
Exemple :
//Procedure TTestTaskCallBack.RegisterCallBack; var aReason:string; begin if not SubscribeToEvent(TTestTask.OnTerminateSuccessID(),aReason) then showMessage('subscribe failed '+aReason); end
Voir aussi:
Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |