| |
|
|
Bongbaer | Servus,
ich habe folgendes Problem: Mein neues Programm soll mit einem Trayicon unten rechts aufzurufen sein. Das funktioniert auch so weit. Das menu geht auf und man kann die entsprechenden Optionen anklicken. Wenn ich allerdings das menü ausversehen aufgekickt habe, möchte ich gerne, daß es sich nach einer gewissen Zeit wieder schließt oder beim klick auf den desktop. Außerdem kann es teilweise sein, daß sich das programm beim klick auf den desktop öffnet. Woran liegt das blos. Mit der folgenden Procedure frag ich das Icon ab:
proc Trayiconabfrage declare Zeichen$,Ende%,mouse%,zähler%,doppelklick%
sleep(20) if TaskBarNotification(1234) sleep(20) if maus($1) let zähler%=0 let doppelklick%=0 sleep(100) while xor(neq(zähler%,GetDoubleClickTime()),doppelklick%) sleep(100) let zähler%=add(zähler%,100) case maus($1) : let doppelklick%=1 wend case doppelklick%:let Fensterauf%=1 elseif maus($2) let appendmenü%=1 endif let ende%=1 endif endproc
Danke für die Hilfe |
|
|
| |
|
|