OnMouseUp() , OnMouseDown() 이벤트 안에서 처리하시면 될 거 같구요
Up은 마우스 눌렀다 뗐을때, Down은 누를때 발생하는 이벤트네요..
키 구별 방법은 아래 코드 참고하세요~~~

void __fastcall TForm1::Button1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
    if(Shift.Contains(ssLeft))
        ShowMessage("왼쪽 버튼");
    if(Shift.Contains(ssRight))
        ShowMessage("오른쪽 버튼");
}


멋진남자 님이 쓰신 글 :
: 마우스의 오른쪽, 왼쪽 키 이벤트를 구별하는 방법 좀 알려주세요
:
: OnMouseUp() 이벤트 안에서 처리되나요?
:
: 아니면 다른 방법이 있나요?