Foros Club Delphi - Ver Mensaje Individual

darkbits · #1 19-09-2012

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