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