You can try:Code: Pascal [Select][+][-]procedure TForm1.SpinEdit1MouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);begin Handled := True;end;