Hi
hab ein Problem mit einem skript das etwas abspeichern soll
also hir zuerst mein skript
Spoiler anzeigen
#Include <File.au3>
#Include <Array.au3>
Opt("TrayOnEventMode",1)
Dim $szDrive, $szDir, $szFName, $szExt, $array[1]
Opt("TrayMenuMode",1)
$Progs = TrayCreateMenu("Programme")
$Hinzu = TrayCreateItem("Hinzufügen")
TrayItemSetOnEvent(-1, "_add")
TrayCreateItem("")
$save = TrayCreateItem("Speichern")
$open = TrayCreateItem("Wiederherstellen")
$exititem = TrayCreateItem("Beenden")
TrayItemSetOnEvent(-1, "_Exit")
TraySetState()
While 1
sleep(100)
WEnd
Func _add()
$file = FileOpenDialog("Choose EmbedFile",@DesktopDir,"All Files (*.*)")
If $file <> "" Then
$split = _PathSplit($file, $szDrive, $szDir, $szFName, $szExt)
$item = TrayCreateItem($split[3],$Progs)
$array[Ubound($array)-1] = $file
TrayItemSetOnEvent(-1, "_Run")
_arrayAdd($array, "")
EndIf
EndFunc
Func _Run()
ShellExecute($array[@TRAY_ID-11])
EndFunc
Func _Exit()
Exit
EndFunc
ich schaff es nicht die Pogramme zu speichern und wieder aufzurufen