如何同时获得ListView中数据所在的行和列

[opacity]

任意点击listview中显示的一个数据，如何能同时得到所点击数据所在的行值和列值呢？
非常感谢~~

[opacity]

谢谢：）

[ccrun.com]

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    ListView1->RowSelect = true;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ListView1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
    TListView *lv = (TListView *)Sender;
    if (!lv) return;
    TListItem *pItem = lv->GetItemAt(X, Y);

    if (pItem)
    {
        int nCellLeft(0), nColIndex(0);
        TPoint pt(X, Y);
        TRect rct = pItem->DisplayRect(drSelectBounds);

        for (int i=0; i<lv->Columns->Count; i++)
        {
            rct.Left = nCellLeft;
            rct.Right = nCellLeft + lv->Columns->Items[i]->Width;

            if (PtInRect(rct, pt))
            {
                nColIndex = i + 1;
                break;
            }
            nCellLeft += lv->Columns->Items[i]->Width;
        }
        ShowMessage(String().sprintf("点击了第 %d 行,第 %d 列", pItem->Index + 1, nColIndex));
    }
}

[landaship]

为什么要登录才可以看见，这太小气了吧