SubscribeToEvent (TitTask)
De Wiki1000
(Différences entre les versions)
| (Une révision intermédiaire par un utilisateur est masquée) | |||
| 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]] | ||
Version actuelle en date du 29 mars 2020 à 14: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 |