Hey,
eine Frage zu folgendem Skript.
Spoiler anzeigen
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 492, 174, 414, 356)
$Label1 = GUICtrlCreateLabel("SWAT 4 Deutsch Patch! ", 112, 24, 279, 37)
GUICtrlSetFont(-1, 18, 400, 0, "Comic Sans MS")
$Button1 = GUICtrlCreateButton("PATCHEN! ", 128, 88, 249, 49, 0)
GUICtrlSetFont(-1, 14, 400, 0, "Comic Sans MS")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$Paket1 = FileInstall ("C:\Swat 4 - Deutsche Texte.exe", "C:\Swat 4 - Deutsche Texte.exe",1)
$Paket2 = FileInstall ("C:\Swat 4 - Deutsche Sprache.exe", "C:\Swat 4 - Deutsche Stimmen.exe",1)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
If $Paket1 = 1 Then
run ("C:\Swat 4 - Deutsche Texte.exe")
ElseIf $Paket1 = 0 Then
MsgBox (1, "Fehler", "Da scheint was schiefgelaufen zu sein ! =(")
EndIf
Sleep (5000)
If ProcessExists ("Swat 4 - Deutsche Texte.exe") Then
While 1
If Not ProcessExists ("Swat 4 - Deutsche Texte.exe") Then
ExitLoop
Else
Sleep (1000)
EndIf
WEnd
EndIf
If $Paket2 = 1 Then
run ("C:\Swat 4 - Deutsche Stimmen.exe")
ElseIf $Paket2 = 0 Then
MsgBox (1, "Fehler", "Da scheint was schiefgelaufen zu sein! =(")
EndIf
Sleep (5000)
If ProcessExists ("Swat 4 - Deutsche Stimmen.exe") Then
While 1
If Not ProcessExists ("Swat 4 - Deutsche Stimmen.exe") Then
ExitLoop
Else
Sleep (1000)
EndIf
WEnd
EndIf
EndSwitch
WEnd
Immer wird die Fehlermeldung ausgebene. (Die in der MsgBox!).
Ich weiß nicht wieso =(
Dann noch die Frage:
Was kann man verbessern und kann ich eine Art Progress Bar machen, wie weit das "Installieren" der 2 Pakete ist ?
Also zu der Fileinstall Funktion?
Mfg
Benne
=P