Source position: groupededit.pp line 227
protected procedure TCustomAbstractGroupedEdit.EditMouseWheelUp(
Shift: TShiftState;
MousePos: TPoint;
var Handled: Boolean
);