no me funciona trayicon en XE2

[darkbits]

un saludo al foro
estoy utilizando el trayicon y AppEvents de las RX tools en D6 y me funciona todo OK
pero en XE2 no me funciona? si pueden darme una mano si cambio algo para XE2 ?

OnActivate

Código Delphi [-]
{$IFNDEF WIN32}
  if Screen.ActiveForm <> nil then 
Screen.ActiveForm.BringToFront;
{$ENDIF}

OnMinimize

Código Delphi [-]
{$IFDEF WIN32}
  if NewStyleControls then 
ShowWindow(Application.Handle, SW_HIDE);
{$ENDIF}

OnRestore

Código Delphi [-]
{$IFDEF WIN32}
  if NewStyleControls then 
ShowWindow(Application.Handle, SW_SHOW);
{$ENDIF}

muy agradecido por la colaboración

[darkbits]

pos nadie dijo na?

pos lo solucione aqui va para los q tienen este problem

Código Delphi [-]
  Application.MainFormOnTaskbar := false;

[ecfisa]

Empezado por darkbits

pos nadie dijo na?

Hola darkbits.

Es que no tantos pueden comprar el XE2....

Saludos.