[aguml]

Hola amigos, quiero que al colocarme en una fila del ListView me aparezca el InfoTip o Hint para cada fila pero en la posicion del raton ya que me aparece pero en la primera columna aunque el raton este en la ultima columna de esa fila.
Buscando por internet encontré esto que se supone que haria lo que yo quiero pero no se porque ni siquiera entra en el evento OnOver del TListView.

Código PHP:

void __fastcall TForm1::ListViewProcesosInfoTip(TObject *Sender,
      TListItem *Item, AnsiString &InfoTip)
{
   InfoTip = Item->SubItems->Strings[4];
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ListViewProcesosMouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
   TPoint pt;
   TLVHitTestInfo lvHitInfo;
   AnsiString hint;

   pt = ListViewProcesos->ScreenToClient(Mouse->CursorPos);

   memset(&lvHitInfo, 0, sizeof(lvHitInfo));
   lvHitInfo.pt = pt;

   //over a sub item!
   if( -1 != ListViewProcesos->Perform(LVM_SUBITEMHITTEST, 0, (int)&lvHitInfo))
   {
      //activate hint
      hint = ListViewProcesos->Items->Item[lvHitInfo.iItem]->SubItems->Strings[4];
      ListViewProcesos->Hint = hint;
      Application->ActivateHint(Mouse->CursorPos) ;
   }
}
//--------------------------------------------------------------------------- 


¿Alguien sabe como hacer eso?