1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Jam00

Beiträge von Jam00

  • GDI+ Spiel: "Targets"

    • Jam00
    • 13. April 2010 um 14:57

    Ganz lustig das spiel
    Würde nur vllt. noch nen Counter lassen wie viele Scheiben mach durchgelassen hat und wenn man zu viel durchlässt, das man dann Verliert
    Und wurde ja schon erwähnt, ich muss je shcneller es wird immer weiter unteralb der scheibe klicken

  • o2 Handyfinder (Handyortung)

    • Jam00
    • 13. April 2010 um 14:48

    Und was mache ich wenn ich kein O2 habe?
    Kann ich auch irgendwie fremde Handys orten?

  • Game Launcher

    • Jam00
    • 12. April 2010 um 21:25

    Cooles Script muss ich sagen!
    Da sind aber noch ein Paar fehler drinne:
    1. Wenn die Nachfrage kommt "Wollen sie <Spiel> wirklich starten" und man geht mit der Tastatur auf nein und drückt Enter, kommt die Nachfrage sofort wieder, man muss mit der Maus draufklicken
    2. Wenn ich mit den Pfeiltasten das spiel wechsle und dann Enter drück frag er mich immernoch ob ich das Spiel was voher im Vordergrund war starten will, nicht das Spiel was ich ausgewählt habe


    Verbesserungsvorschläge:
    1. Es säh bestimmt cool aus wenn du die Hüllen noch ein Wenig abrundest
    2. Vllt. eine Hintergrundbildoption
    3. Einen Spiel-Adder, womit man einfach Pfad zum spiel auswähl.
    4. Wenn ich mit den Pfeiltasten zwischen den Spielen hin und her wechsle muss ich ganz schnell loslassen sonst geht er schon weiter, vllt. könntest du da so eine kleine Unterbrechung einbauen, die dann eine Zeit wartet bis er weitergeht auch wenn man gedrückt hält

  • Problem mit Au3IrrLicht

    • Jam00
    • 12. April 2010 um 20:56

    Super danke :)

  • Problem mit Au3IrrLicht

    • Jam00
    • 12. April 2010 um 20:09

    hab da noch ne frage, wie schaffe ich es dsa Sucite das immer in 32 bit startet wenn ich F5 drücke, weil wenn ich einfach rechtsklick Run Script mache ehe ich ja keine vernüpftige Fehlerausgabe und es ist zimlich Lästig immer dann in Ordner zu gehen und per Rechtsklick zu starten

  • Problem mit Au3IrrLicht

    • Jam00
    • 12. April 2010 um 19:59

    @progandy
    Super, thx das wars
    Wusste garnicht das es nicht für 64 bit geht, daran habe ich garnicht gedacht

  • Problem mit Au3IrrLicht

    • Jam00
    • 12. April 2010 um 19:36

    Nein leider nicht, das hatte ich auch schon Probiert

  • FunnySmiley

    • Jam00
    • 12. April 2010 um 19:05

    qon
    Ja stimmt :D
    Den Smiley war Kamuis werk^^
    Ich frag ihn ob er nochmal nen anderen macht

    @all
    THX

  • FunnySmiley

    • Jam00
    • 12. April 2010 um 18:59

    Hi,
    Kamui (auch hier im Forum) hatte eine Idee die ich dann in die Tat umgesetzt habe. Er hat mich gefragt ob ich es schaffen würde das sich ein Smiley sich die ganze Zeit um den Mauszeiger drehen würde, ich habe gesagt ich könnte es ja mal Probieren. Hab es auch halbwegs geschafft nur die Formel für die Kreisbewegung von UZE hat mir name22 gezeigt. Naja, aber das fand ich noch ein bischen langweilig, da hab ich mir gedacht das kann man bestimmt noch interesanter gestalten.
    Wir sind auf folgende Idee gekommen:
    Solange man den Mauszeiger bewegt folgt der Smiley nur dem Mauszeiger, bewegt man ihn aber nicht, fängt der Smiley sich an zu drehen, erst langsam und dann immer schneller und irgendwann...naja ihr sed es ja selber.
    Ist jetzt nicht besonders schwer zu Programieren, aber ich fande es ganz lustig, könnt es euch ja einfach mal angucken und sagen wie ihr es findet.

    Zu 32-Bit umcompilert, war in 64 Bit

    Danke für die bishärigen 14 Downloads

    Dateien

    FunnySmiley.rar 366,02 kB – 268 Downloads
  • Problem mit Au3IrrLicht

    • Jam00
    • 12. April 2010 um 18:50

    ja wie gesagt, auf deinen Tipp hin ahbe ich das gmeacht und es ging trozdem nicht, hab es jetzt acuh nochmal in den SysWow64 Ordner kopiert, abere s geht immer noch nicht

  • Problem mit Au3IrrLicht

    • Jam00
    • 12. April 2010 um 18:32

    Neuinstalation hat mir auch nicht geholfen :(
    qon
    Ne, eig nicht, weil ich habe die DLLs ja im gleichen Ordner wie das Script, habe es trozdem mal ausprobier und in Windows und System32 kopier, hat nichts gebracht

    Wenn jemand neine Idee hat kann er mich ja gerne mal im ICQ adden, meine numemr steht in Account-Informationen, aber dann auch gleich mit anschreiben oder bei der Auorisierungsanfrage dabeischreiben das ihr von AutoIt.de seit sonst nehme ich nicht mehr an da mich schon zu viele leute geaddet haben um mir Links zu schmutzseiten zu schicken oder trojaner, also bitte dann dabei schreiben, oder einfach ne PN, wenn jemand lust hat kan er auch gerne mal per TeamViewer sich das ganze angucken

  • Problem mit Au3IrrLicht

    • Jam00
    • 12. April 2010 um 18:21

    Hmm, das ist aber komisch, ich glaub ich isntalöliere AutoIt dann neun, sag dann bescheid ob es geholfen hat

  • Game Launcher

    • Jam00
    • 12. April 2010 um 18:20

    Na ganz so blöd bin ich auch nicht -.-
    Das habe ich schon, bei mir kommt dieser Ferhler:

    Spoiler anzeigen
    Code
    Spiele Center Beta\Spiele Center Beta.au3 (68) : ==> Unknown function name.:
    If $Window_type = 1 Then Global $Hwnd = CreateDevice($EDT_DIRECT3D9, 1024, 600, 16, 0, 0, 0)
    If $Window_type = 1 Then Global $Hwnd = ^ ERROR


    Und das Betrifft ja die Function CreateDevice

    Habe Archiv einfach entpackt und so gestartet wie es war, ging net

    EDIT: hat sich erledig, lag daran das ich in 64 bit compilert habe

  • Game Launcher

    • Jam00
    • 11. April 2010 um 22:45

    Bei mir kommt immer ein Fehler, "Unknown Function Name", ich denke mal das liegt an der neuen AutoIt-Version, ist das bei euch auch so? Wenn ja wi ekann man es beheben?

  • Problem mit Au3IrrLicht

    • Jam00
    • 11. April 2010 um 22:05

    Ich wollte einfach mal die Beispiele ausprobieren die Dabei sind.
    Nein das hatte ich mir noch nicht angeguckt, aber auch da ist genau der gleiche fehler wenn ich es starten will :(
    Es ist ja eig. egal welche funktionen ich nutzen will weil es bei alle nicht geht

  • Problem mit Au3IrrLicht

    • Jam00
    • 9. April 2010 um 13:04

    Weiß keiner wie das geht?

  • Fenster im Kreis bewegen [ehemals: Druch Gui durchklicken]

    • Jam00
    • 8. April 2010 um 22:08

    Super, danke
    Woher oder wie kommt man auf diese Formeln??

  • Fenster im Kreis bewegen [ehemals: Druch Gui durchklicken]

    • Jam00
    • 8. April 2010 um 20:34

    Oki, habe es selber hinbekommen

    Spoiler anzeigen
    [autoit]

    #include <WindowsConstants.au3>
    #include <Constants.au3>
    #include <WindowsConstants.au3>
    #Include <WinAPI.au3>
    $hGui = GUICreate ("Smily",15,15,0,0,-2147483648+0x08000000,$WS_EX_LAYERED+0x00000080+0x00000008)
    GUISetBkColor (0x000000)
    $hBmp = GUICtrlCreatePic ("i.bmp",0,0,15,15)
    DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hGui, "long", 0x000000, "byte", 255, "long", 0x03)
    GUISetState (@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    _Win_SetClickThrough ($hGui)
    While 1
    Switch GUIGetMsg ()
    Case -3
    Exit
    EndSwitch
    Sleep (1)
    $Pos = MouseGetPos()
    WinMove ($hGui,"",($Pos[0]-7),($Pos[1]-7))
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ;===============================================================================
    ;
    ; Function Name: _Win_SetClickThrough($hWnd,$noclic = True)
    ; Description:: Makes a window to not receive mouse input
    ; Parameter(s): $title -> Title or hWnd of Window
    ; $text [Optional] -> Text in Window
    ; $noclic [Optional] -> If False, the window regains MouseInput otherwise it will loose it, defalut: True
    ; Requirement(s): <WINApi.au3>
    ; Return Value(s): Success: 1, Error0 and @error
    ; @error Values: 1 -> Window does not exist
    ; 2 -> Error in Setting the Styles
    ; Author(s): Prog@ndy
    ;
    ;===============================================================================
    ;
    Func _Win_SetClickThrough($title,$text = "",$noclic = True)
    Local $hWnd = WinGetHandle($title,$text)
    If @error Then Return SetError(1,0,0)
    If $noclic Then
    _WinAPI_SetWindowLong($hWnd,$GWL_EXSTYLE,BitOR(_WinAPI_GetWindowLong($hWnd,$GWL_EXSTYLE),$WS_EX_TRANSPARENT))
    If @error Then Return SetError(2,0,0)
    ;~ WinSetTrans($hWnd,"",255) ; Sets the Layered Attribute, but still shows the window :)
    If @error Then Return SetError(2,0,0)
    Else
    _WinAPI_SetWindowLong($hWnd,$GWL_EXSTYLE,BitAND(_WinAPI_GetWindowLong($hWnd,$GWL_EXSTYLE),BitNOT($WS_EX_TRANSPARENT)))
    If @error Then Return SetError(2,0,0)
    EndIf
    Return 1
    EndFunc
    ;### UDF END

    [/autoit]

    aber jetzt habe ich ein neues Prob:
    Ich wollte das sich der Smily jetzt um den Mauszeiger dreht, aber das bekomm ich ent hin, habe es so probiert

    Spoiler anzeigen
    [autoit]

    #include <WindowsConstants.au3>
    #include <Constants.au3>
    #include <WindowsConstants.au3>
    #Include <WinAPI.au3>
    $hGui = GUICreate ("Smily",15,15,0,0,-2147483648+0x08000000,$WS_EX_LAYERED+0x00000080+0x00000008)
    GUISetBkColor (0x000000)
    $hBmp = GUICtrlCreatePic ("i.bmp",0,0,15,15)
    DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hGui, "long", 0x000000, "byte", 255, "long", 0x03)
    GUISetState (@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    Dim $Kreis[14][2]
    $Count = 0
    $Kreis[0][0] = 10
    $Kreis[0][1] = 0
    $Kreis[1][0] = 10
    $Kreis[1][1] = 1
    $Kreis[2][0] = 10
    $Kreis[2][1] = 2
    $Kreis[3][0] = 9
    $Kreis[3][1] = 3
    $Kreis[4][0] = 9
    $Kreis[4][1] = 4
    $Kreis[5][0] = 8
    $Kreis[5][1] = 5
    $Kreis[6][0] = 7
    $Kreis[6][1] = 6
    $Kreis[7][0] = 5
    $Kreis[7][1] = 7
    $Kreis[8][0] = 5
    $Kreis[8][1] = 8
    $Kreis[9][0] = 4
    $Kreis[9][1] = 8
    $Kreis[10][0] = 3
    $Kreis[10][1] = 9
    $Kreis[11][0] = 2
    $Kreis[11][1] = 9
    $Kreis[12][0] = 1
    $Kreis[12][1] = 9
    $Kreis[13][0] = 0
    $Kreis[13][1] = 9
    AdlibRegister ("_Count",20)
    _Win_SetClickThrough ($hGui)
    While 1
    Switch GUIGetMsg ()
    Case -3
    Exit
    EndSwitch
    Sleep (1)
    $Pos = MouseGetPos()
    WinMove ($hGui,"",($Pos[0]-7),($Pos[1]-7))
    If $Count < 14 Then
    WinMove ($hGui,"",($Pos[0]-7) + $Kreis[$Count][0],($Pos[1]-7) + $Kreis[$Count][1])
    ElseIf $Count < 27 Then
    WinMove ($hGui,"",($Pos[0]-7) - $Kreis[$Count-13][0],($Pos[1]-7) - $Kreis[$Count-13][1])
    ElseIf $Count < 40 Then
    WinMove ($hGui,"",($Pos[0]-7) + $Kreis[$Count-26][0],($Pos[1]-7) - $Kreis[$Count-26][1])
    ElseIf $Count < 53 Then
    WinMove ($hGui,"",($Pos[0]-7) - $Kreis[$Count-39][0],($Pos[1]-7) + $Kreis[$Count-39][1])
    EndIf
    WEnd
    Func _Count()
    $Count +=1
    If $Count > 53 Then $Count = 0
    EndFunc
    ;~ ;### UDF Start

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ;===============================================================================
    ;
    ; Function Name: _Win_SetClickThrough($hWnd,$noclic = True)
    ; Description:: Makes a window to not receive mouse input
    ; Parameter(s): $title -> Title or hWnd of Window
    ; $text [Optional] -> Text in Window
    ; $noclic [Optional] -> If False, the window regains MouseInput otherwise it will loose it, defalut: True
    ; Requirement(s): <WINApi.au3>
    ; Return Value(s): Success: 1, Error0 and @error
    ; @error Values: 1 -> Window does not exist
    ; 2 -> Error in Setting the Styles
    ; Author(s): Prog@ndy
    ;
    ;===============================================================================
    ;
    Func _Win_SetClickThrough($title,$text = "",$noclic = True)
    Local $hWnd = WinGetHandle($title,$text)
    If @error Then Return SetError(1,0,0)
    If $noclic Then
    _WinAPI_SetWindowLong($hWnd,$GWL_EXSTYLE,BitOR(_WinAPI_GetWindowLong($hWnd,$GWL_EXSTYLE),$WS_EX_TRANSPARENT))
    If @error Then Return SetError(2,0,0)
    ;~ WinSetTrans($hWnd,"",255) ; Sets the Layered Attribute, but still shows the window :)
    If @error Then Return SetError(2,0,0)
    Else
    _WinAPI_SetWindowLong($hWnd,$GWL_EXSTYLE,BitAND(_WinAPI_GetWindowLong($hWnd,$GWL_EXSTYLE),BitNOT($WS_EX_TRANSPARENT)))
    If @error Then Return SetError(2,0,0)
    EndIf
    Return 1
    EndFunc
    ;### UDF END

    [/autoit]

    Aber das funktionier ja auch noch ent so ganz

    THX im forraus

  • Problem mit Au3IrrLicht

    • Jam00
    • 8. April 2010 um 20:28

    Hi, ich hab mir die neuste Version von Au3IrrLicht geladen, aber es Funktioniert mit de rneune Version anscheinden nicht mehr, kommt immer der Fehler "Unknown function name" anscheindet werden dei Funcs aus der dll nicht emhr richtig eingebunden oder so, ist es möglich es für die neu version umzubauen?

  • Probleme mit dem Compilieren

    • Jam00
    • 8. April 2010 um 12:51
    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #RequireAdmin
    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\data\Desktop\specialpack.kxf
    TrayTip("Special Pack Installer", "© by LatroX", 20)
    #Region Koda
    $Form1 = GUICreate("Special Pack by LatroX", 500, 322, 192, 120)
    $Pic1 = GUICtrlCreatePic("zeo_orange.jpg", 340, 220, 136, 84, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    $Button1 = GUICtrlCreateButton("Special Pack 1", 40, 16, 85, 25, 0)
    $Button2 = GUICtrlCreateButton("Special Pack 2", 128, 16, 85, 25, 0)
    GUICtrlSetState($Button1, $GUI_Disable)
    $Button3 = GUICtrlCreateButton("Special Pack 3", 216, 16, 85, 25, 0)
    GUICtrlSetState($Button1, $GUI_Disable)
    $Button5 = GUICtrlCreateButton("Serials", 392, 16, 85, 25, 0)
    GUICtrlSetState($Button1, $GUI_Disable)
    $Button6 = GUICtrlCreateButton("Installieren", 392, 88, 65, 17, 0)
    $Button7 = GUICtrlCreateButton("Alle", 392, 120, 65, 17, 0)
    $Button8 = GUICtrlCreateButton("Keine", 392, 152, 65, 17, 0)
    $Button9 = GUICtrlCreateButton("Beenden", 392, 184, 65, 17, 0)
    $Checkbox1 = GUICtrlCreateCheckbox("Neustart", 392, 56, 65, 17)
    #region Special Pack 1
    $Checkbox2 = GUICtrlCreateCheckbox("Adobe Reader 9", 24, 56, 170, 17)

    [/autoit] [autoit][/autoit] [autoit]

    $Checkbox3 = GUICtrlCreateCheckbox("Picasa 3", 24, 88, 170, 17)

    [/autoit] [autoit][/autoit] [autoit]

    $Checkbox4 = GUICtrlCreateCheckbox("Open Office 3", 24, 120, 170, 17)

    [/autoit] [autoit][/autoit] [autoit]

    $Checkbox5 = GUICtrlCreateCheckbox("eDoc", 24, 152, 170, 17)

    [/autoit] [autoit][/autoit] [autoit]

    $Checkbox6 = GUICtrlCreateCheckbox("WinRAR", 24, 184, 170, 17)

    [/autoit] [autoit][/autoit] [autoit]

    #endregion Special Pack 1
    #region Special Pack 2
    $Checkbox7 = GUICtrlCreateCheckbox("Driver Genius 8", 24, 56, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox8 = GUICtrlCreateCheckbox("Nero 7", 24, 88, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox9 = GUICtrlCreateCheckbox("Nero 9 free", 24, 120, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox10 = GUICtrlCreateCheckbox("Avira AntiVir 10", 24, 152, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox11 = GUICtrlCreateCheckbox(".NET Framework 2.0", 24, 184, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox12 = GUICtrlCreateCheckbox(".NET Framework 3.5", 24, 216, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox13 = GUICtrlCreateCheckbox("Mozilla Firefox 3.6.2", 24, 248, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox14 = GUICtrlCreateCheckbox("IncrediMail 2", 24, 280, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox15 = GUICtrlCreateCheckbox("Internet Explorer 8 XP", 208, 56, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox16 = GUICtrlCreateCheckbox("TrayBackup", 208, 88, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox17 = GUICtrlCreateCheckbox("VLC Mediaplayer 1.0.5", 208, 120, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox18 = GUICtrlCreateCheckbox("DriverMax", 208, 152, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    #endregion Special Pack 2
    #region Special Pack 3
    $Checkbox19 = GUICtrlCreateCheckbox("Norman Security Suite 32bit", 24, 56, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox20 = GUICtrlCreateCheckbox("Norman Security Suite 64bit", 24, 88, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Checkbox21 = GUICtrlCreateCheckbox("SpyBot S&D", 24, 120, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    #endregion Special Pack 3
    #region Serials
    $Button66 = GUICtrlCreateButton("Driver Genius 8 Serial", 24, 56, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    $Button67 = GUICtrlCreateButton("DriverMax Zugangsdaten", 24, 88, 170, 17)
    GUICtrlSetState(-1, $GUI_Hide)
    #endregion Serials
    GUISetState(@SW_SHOW)
    #EndRegion Koda

    [/autoit] [autoit][/autoit] [autoit]

    $wert = 225
    WinSetTrans($Form1, "", $wert)

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlSetState($Button3, $GUI_Enable)
    GUICtrlSetState($Button1, $GUI_Disable)
    GUICtrlSetState($Button2, $GUI_Enable)
    GUICtrlSetState($Button5, $GUI_Enable)

    [/autoit] [autoit][/autoit] [autoit]

    For $i = $Checkbox2 To $Checkbox21
    GUICtrlSetState($i, $GUI_Hide)
    Next
    For $i1 = $Checkbox2 To $Checkbox6
    GUICtrlSetState($i1, $GUI_SHOW)
    Next
    For $i = $Button66 To $Button67
    GUICtrlSetState($i, $GUI_Hide)
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Case $Button2

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlSetState($Button3, $GUI_Enable)
    GUICtrlSetState($Button2, $GUI_Disable)
    GUICtrlSetState($Button1, $GUI_Enable)
    GUICtrlSetState($Button5, $GUI_Enable)

    [/autoit] [autoit][/autoit] [autoit]

    For $i = $Checkbox2 To $Checkbox21
    GUICtrlSetState($i, $GUI_Hide)
    Next
    For $i1 = $Checkbox7 To $Checkbox18
    GUICtrlSetState($i1, $GUI_SHOW)
    Next
    For $i = $Button66 To $Button67
    GUICtrlSetState($i, $GUI_Hide)
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Case $Button3

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlSetState($Button2, $GUI_Enable)
    GUICtrlSetState($Button3, $GUI_Disable)
    GUICtrlSetState($Button1, $GUI_Enable)
    GUICtrlSetState($Button5, $GUI_Enable)

    [/autoit] [autoit][/autoit] [autoit]

    For $i = $Checkbox2 To $Checkbox21
    GUICtrlSetState($i, $GUI_Hide)
    Next
    For $i1 = $Checkbox19 To $Checkbox21
    GUICtrlSetState($i1, $GUI_SHOW)
    Next
    For $i = $Button66 To $Button67
    GUICtrlSetState($i, $GUI_Hide)
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Case $Button5

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlSetState($Button2, $GUI_Enable)
    GUICtrlSetState($Button5, $GUI_Disable)
    GUICtrlSetState($Button1, $GUI_Enable)
    GUICtrlSetState($Button3, $GUI_Enable)

    [/autoit] [autoit][/autoit] [autoit]

    For $i = $Checkbox2 To $Checkbox21
    GUICtrlSetState($i, $GUI_Hide)
    Next
    For $i1 = $Button66 To $Button67
    GUICtrlSetState($i1, $GUI_SHOW)
    Next

    [/autoit] [autoit][/autoit] [autoit]

    Case $Button6

    [/autoit] [autoit][/autoit] [autoit]

    If GUICtrlRead($Checkbox2) = 1 Then RunWait("Special Pack 1\AdbeRdr930_de_DE.exe")
    If GUICtrlRead($Checkbox3) = 1 Then RunWait("Special Pack 1\Picasa3auto.exe")
    If GUICtrlRead($Checkbox4) = 1 Then RunWait("Special Pack 1\OpenOffice.org 3.2 (de) Installation Files\setup.exe")
    If GUICtrlRead($Checkbox5) = 1 Then RunWait("Special Pack 1\eDoc.exe")
    If GUICtrlRead($Checkbox6) = 1 Then RunWait("Special Pack 1\WinRAR\wrar391d.exe")
    If GUICtrlRead($Checkbox7) = 1 Then RunWait("Special Pack 2\Driver Genius\DriverGenius_8_DE_LP.exe")
    If GUICtrlRead($Checkbox8) = 1 Then RunWait("Special Pack 2\Nero 7\SetupX.exe")
    If GUICtrlRead($Checkbox9) = 1 Then RunWait("Special Pack 2\Nero-9.4.12.3_free.exe")
    If GUICtrlRead($Checkbox10) = 1 Then RunWait("Special Pack 2\avira_antivir_personal10_de.exe")
    If GUICtrlRead($Checkbox11) = 1 Then RunWait("Special Pack 2\dotnetfx2.exe")
    If GUICtrlRead($Checkbox12) = 1 Then RunWait("Special Pack 2\dotnetfx35.exe")
    If GUICtrlRead($Checkbox13) = 1 Then RunWait("Special Pack 2\Firefox Setup 3.6.2.exe")
    If GUICtrlRead($Checkbox14) = 1 Then RunWait("Special Pack 2\IncrediMailSetup_de.exe")
    If GUICtrlRead($Checkbox15) = 1 Then RunWait("Special Pack 2\IE8-WindowsXP-x86-DEU.exe")
    If GUICtrlRead($Checkbox16) = 1 Then RunWait("Special Pack 2\TrayBackup.exe")
    If GUICtrlRead($Checkbox17) = 1 Then RunWait("Special Pack 2\vlc-1.0.5-win32.exe")
    If GUICtrlRead($Checkbox18) = 1 Then RunWait("Special Pack 2\drivermax.exe")
    If GUICtrlRead($Checkbox19) = 1 Then RunWait("NormanSecuritySuite_710x86_DEU_R18.msi")
    If GUICtrlRead($Checkbox20) = 1 Then RunWait("NormanSecuritySuite_730x64_DEU_R04.msi")
    If GUICtrlRead($Checkbox21) = 1 Then RunWait("Special Pack 2\spybotsd162.exe")
    If GUICtrlRead($Checkbox1) = 1 Then Shutdown(2)

    [/autoit] [autoit][/autoit] [autoit]

    Case $Button66
    ShellExecute("Special Pack 2\Driver Genius\Serial.txt")

    [/autoit] [autoit][/autoit] [autoit]

    Case $Button67
    MsgBox(0,"DriverMax Zugangsdaten", "username: xxxxxxxxx"&@CRLF&"----------------------------------------"&@CRLF&"E-Mail: xxxxxxxx"&@CRLF&"----------------------------------------"&@CRLF&"password: xxxxxxx")

    [/autoit] [autoit][/autoit] [autoit]

    Case $Button7
    For $i = $Checkbox2 To $Checkbox21
    GUICtrlSetState($i, $GUI_Checked)
    Next
    Case $Button8
    For $i = $Checkbox1 To $Checkbox21
    GUICtrlSetState($i, $GUI_Unchecked)
    Next
    Case $Button9
    Exit
    EndSwitch
    WEnd

    [/autoit]


    Probier mal so, bei mir gings, ich ahbs mit VLC probiert

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™