Source position: cyScrollBox.pas line 56
type TProcFocusChanged = procedure(
Sender: TObject;
FocusedControl: TControl
) of object;