TTrackBar Position durch Klick

Schönen guten Tag

Ich möchte die Position des Klicks auf ein TTrackBar herrausfinden ... das funktioniert auch ganz gut:

typedef void __fastcall (__closure *HLButtonDown)(TObject *Sender,int X, int Y);

class PACKAGE TSpecialTrackBar : public TTrackBar
{
private:
   HLButtonDown IVLButtonDown;

   void __fastcall LButtonDown(TMessage& Message);
protected:
public:
    BEGIN_MESSAGE_MAP
        MESSAGE_HANDLER(WM_LBUTTONDOWN,TMessage, LButtonDown)
    END_MESSAGE_MAP(TTrackBar)
        __fastcall TSpecialTrackBar(TComponent* Owner);
__published:
   __property HLButtonDown OnLButtonDown = {read = IVLButtonDown, write = IVLButtonDown,default = 0};
};

void __fastcall TSpecialTrackBar::LButtonDown(TMessage& Message)
{
   if (IVLButtonDown)
      IVLButtonDown(this, Message.LParamLo, Message.LParamHi);
}

aber leider entspricht das nicht der Position, als würde ich den Slider dorthin bewegen ... Ich möchte mir also eine Funktion schreiben, die auf einen Klick auf den TTrackBar reagiert und beispielsweise den Slider auf die Position des Klicks schiebt.

Das müsste doch möglich sein oder?