Source position: tiBaseMediator.pas line 28
type TtiMediatorEvent = procedure(
AMediatorView: TtiMediatorView
) of object;