Comportamiento extraño al colorear un ListView

[Ziara]

Buenas tardes!

Todavía no lo tengo muy claro, te voy a plantear mis dudas.

Ese código lo vas a poner en donde agregas los items en el ListView... Busca en tu código donde haces ListView.Items.Add y ahí lo puedes adaptar o agregar...

Bien, el ListView lo tengo en un Unit4, por ejemplo, que se ejecuta como un hilo donde me va mostrando, en una función, la información en el ListView. Ahora mismo lo tengo así:

void __fastcall Thread::Mostrarlineas()
{
 TListItem* item = Form1->ListView->Items->Add();
 item->Caption = cadena1;
 item->SubItems->Add(cadena2);
 item->SubItems->Add(cadena3);
}

Ahora agrego el código siguiente:

void __fastcall Thread::Mostrarlineas()
{
 TListItem* item = Form1->ListView->Items->Add();
 
//agrego otro objeto item
 TListItem* dataitem = Form1->ListView->Items->Add();
 dataitem->Caption = cadena2; //cadena2 indica el protocolo(UDP,TCP..)
 if (dataitem->Caption == "TCP")
 {
  dataitem->Data = Pointer(0);
 }
else if (dataitem->Caption == "UDP")
 {
  dataitem->Data = Pointer(1);
 }
else
 {
  dataitem->Data = Pointer(2);
 }

 item->Caption = cadena1;
 item->SubItems->Add(cadena2);
 item->SubItems->Add(cadena3);
}

No se si esto es correcto, que está haciendo el nuevo código introducido?

Gracias.