Seleccionar un ítem de un ListView

[Angel.Matilla]

Tengo este formulario con un TListView.

y este código:

void __fastcall TfSelMun::ListaSelectItem(TObject *Sender, TListItem *Item, bool Selected)
{
     pItem = NULL;
     Button1->Enabled = false;
     if (Selected)
     {
          pItem = Item;
          Button1->Enabled = true;
     }
}
//---------------------------------------------------------------------------

pItem es un TListItem. Acabo de darme cuenta que no está funcionando bien.

Al seleccionar un ítem del ListView y pasar por la función el valor de Item de la llamada es el correcto (por ejemplo el de la imagen, VALETIN (COAÑA)), pero al pasar la línea pItem = Item en la variable pItem no está ese valor si no el del primer elemento de la tabla, no sé si he sabido explicarme; aparece esto:

Item->Caption = "VALETIN (COAÑA)";
pItem->Caption = "ASTAS";¿Qué estoy haciendo mal?