Duda con TrayIcon

[yelian]

Saludos a todos los del Foros

Tengo una duda que quizas alguno de ustedes me puedan ayudar el problema es que yo inserto en mi Form un TrayIcon y un ImageList...
- En el ImageList inserto varias imagenes,
- En el TrayIcon pongo su Propiedad ...
Icons=ImageList1;
Animate=true;

Pero cuando ejecuto mi aplicacion el icono enpieza animarze pero cuando llega a la ultima imagen que yo puse que va a empezar por la primera se queda un momento en blanco,

Si alguien supiera como solucionar esto se lo agradeceria mucho, seguro estoy que otras personas tambien lo agradecerian.

[Saludo]...

[[escafandra]]

yelian, asumiendo que el TTrayIcon al que te refieres es el ejemplo que viene en el Builder, y teniendo claro este asunto para los interesados en este hilo, te diré que ese Componente no es mas que un ejemplo de como implementarlos en C++ Builder. Como ejemplo, puede estar un poco deficitario y de hecho lo está.

El problema que expones se deriva de un bug, si así queremos considerarlo.

En el código fuente podemos encontrar la función miembro que se encarga de animar el cursor:

//---------------------------------------------------------------------------
void __fastcall TTrayIcon::DoOnAnimate(TObject *Sender)
{
   if (IconIndex < FIconList->Count)
      FIconIndex++;
   else
      FIconIndex = 0;

   SetIconIndex(FIconIndex);
   Update();
}

Si te fijas, la condición de fin de iconos es incorrecta, pues tras incrementar el indice FIconIndex, éste puede ser igual a FIconList->Count. Es decir apunta a un icono que no existe. Este es el motivo de que desaparezca el icono entre el último y el primero.

Para corregir este bug, basta con dejarlo así:

//---------------------------------------------------------------------------
void __fastcall TTrayIcon::DoOnAnimate(TObject *Sender)
{
   if (IconIndex < FIconList->Count - 1)
      FIconIndex++;
   else
      FIconIndex = 0;

   SetIconIndex(FIconIndex);
   Update();
}

Saludos.

[yelian]

Gracias escafandra;

Pero donde pongo ese codico que me diste estuve buscando pero no encontre donde se pone, si fueras tan amable de decirme...

[[escafandra]]

CBuilder\Examples\Controls\Source\trayicon.cpp

Saludos.

[yelian]

Gracias escafandra, que bobo soy no me fije que era en el evento OnAnimate

gracias...

[JuanErasmo]

Buenas tardes,
Escanfandra! volvemos a encontrarnos,,,
Hablando ahora de trayicons, necesito saber que componente para C++ Builder 6 podria utilizar para obtener un ballonhint en el trayicon.

luego que pueda darle click, y ejecute alguna opción,

He intentado con el de LMDtrayicon, y con el Trayicon y ninguno tiene el metodo ShowHint,,,,,,cual lo tiene??'
Gracias!!