Recherche:

J'ai la réponse : il manque le override de TTestEvent.Execute:

procedure Execute; override;

Bonjour,

Je mets en place un système d'événéments avec une file qui traite les différents ordres :


TEvent = class
{ Type }
FType : string;
{ Description }
...