Source position: ntvPanels.pas line 33
type TCanOffsetEvent = procedure(
Sender: TObject;
var NewOffset: Integer;
var Accept: Boolean
) of object;