HScrollStep example for Delphi

Lead1.HScrollStep := 2;