Hallo Jens,
ich vermute eher das die Klick schon "erkannt" wird, aber die Message an sich warum auch immer nicht angezeigt wird.
Delphi-Quellcode:
const
WM_TRAYMSG = WM_USER + 10;
var
NID : TNotifyIconData = (
cbsize : sizeof(TNotifyIconData);
uID : 0;
uFlags : NIF_MESSAGE or NIF_ICON or NIF_TIP;
uCallbackMessage : WM_TRAYMSG;
szTip : 'Blupp';
);
Delphi-Quellcode:
procedure TForm1.WndProc(var Message: TMessage);
begin
case Message.Msg of
WM_TRAYMSG:
case Message.lParam of
WM_RBUTTONDOWN : begin
ShowMessage('Blupp');
end;
end;
else
inherited WndProc(Message);
end;
end;
Grüsse, Daniel
