Name=Winamp
Version=5
Kategorie=Grundlagen
Autor=Nullsoft
Beschreibung=Player für Audio und Video-Dateien
Homepage=http://www.winamp.com
Silent-Installation (installiert Modern Skin sowie alle möglichen Features)
Spoiler anzeigen
;|¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
;| Installation von: Winamp
;|
;| Autor: Jens Ottersberg
;|
;| Getestet mit: winamp53.exe
;|___________________________________________________________________________________________________________________________________
#RequireAdmin
#NoTrayIcon
#include "..\..\funktionen.au3"
#include <File.au3>
; Hauptprogramm
$parameter = ' /S'
$search = FileFindFirstFile(@ScriptDir & "\*.exe")
$datei = FileFindNextFile($search)
FileClose($search)
ShellExecuteWait(@ScriptDir & "\" & $datei, $parameter)
;Registrierung beenden
_activateWindow("Winamp: User information","user survey")
ControlClick("Winamp: User information","user survey","Button6")
ControlClick("Winamp: User information","user survey","Button2")
;Winamp schließen
ProcessWait("winamp.exe")
ProcessClose("winamp.exe")
Func _activateWindow($name, $text)
WinWait($name, $text)
WinActivate($name, $text)
WinWaitActive($name, $text)
EndFunc ;==>_activateWindow
geänderte Installation
Spoiler anzeigen
;|¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
;| Installation von: Winamp
;|
;| Autor: Jens Ottersberg
;|
;| Getestet mit: winamp53.exe
;|___________________________________________________________________________________________________________________________________
#RequireAdmin
#NoTrayIcon
#include "..\..\funktionen.au3"
#include <File.au3>
; Hauptprogramm
$parameter = ''
$search = FileFindFirstFile(@ScriptDir & "\*.exe")
$datei = FileFindNextFile($search)
FileClose($search)
ShellExecute(@ScriptDir & "\" & $datei, $parameter)
$windowname = 'Winamp Setup'
;Lizenzvereinbarung
_activateWindow($windowname,"License Agreement")
ControlClick($windowname,"License Agreement","Button2")
;Komponenten auswählen
_activateWindow($windowname,"Choose Components")
ControlClick($windowname,"Choose Components","Button2")
;Installationsoptionen auswählen
_activateWindow($windowname,"Choose Install Options")
;Einzelne Komponenten (ControlSend mit dem space deaktivieren um zu installieren)
;Startmenü
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Desktop
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Schnellstartleiste
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Tray Icon
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Verknüpfung Audio-Dateien
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Verknüpfung Video-Dateien
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Verknüpfung Audio-CDs
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Verknüpfung Playlist
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;eMusic
ControlSend($windowname,"Choose Install Options","","{space}")
ControlSend($windowname,"Choose Install Options","","{down}")
;Security Monitor
ControlSend($windowname,"Choose Install Options","","{space}")
;Weiter
ControlClick($windowname,"Choose Install Options","Button2")
;Installationsverzeichnis
_activateWindow($windowname,"Choose Install Location")
ControlClick($windowname,"Choose Install Location","Button2")
;Multiuser
_activateWindow($windowname,"Multi-user Settings")
ControlClick($windowname,"Multi-user Settings","Button2")
;Internetverbindung und Sprache
_activateWindow($windowname,"Internet Connection")
ControlClick($windowname,"Internet Connection","Button2")
;Skin
_activateWindow($windowname,"Skin Selection")
;Modern Skin
;ControlClick($windowname,"Skin Selection","Button5")
;Classic Skin
ControlClick($windowname,"Skin Selection","Button4")
ControlClick($windowname,"Skin Selection","Button2")
;Registrierung beenden
_activateWindow("Winamp: User information","user survey")
ControlClick("Winamp: User information","user survey","Button6")
ControlClick("Winamp: User information","user survey","Button2")
;Winamp schließen
ProcessWait("winamp.exe")
ProcessClose("winamp.exe")
Func _activateWindow($name, $text)
WinWait($name, $text)
WinActivate($name, $text)
WinWaitActive($name, $text)
EndFunc ;==>_activateWindow