안녕하세요... tool bar 안에서... 현재의 마우스가 몇번째 ToolButton 위치에 있는지를
간단히 알아내려고 합니다...
(tool bar의 세개의 ToolButton을 add 한 상태입니다 )

아래의 방법으로 해보았는데...잘 동작을 안하는것 같습니다.
몇번째 tool button의 위치에 있는지 알아 낼수 있는 좋은 방법이 없을까요?

void __fastcall TForm1::ToolBar1MouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
    TPoint pt;
    GetCursorPos(&pt);
    pt=ToolBar1->ScreenToClient(pt);
    if(pt.x>=ToolButton1->Left && pt.x<=(ToolButton1->Left+ToolButton1->Width))
    {
        if(pt.y>=ToolButton1->Top && pt.y<=(ToolButton1->Top+ToolButton1->Height))
        {

            Edit1->Text = " ToolButton1 위에 마우스가 있음!"  ;
            return;
        }
    }

    GetCursorPos(&pt);
    pt=ToolBar1->ScreenToClient(pt);
    if(pt.x>=ToolButton2->Left && pt.x<=(ToolButton2->Left+ToolButton2->Width))
    {
        if(pt.y>=ToolButton2->Top && pt.y<=(ToolButton2->Top+ToolButton2->Height))
        {

             Edit1->Text= " ToolButton2 위에 마우스가 있음!" ;
             return;
        }
    }



    GetCursorPos(&pt);
    pt=ToolBar1->ScreenToClient(pt);
    if(pt.x>=ToolButton3->Left && pt.x<=(ToolButton3->Left+ToolButton3->Width))
    {
        if(pt.y>=ToolButton3->Top && pt.y<=(ToolButton3->Top+ToolButton3->Height))
        {
             Edit1->Text= " ToolButton3 위에 마우스가 있음!" ;
             return;
        }
    }
}

고맙습니다...