Traymenü löschen und neu erstellen

S-e-v-e-n

Wie kann ich das Traymen löschen und neu erstellen? Mit TrayItemDelete geht es. Aber wie ist es wenn ich eine Textdatei mit einträge habe und jeder eintrag wird ein menü-eintrag.

Spoiler anzeigen

[autoit]

Opt("TrayIconDebug", 0)
Opt("TrayMenuMode", 1)
Opt("TrayOnEventMode", 1)
$tray_close = TrayCreateItem("Beenden")
TrayItemSetOnEvent(-1, "_close")
Func _close()
Exit
EndFunc ;==>_close
While 1
Sleep(250)
WEnd

[/autoit]

**Oscar**

Die Textdatei Zeile für Zeile einlesen und damit das Menü erstellen:

[autoit]

$file = FileOpen("test.txt", 0)
If $file = -1 Then ; Check if file opened for reading OK
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
While 1 ; Read in lines of text until the EOF is reached
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
TrayCreateItem($line)
Wend
FileClose($file)

[/autoit]

S-e-v-e-n

das weiß ich, wie das geht. Ich will nur wissen, wie man das Traymenü löscht

**Oscar**

Du meinst, die erstellten Einträge wieder aus dem Traymenü löschen?

Das geht so:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
Global $aTrayItem[1]
$file = FileOpen("test.txt", 0)
If $file = -1 Then ; Check if file opened for reading OK
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf
While 1 ; Read in lines of text until the EOF is reached
$line = FileReadLine($file)
If @error = -1 Then ExitLoop
$aTrayItem[UBound($aTrayItem)-1] = TrayCreateItem($line)
ReDim $aTrayItem[UBound($aTrayItem)+1]
Wend
FileClose($file)
Sleep(5000)
For $i = 0 To UBound($aTrayItem)-1
TrayItemDelete($aTrayItem[$i])
Next
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE

[/autoit]

Beim erstellen die ControlID in einem Array speichern und damit kannst Du die Einträge dann auch wieder löschen.

S-e-v-e-n

OK danke. Gibt es noch ne andere Möglichkeit das Traymenü zu löschen.

**Oscar**

Mir ist keine andere Möglichkeit bekannt.

Was gefällt Dir denn an der For...Next-Schleife nicht?

S-e-v-e-n

Die ist gut. Aber ich dachte das man das evtl. mit der Funktion Opt("") löschen kann

**Oscar**

Mit Opt('TrayIconHide', 1) kannst Du das TrayIcon verstecken und mit Opt('TrayIconHide', 0) wieder anzeigen lassen. Das eigentliche TrayMenü bleibt aber erhalten.