Source position: base_engine.pas line 2887
type TOnChangeStateEvent = procedure(
Sender: TObject;
OldState: TTitanScripterState;
NewState: TTitanScripterState
) of object;