Hi,
bin am verzweifeln!
Hab ein Programm geschrieben, dass beim Starten mit Application.ShowMainForm := False; verborgen wird.
Es wird dann mit
Code:
with TrayIconData do
begin
cbSize := SizeOf(TrayIconData);
Wnd :=
Handle;
uID := 0;
uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
uCallbackMessage := WM_ICONTRAY;
hIcon := Application.Icon.Handle;
StrPCopy(szTip, Application.Title);
end;
Shell_NotifyIcon(NIM_ADD, @TrayIconData);
der Tray Icon gemacht. Vor noch ca. 1 Stunde hat man mit einem Left-Klick auf das Icon die Form wieder anzeigen lassen können.
Nun habe ich aber irgendwas gemacht, dass nun verursacht das wenn man mit der Mous über das Icon fährt das dieses verschwindet. Die Application läuft aber weiter!?
Hab es dann noch auf einem anderen PC mit einer etwas älteren Version (ca- 1h älter) versucht. Auch da verschindet der TRay Icon.
Wie habe ich das nun wieder geschafft?
Hat da jemand eine Idee?
EDIT:
Hab's gerade nochmal mit einem neuen Project versucht. Da bleibt der Icon in der Tray-Leiste. Wenn ich denn Code vom alten Projekt in das neue komplett kopiere ist das Verschwinden des Icons wieder da! Es muss also etwas im Code sein das das verursacht!