Programm in System Tray

**devnull**

Hi,
ich hab mein Programm mit dieser Prozedur in den SystemTray befördert.

Delphi-Quellcode:

			       Form1.IconData.cbSize := SizeOf(Form1.IconData);

       Form1.IconData.Wnd := Handle;

       Form1.IconData.uID := 100;

       Form1.IconData.uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;

       Form1.IconData.uCallBackMessage := WM_USER + 20;

       Form1.IconData.hIcon := Application.Icon.Handle;

       Form1.IconData.szTip := 'Dies ist ein TNA-Icon';

       Shell_NotifyIcon(NIM_ADD, @Form1.IconData);

Wenn ich jetzt aber mit der Maus über das Symbol im Tray fahre, verschwindet es auf einmal !???

Was mach ich falsch?

devnull

Programm in System Tray

Programm in System Tray

Forumregeln