Hallo,
jetzt muss ich schon wieder mit meinem Problem anfangen
Also es geht nochmals um mein Problem von oben...
mit dem Beispiel vom "Remote1" ist mir leider nicht geholfen.
Nochmals mein Problem:
Ich habe ein TrayIcon links neben der Uhr erzeugt.
Nun möchte ich rausfinden ob sich die Position des TrayIcons in dem SysTray ändert
Praktisch wäre es wenn man ne Message (so ne Art OnChange) des SysTray abfangen könnte.
Ich hab mal ein wenig geforscht und hab schon mal das
Handle des SysTray rausgefunden (siehe Code):
Code:
var
hWnd: THandle;
begin
// Fenster anhand des Titelzeilentext suchen
hWnd := FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'TrayNotifyWnd', nil);
showmessage(IntToStr(hWnd));
If hWnd <> 0 then
Sendmessage(HWnd, WM_RBUTTONDOWN, 0, 0); //nur als Beispiel
Sendmessage(HWnd, WM_RBUTTONUP, 0, 0); //nur als Beispiel
Ich bräuchte so was änliches wie:
procedure TForm1.WMSysTrayChange (var Msg : TWMSysTrayChange);
Bitte hilft mir
- ich bin schon fast verzweifelt...
mfg
Helmi