I'm looking to capture the mouse being positioned over a certain component
in an application so that I can change the cursor of the mouse to let the
user know that the component the mouse is over is "clickable", however I
only find events on a TLabel component that can respond to OnClick,
OnDblClick, OnDragDrop, etc.  I don't find something like a OnMouseOver.
How does one accomplish this?

Thanks,
Todd

I'm using BCB 3.0 build 3.7 if that is relevant.

Todd

"Todd Hale" <katysports...@houston.rr.com> schreef in bericht
news:3ea1879a$1@newsgroups.borland.com...

Every control has a Cursor property. Setting this property is all you have
to do.

Peter

news:3ea1879a$1@newsgroups.borland.com...

This assumes your TLabel is named Label1. You can override it's wndproc

Add this to your forms header file

//------------------------------------------------------
protected:
        TWndMethod OldLabel1WndProc;
        void __fastcall NewLabel1WndProc(TMessage &Msg);
//------------------------------------------------------

Put this in your forms construtor

//------------------------------------------------------
   OldLabel1WndProc = Label1->WindowProc;
   Label1->WindowProc = NewLabel1WndProc;
//-------------------------------------------------------

Then add this function

//------------------------------------------------------
void __fastcall TForm1::NewLabel1WndProc(TMessage &Msg)
{
   OldLabel1WndProc(Msg);

   if(Msg.Msg == CM_MOUSEENTER)
   {
     Cursor = crHandPoint;
   }
   if(Msg.Msg == CM_MOUSELEAVE)
   {
     Cursor = crDefault;
   }

//-------------------------------------------------------

Ok, Peter, I found the Cursor property, and that works exactly as I need it,
thanks for the help!

Todd

news:3ea1879a$1@newsgroups.borland.com...

You don't really need to handle that manually.  Just set the component's
Cursor property at design-time to the desired cursor, then the VCL will
handle all of that automatically for you at runtime.  That is the whole
point of the Cursor property - to display a particular cursor when the mouse
is over the component.

There are no exposed events for that.  If you must handle it manually, then
you need to intercept the CM_MOUSEENTER message directly, by subclassing the
component.  If you don't know how to subclass, then have a look at this
article:

    Sublcass a windows control
    http://www.bcbdev.com/faqs/faq76.htm

Gambit