Event erzeugen

[Meflin]

dann musst du bei deiner procedure eben dass deklarieren

Delphi-Quellcode:

procedure myOnSuccess(var Cmd: cmdType);
begin
...
end;

und dann eben wie o.g.