Всплывающее сообщение в трее

[ZuBy]

TTrayIcon + BalloonHint - стандартные компоненты в XE версиях

[newerow1989]

Я сам догадался:

вручную написать процедуру

TForm1 = class(TForm)
    procedure WMICON(var msg: TMessage); message WM_USER;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

и ниже (после implementation) запрограммировать

procedure TForm1.WMICON(var msg: TMessage);
begin
   If (msg.WParam=0){msg.WParam должен совпадать с TNewNotifyIconData.uID} and
     ((msg.LParam=1028){щелкнуть правой...} or
      (msg.LParam=1029)){...левой кнопкой мыши по всплывающему сообщению} then
       Form1.Visible:=true;
end;

[саша40]

Сообщение от Pasha_Sh

Нужен компонент, при помощи которого я смогу выводить сообщения в трей.

Если компонент TTrayIcon, то функция ShowBallownHint