VScrollStep example for Delphi

Lead1.VScrollStep := 2;