TCustomUpDown

pt 

OnChanging

pt 

OnClick