Source position: cyNavPanel.pas line 67
type TProcCanNavigateToControl = procedure(
Sender: TObject;
ToControl: TControl;
const KeyPressed: Word;
var Accept: Boolean
) of object;