[YVitaliy]

Тогда просто добавь это свойство ему. Или создай аналогичный сласс:

Код:

type
 TTrackBar=class(ComCtrls.TTrackBar)
 private
 public
    property OnMouseDown;
    property OnMouseUp;
 end;

Правда, возможно, процедуру TrackBar1MouseDown придется создавать вручную, и в конструкторе формы прописывать

Код:

TrackBar1.OnMouseDown:=TrackBar1MouseDown;

Или внести соответствующие коррективы в файл .dfm