마우스 오른쪽 버튼으로는 OnClick 발생 안합니다.
다른 마우스 이밴트를 이용하셔야할듯합니다.

예를 들어 MouseDown, MouseUp등의 이밴트에 Button 인자가 현재 눌려진 마우스를 알려줍니다.

//---------------------------------------------------------------------------
void __fastcall TForm1::Button1MouseUp( TObject *Sender,
                                        TMouseButton Button,
                                        TShiftState Shift,
                                        int X, int Y)
{
    switch(Button) {
        case mbLeft:        // 왼쪽 마우스
            break;

        case mbRight:       // 오른쪽 마우스
            break;

        case mbMiddle:
            break;
    }
}
//---------------------------------------------------------------------------

마우스핸들 님이 쓰신 글 :
: OnClick이벤트가 있는데
:
: 우클릭 이벤트는 없더라고요
:
: 온클릭으로 우클릭인지 좌클릭인지 구분 하고 싶은데
:
: 가능한가요?? 가능하다면 방법좀 알려주시면 감사하겠습니다.