Ich bin in der _TLB.pas jetzt über folgendes gestolpert:
Delphi-Quellcode:
TS7ProSimPLCSimStateChanged = procedure(ASender: TObject; const NewState: WideString) of object;
...
TS7ProSim = class(TOleServer)
private
FOnPLCSimStateChanged: TS7ProSimPLCSimStateChanged;
...
published
property OnPLCSimStateChanged: TS7ProSimPLCSimStateChanged read FOnPLCSimStateChanged write FOnPLCSimStateChanged;
...
Das ist doch schon ein Event-Handler, soweit ich das jetzt in Delphi verstanden habe, oder? Da könnte man mit
if Assigned(FOnPLCSimStateChanged) then FOnPLCSimStateChanged(...);
eigentlich schon das Event aufrufen, richtig?
Blöd ist nur, dass ich jetzt nicht so etwas machen kann:
S7ProSim.OnPLCSimStateChanged := S7ProSimPLCSimStateChanged
E2003 Undeklarierter Bezeichner: 'OnPLCSimStateChanged'