Ver Mensaje Individual
  #7  
Antiguo 31-10-2014
Avatar de aguml
aguml aguml is offline
Miembro
 
Registrado: may 2013
Posts: 885
Reputación: 11
aguml Va por buen camino
Pues si, entra en ese evento lo que pasa es que como la funcion es cerrada pues no me daba cuenta. El problema es que sigue sin posicionar el hint donde yo quiero.
Otra cuestion, ¿Y si quiero que muestre el hint solo y unicamente cuando esté sobre los items de la primera columna? Es la que tiene el nombre de archivo y es donde quiero que al ponerme encima del nombre me muestre el nombre con ruta completa pero al ponerme en otra columna no quiero que salga.

Edito:
Lo ultimo que pedia lo he conseguido así:
Código SQL [-]
void __fastcall TForm1::ListViewProcesosInfoTip(TObject *Sender,
      TListItem *Item, AnsiString &InfoTip)
{
   if(ocultarHint == true)
      InfoTip = "";
   else
      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) &&
      pt.x < ListViewProcesos->Columns->Items[0]->Width)
   {
      ocultarHint = false;
   }else{
      ocultarHint = true;
   }
}
//---------------------------------------------------------------------------
Pero sigo interesado en lo de hacer que el hint aparezca en la posicion que yo desee.

Última edición por aguml fecha: 31-10-2014 a las 21:54:24.
Responder Con Cita