Source position: editbtn.pas line 223
protected procedure TCustomEditButton.EditMouseWheelDown(
Shift: TShiftState;
MousePos: TPoint;
var Handled: Boolean
);