Sleep :O
peethebee
Beiträge von peethebee
-
-
1,6 Sek., um eine Seite zu laden halte ich nicht wirklich für lang. Firefox lädt bei mir selbst google.de in 1,2 Sek...
peethebee
-
Die IE.au3 kann auch vollständig im Hintergrund arbeiten (siehe _IECreate, englische Hilfe).
Vielleicht reicht für deinen Zweck aber schon _INetGetSource...peethebee
-
Bisschen was steht ja in der Hilfe. Mehr könnte man ausprobieren...
Aber von einer Abhängigkeitsliste habe ich noch nichts gehört oder gesehen.peethebee
-
Hi!
Fixed.
Spoiler anzeigen
[autoit]#include <array.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstants.au3>
$gui=GUICreate("Settings", 350, 300, 100, 200)
GUICtrlCreateLabel("Bitte wählen sie die Programme aus die sie installieren möchten", 10, 10, 300, 15)
GUICtrlCreateLabel("und klicken sie anschließend auf Ändern und danach auf Exit", 10, 25, 300, 15)
$check1 = GUICtrlCreateCheckbox("Scite", 10, 50)
$check2 = GUICtrlCreateCheckbox("Nero", 10, 70)
$check3 = GUICtrlCreateCheckbox("Office 2003", 10, 90)
$check4 = GUICtrlCreateCheckbox("ZoneAlarm", 10, 110)
$check5 = GUICtrlCreateCheckbox("Steam", 10, 130)
$check6 = GUICtrlCreateCheckbox("IrfanView", 10, 150)
GUISetState()
$exit = GUICtrlCreateButton("Exit", 90, 250, 70, 30)
$change = GUICtrlCreateButton("Ändern", 10, 250, 70, 30)
FileDelete("C:\autoitinstallerfile1.txt")$gui2 = GUICreate("Scite", 200, 200, 100, 100, $WS_POPUPWINDOW)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlCreatePic("C:\scite.jpg", 0, 0, 600, 600)
GUISetState(@SW_HIDE)Func GetPos()
[/autoit] [autoit][/autoit] [autoit]
$a = GUIGetCursorInfo($gui)
;_ArrayDisplay($a)
If not @error and $a[4] = "5" Then
$mouse=MouseGetPos()
WinMove($gui2, "", $mouse[0] + 10, $mouse[1] + 10)
GUISetState(@SW_SHOW, $gui2)
Else
GUISetState(@SW_HIDE, $gui2)
EndIf
EndFunc ;==>GetPosDo
[/autoit] [autoit][/autoit] [autoit]
GetPos()$msg = GUIGetMsg()
[/autoit]
If $msg = $exit Or $msg = $change Then
FileDelete("C:\autoitinstallerfile1.txt")
;----------------------------------------------------------------------
If GUICtrlRead($check1) = $GUI_CHECKED Then
FileWriteLine("C:\autoitinstallerfile1.txt", "1")
Else
FileWriteLine("C:\autoitinstallerfile1.txt", "0")
EndIf
;----------------------------------------------------------------------
If GUICtrlRead($check2) = $GUI_CHECKED Then
FileWriteLine("C:\autoitinstallerfile1.txt", "1")
Else
FileWriteLine("C:\autoitinstallerfile1.txt", "0")
EndIf
;----------------------------------------------------------------------
If GUICtrlRead($check3) = $GUI_CHECKED Then
FileWriteLine("C:\autoitinstallerfile1.txt", "1")
Else
FileWriteLine("C:\autoitinstallerfile1.txt", "0")
EndIf
;----------------------------------------------------------------------
If GUICtrlRead($check4) = $GUI_CHECKED Then
FileWriteLine("C:\autoitinstallerfile1.txt", "1")
Else
FileWriteLine("C:\autoitinstallerfile1.txt", "0")
EndIf
;----------------------------------------------------------------------
If GUICtrlRead($check5) = $GUI_CHECKED Then
FileWriteLine("C:\autoitinstallerfile1.txt", "1")
Else
FileWriteLine("C:\autoitinstallerfile1.txt", "0")
EndIf
;----------------------------------------------------------------------
If GUICtrlRead($check6) = $GUI_CHECKED Then
FileWriteLine("C:\autoitinstallerfile1.txt", "1")
Else
FileWriteLine("C:\autoitinstallerfile1.txt", "0")
EndIf
EndIf
Sleep(100)
Until $msg = $exit Or $msg = $GUI_EVENT_CLOSE
MsgBox(0, "Achtung", "Die Änderungen wurden vorgenommen und gespeichert")
;run( "install2.exe)Edit: Fenster verschönert.
peethebee
-
TCP/IP Chat + RSA Verschlüsselung!
PDf erstellen ohne Adobe und Postscript
FileWrite in WordZugegebenermaßen nicht ganz leicht zu finden ;).
peethebee
-
call ("Main") -> return
Sonst mal bisschen über Recursion Level googlen.
Edit: Und bitte mal in der Hilfe nachlesen, wie man Funktionen aufruft (Tipp von mir: nicht mit call ;))peethebee
-
Das Skript ist ja nicht an IOM gebunden. Installieren kann man es ja auch ohne IOM mit dem Skript.
peethebee
-
_FileWriteFromArray(@ScriptDir & "\user.ini", $array, 1)
-
Naja, wenn du ihn selbst schreibst, ist alles klar. Wenn du eine nicht-standard-UDF benutzt oder eine Funktion von jemand anderem, dann musst du halt eine Genehmigung haben, das zu verwenden und kommerziell vertreiben zu dürfen.
peethebee
-
Theoretisch PixelChecksum...
Gibt aber sicher auch andere Wege.peethebee
-
Unter der Voraussetzung, dass du die Rechte an allen (!) Teilen des Quelltextes hast, sehe ich da kein Problem.
peethebee
-
GUICtrlCreateTabItem("1. &Tab")
GUICtrlCreateTabItem("2. T&ab")
GUICtrlCreateTabItem("3. Ta&b")Keine Ahnung, ob das schon reicht.
peethebee
-
Hast du Adminrechte? Könnte hilfreich sein.
Einfach mit:
#RequireAdmin
holen.peethebee
-
AutoRuns kann afaik auch Treiber rausnehmen aus dem Startprozess. Aber nur anwenden, wenn du genau weißt, welcher es ist.
peethebee
-
1 ist ein wahrer Ausdruck (wie True), also Endlosschleife aus der man nur mit Exitloop rauskommt.
peethebee
-
Was soll passieren? Was passiert?
Keiner hier hat eine Glaskugel...
peethebee
-
[autoit]
Dim $pw1 = 0, $pw2 = 1
[/autoit]
While ($pw1 <> $pw2)
$pw1 = InputBox("Passwort", "PW1", "", "*")
If @error Then Exit
$pw2 = InputBox("Passwort2", "PW2", "", "*")
If @error Then Exit
If ($pw1 <> $pw2) Then
ContinueLoop
EndIf
ExitLoop
WEnd
MsgBox(0, "", "Raus")peethebee
Edit: Langsamer ;).
-
:willkommen:
Denke schon, dass du dich hier wohlfühlen wirst :).
peethebee
-
Herzlich willkommen bei uns :).
Geduld haben wir immer, wenn man sich richtig verhält ;).
peethebee