Ver Mensaje Individual
  #1  
Antiguo 25-06-2010
Avatar de erickahr
erickahr erickahr is offline
Miembro
 
Registrado: feb 2010
Posts: 94
Reputación: 15
erickahr Va por buen camino
Unhappy TrayIcon en delphi 2010

Hola compañeros, estoy haciendo una aplicacion que se encuentra iconizada en el area de notificacion, la estoy desarrollando en delphi 2010, con el TrayIcon que viene en los componentes nativos (no es CoolTrayIcon ni Rx), tengo un procedimiento que uestra el globito para las notificaciones.

Código Delphi [-]
 
procedure TMainForm.MuestraGlobo(Mensaje, Titulo: String; Tiempo: Integer;
  Bandera: TBalloonFlags);
begin
  With TrayIcon1 do
    begin
      BalloonHint:=Mensaje;
      BalloonTitle:=Titulo;
      BalloonTimeOut:=Tiempo*1000;
      BalloonFlags:=Bandera;
      ShowBalloonHint;
    end;
end;

Para llamarlo:

Código Delphi [-]
MuestraGlobo('Mensaje', 'Titulo de globo', 10, bfInfo);

Me funciona perfecto en Windows Vista, y en Windows 7, pero no en XP, ojala me puedan ayudar. Quiero que se muestre tambien en XP, pero simplemente no hace nada.
__________________
Nadie puede separar su fe de sus actos, o sus creencias de sus afanes
Responder Con Cita