TTrackBar großschrittig auslesen

[TForm1]

Hallo,
gibt es eine Möglichkeit, eine TTrackBar so auszulesen, dass sie nur dann ein Ereignis wirft, wenn sie die ganzzahligen Positionen erreicht? OnChange ist mir zu kleinschrittig, da schon bei jeder kleinsten Mausbewegung das Event auslöst, sodass ich wenn ich den Zeiger um nur eine Einheit verschiebe, das Event bereits 20 mal aufgerufen wurde.
Gibt es so etwas oder muss ich mir da selbst was zusammenbasteln? Sowas wie if alteposition <> neueposition then machwas ?