Source position: switches.pas line 91
protected procedure TCustomOnOffSwitch.KeyDown(
var Key: Word;
Shift: TShiftState
); override;