Source position: titanscripter.pas line 151
type TTitanScripterChangeStateEvent = procedure(
Sender: TTitanScripter;
OldState: Integer;
NewState: Integer
) of object;