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. blackdeath911

Beiträge von blackdeath911

  • Bilder in GUI verändern durch Combobox auswahl

    • blackdeath911
    • 26. Mai 2009 um 11:08

    Danke funktioniert super :)

    MFG: Blacky911

  • Bilder in GUI verändern durch Combobox auswahl

    • blackdeath911
    • 26. Mai 2009 um 00:03

    mag mir keiner helfen?

    bekomms nicht hin...

    Edit:

    wenn ich folgendes noch hinschreibe:

    [autoit]

    case $cb
    If GUICtrlRead($cb) = "Counterstrike 1.6" Then
    GUICtrlCreatePic ("C:\Users\Adminstrator\Desktop\cs2.gif", 10,9,55,55)
    EndIf
    If GUICtrlRead($cb) = "Counterstrike Source" Then
    GUICtrlCreatePic ("C:\Users\Adminstrator\Desktop\css.gif", 10,9,55,55)

    [/autoit]

    zeigt er die bilder an... jedoch beim zurückswitchen wechselt er nciht richtig und denke er legt die bilder einfach nur drüber statt sie zu ersetzen... wie mach ich das intelligenter?

    MFG: Blacky911

  • Bilder in GUI verändern durch Combobox auswahl

    • blackdeath911
    • 25. Mai 2009 um 17:07

    Hi ich starte mal den neuen thread :)

    das war meine frage:

    wenn man in einer Combobox ( hab mir z.B. ein script geschrieben wo ich per Combobox meine Games aussuche und mitm Button "Start Game" das spiel starte) wenn man da dann nur z.B. Counterstrike Source angegeben hat (ohne klick auf Run oder so) das daneben dann mit dem befehl "GUICtrlCreatePic" ein kleines Bild danebenmachen kann, und wenn man dann z.B. auf Warcraft 3 geht sich es automatisch ändert und dann auf Run Game drücken kann..

    geht das?
    If abfrage?
    If Combobox = Counterstrike Source then
    GuiCtrlCreatePic

    so in etwa geht das???
    MFG: Blacky911

    darauf in nem andern thread die antwort:
    Hallo @Blackdeath,

    mach einen eigenen Thread auf und lies die Forenregeln
    besonders diese Stelle:

    Zitat


    Zitat

    Folgende Inhalte sind nicht erwünscht oder gar komplett verboten. Das Team behält es sich ausdrücklich vor, die Umsetzung der Regeln je nach Schweregrad zu verwarnen, zu löschen oder gar komplett zu sperren.

    - Bots für Spiele jeglicher Art, insbesondere Onlinespiele und ganz besonders Silkroad Online sowie World of Warcraft


    Und das weiß ich auch... ich möchte nur einen Game-Starter mir selber bauen :) und keinen Bot der Ingame was amcht :)

    hier zurzeit mein Script:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    _Example("Spieleauswahl")
    Func _Example($sTitel)
    Local $msg
    GUICreate ($sTitel, 250, 100)
    $cb = GUICtrlCreateCombo("Counterstrike 1.6", 20, 10, 210, 30)
    GUICtrlSetData(-1, "Counterstrike Source|Warcraft 3 FT Online|Warcraft 3 FT 1.21|Warcraft 3 FT 1.20c|Madtracks|Worms Armageddon|Worms World Party|Armagetron", "Counterstrike 1.6")
    $ok = GUICtrlcreatebutton("Spiel Starten",85,60,90,27)
    GUISetState()

    While 1
    $msg = GUIGetMsg()

    Switch $msg

    case $ok
    If GUICtrlRead($cb) = "Counterstrike 1.6" Then
    sleep (10)
    ShellExecute ("steam.exe", "-applaunch 10","D:\LAN GAMES\Valve\Steam\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Counterstrike Source" Then
    sleep (10)
    ShellExecute ("steam.exe", "-applaunch 240 -console","D:\LAN GAMES\Valve\Steam\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Warcraft 3 FT Online" Then
    sleep (10)
    ShellExecute ("Frozen Throne.exe", "-windowed -window", "D:\LAN GAMES\WC3\Warcraft III\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Warcraft 3 FT 1.21" Then
    sleep (10)
    ShellExecute ("Frozen Throne.exe", "", "D:\LAN GAMES\WC3 1.21\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Warcraft 3 FT 1.20c" Then
    sleep (10)
    ShellExecute ("Frozen Throne.exe", "", "D:\LAN GAMES\WC3 1.20c\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Madtracks" Then
    sleep (10)
    ShellExecute ("MadTracks.exe", "", "D:\LAN GAMES\Mad Tracks\MadTracks\tracks\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Worms Armageddon" Then
    sleep (10)
    ShellExecute ("WA.exe", "", "D:\LAN GAMES\Worms Games\Worms Armageddon 1\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Worms World Party" Then
    sleep (10)
    ShellExecute ("wwp.exe", "", "D:\LAN GAMES\Worms Games\Worms world Party\")
    exit
    EndIf
    If GUICtrlRead($cb) = "Armagetron" Then
    sleep (10)
    ShellExecute ("armagetron.exe", "", "D:\LAN GAMES\Armagetron\Armagetron\")
    exit
    EndIf

    case $GUI_EVENT_CLOSE
    ExitLoop
    EndSwitch
    WEnd
    EndFunc

    [/autoit]

    Ich weiß wenn ich da nochn bildchen reinmachen will muss die GUI größer :)

    aber meine frage war ja..

    wenn ich jetzt vom Standart ausgewähltem CS 1.6 auf z.B. WC3 gehe das er das Icon von dem CS icon auf das WC3 Icon ändert :) ob und wie das geht :)

    MFG: Blacky911

  • in GUI bilder einfügen und verschieben

    • blackdeath911
    • 25. Mai 2009 um 13:51

    Mal ne ganz kurze zwischenfrage :)

    wenn man in einer Combobox ( hab mir z.B. ein script geschrieben wo ich per Combobox meine Games aussuche und mitm Button "Start Game" das spiel starte) wenn man da dann nur z.B. Counterstrike Source angegeben hat (ohne klick auf Run oder so) das daneben dann mit dem befehl "GUICtrlCreatePic" ein kleines Bild danebenmachen kann, und wenn man dann z.B. auf Warcraft 3 geht sich es automatisch ändert und dann auf Run Game drücken kann..

    geht das?
    If abfrage?
    If Combobox = Counterstrike Source then
    GuiCtrlCreatePic

    so in etwa geht das???
    MFG: Blacky911

  • Rapidshare Premium Info ( RPI )

    • blackdeath911
    • 23. Mai 2009 um 19:23

    verkaufe im moment noch einen 30 tage RS account siehe hier --> *klick*

    MFG: Blacky911

  • ComboBox - GUI

    • blackdeath911
    • 23. Mai 2009 um 16:44

    also das was ich da hab ist ja leicht verständlich nur das was ihr da habt versteh ich nciht...

    ich blicke da nicht durch... kanns mal einer kommentieren/erklären?

    MFG: Blacky911

  • Rapidshare Get points nachmachung

    • blackdeath911
    • 23. Mai 2009 um 15:18

    das wäre dann das was ich gesucht habe :)

    MFG: Blacky911

  • Rapidshare Get points nachmachung

    • blackdeath911
    • 23. Mai 2009 um 13:23

    das programm ist schonmal gut :) nur muss es jetzt nurnoch eine option haben das es die Punkteanzahl speichert... und diese dann in einer tabelle oder grafik abrufbar macht
    (auflistung in einer txt würde ja auch erstmal reichen)

    den im moment zeigt es ja nur den status des accounts... (so weit ich sehe)

    MFG: Blacky911

  • Rapidshare Get points nachmachung

    • blackdeath911
    • 23. Mai 2009 um 11:44

    Hallo an alle :)

    Ich wollte mich mal an ein ähnliches Programm wie "Rapidshare Get Points" machen...

    dieses war darauf ausgelegt die gesammelten punkte von der Premiumzone/collectorszone von https://autoit.de/www.rapidshare.com auszulesen :)

    so sah es in etwa aus:

    Spoiler anzeigen

    [Blockierte Grafik: http://i352.photobucket.com/albums/r350/ow…/RsGetPts23.jpg]


    Ich wollte jetzt nur die Funktion haben das er mir stündlich sagt wieviele punkte ich gemacht habe und diese speichert und für mich abrufbar sind oder sogar wie hier eine statistik erstellt ...

    Ich möchte es nachstellen da nach dem Update von Rapidshare der Premium/collectors zugänge dieses Programm nichtmer geupdatet wurde und somit schon länger ncihtmehr funktioniert...

    jetzt brauche ich unterstützung wie man das am besten macht bzw. ob es überhaupt noch möglich ist :)

    Info zu Rapidshare: der Login auf der seite wird per Cokie gespeichert und die "Rapidpoints" stehen etwas mittig als zahl dort in dem Format --> "RapidPoints: 9999999"

    MFG: Blacky911

  • Problem mit meiner ersten GUI

    • blackdeath911
    • 23. Mai 2009 um 11:27

    habs mal bissen angeschaut und erkannt.... die 2 GUI wird angezeigt... nur so schnell das du es nciht siehst da danach keine schleife kommt :)

    hier mal das funktionierende ... nur die größe des GUIs musst du anpassen da es ein bisschen zu voll ist :)

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    GUICreate("Fragen über Fragen", 300, 100)
    GUICtrlCreateLabel("Wie viel ist 1+1?", 10, 20, 100, 20)
    $Button1 = GUICtrlCreateButton("1", 30, 50, 50, 25)
    $Button2 = GUICtrlCreateButton("2", 100, 50, 50, 25)
    $Button3 = GUICtrlCreateButton("3", 170, 50, 50, 25)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    ExitLoop
    Case $msg = $Button1
    MsgBox(48, "ERROR", "Das war leider die falsche Antwort. Ihr System wird nun herunter gefahren.")
    Sleep(1000)
    Shutdown(1)
    ExitLoop
    Case $msg = $Button2
    MsgBox(64, "Richtig", "Gut, du hast also doch in Mathe aufgepasst")
    _frage2 ()
    ExitLoop
    Case $msg = $Button3
    MsgBox(48, "ERROR", "Das war leider die falsche Antwort. Ihr System wird nun herunter gefahren.")
    Sleep(1000)
    Shutdown(1)
    ExitLoop
    EndSelect
    WEnd

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

    ;ab hier wird nichts mehr angezeigt
    Func _frage2 ()
    GUICreate("Fragen über Fragen2", 300, 100)
    GUICtrlCreateLabel("Welches Wesen läuft am Morgen mit vier, am Mittag mit 2 und am Abend mit drei Beinen?", 10, 20, 100, 20)
    $Button4 = GUICtrlCreateButton("Hund", 30, 50, 50, 25)
    $Button5 = GUICtrlCreateButton("Vogel", 100, 50, 50, 25)
    $Button6 = GUICtrlCreateButton("Mensch", 170, 50, 50, 25)

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

    GUISetState(@SW_SHOW)

    While 1
    sleep (10)
    WEnd
    EndFunc

    [/autoit]

    MFG: Blacky911

  • ComboBox - GUI

    • blackdeath911
    • 23. Mai 2009 um 11:22

    so wie du es geschrieben hast steht direkt in der Combo Box

    Test 1|Test 2|Test 3

    aber ich kann nciht zwischen den jeweiligen wechseln

    habe es jetzt so gemacht und es funktioniert:

    [autoit]

    #include <GUIConstantsEx.au3>
    _Example("Combo GUI")
    Func _Example($sTitel)
    Local $msg
    GUICreate($sTitel)

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

    $cb = GUICtrlCreateCombo("item1", 10, 10, 100, 25)
    GUICtrlSetData(-1, "item2|item3", "item1")
    $ok = GUICtrlcreatebutton("OK",11,70,50,30)
    GUISetState()

    While 1
    $msg = GUIGetMsg()

    Switch $msg

    case $ok
    If GUICtrlRead($cb) = "item1" Then
    sleep (10)
    MsgBox (64, "test", "item 1 gedrückt")
    GUIDelete("My GUI combo")
    exit
    EndIf
    If GUICtrlRead($cb) = "item2" Then
    sleep (10)
    MsgBox (64, "test", "item 2 gedrückt")
    GUIDelete("My GUI combo")
    exit
    EndIf
    If GUICtrlRead($cb) = "item3" Then
    sleep (10)
    MsgBox (64, "test", "item 3 gedrückt")
    GUIDelete("My GUI combo")
    exit
    EndIf
    case $GUI_EVENT_CLOSE
    ExitLoop
    EndSwitch
    WEnd
    EndFunc

    [/autoit]

    MFG: Blacky911

  • ComboBox - GUI

    • blackdeath911
    • 23. Mai 2009 um 05:31

    also habe jetzt ein bissel was rumgeguckt und interessiere mich auch wie man was mit der Combo macht... ( bin neu )

    wie lese ich aus was ich angewählt habe? also in nem anderen script habe ich (bei Checkboxes) es so gemacht:

    [autoit]

    [...]
    $ok = GUICtrlcreatebutton("OK",11,70,50,30)
    GUISETState()
    While 1
    $msg = GUIGETMSG()
    IF $msg = -3 Then ; abfrage für den X button
    Exit
    EndIf
    ;IF für OK button
    If $msg = $ok Then
    If GUICtrlRead($1) = $GUI_CHECKED THen
    [...]
    EndIf
    EndIf
    [...]

    [/autoit]

    aber man kann´s ja nciht so machen da man vor das "GUICtrlCreateCombo" kein $1 machen kann... zumindestens macht er bei mir dann nur fehler...

    würde mich über informationen freuen wie ich es richtig mache...
    also ich möcht nur eine Combobox sozusagen test1,test2,test3, und wenn ich test 3 auswähle und OK klicke das er dann das bestimmte für test3 ausführt.. nur wie?

    MFG: Blacky911

  • Script hört einfach Auf???

    • blackdeath911
    • 21. Mai 2009 um 01:02

    Problem gelöst :)

    die ganze GUI bestand aus einer While schleife wo er nicht rauskam :)

    einfach den loop beendet und jetzt gehts :)

    MFG: Blacky911

  • Script hört einfach Auf???

    • blackdeath911
    • 21. Mai 2009 um 00:03
    [autoit]

    Func _rslinks()
    Sleep(50)
    WinActivate ("Mozilla Firefox")
    _FFConnect()
    _FFTabAdd ("https://ssl.rapidshare.com/cgi-bin/premiumzone.cgi?export=1")
    sleep (300)
    _FFLoadWait()
    Sleep(1000)
    ; winscp öffnen / auslesen / schließen
    _abfragebox ("Abfragebox")
    Sleep(1900)
    send ("{ENTER}")
    sleep (100)
    send ("{F10}")
    ; Firefox wieder öffnen und nach dem Release r00 namen im RS export suchen
    WinActivate ("Mozilla Firefox")
    Sleep(100)
    Send("^f")
    Sleep(200)
    Send("^f")
    Sleep(100)
    Send("^v")
    Sleep(1000)
    EndFunc

    [/autoit]


    Viel mehr war da nicht... und die abfragebox hab ich auch schon gepostet

  • Script hört einfach Auf???

    • blackdeath911
    • 20. Mai 2009 um 23:11

    nein das script is weiterhin an nur er bringt die funktion nicht zuende.....

    das exit ist nur für den button exit fals er gedrückt wird... das funktioniert auch... nur er stoppt nach dem korrektem ausführen der _abfragebox

    MFG: BLacky911

  • Script hört einfach Auf???

    • blackdeath911
    • 20. Mai 2009 um 23:03

    _FFsearch ist nicht so wirklich das was ich da brauche :D so gings bis jetzt prima eigentlich

    die abfragebox ist nur eine GUI -->

    [autoit]

    Func _abfragebox($sTitle)
    ;diese abfragebox macht soweit das sie RAR namen kopiert & Samples können geläscht werden
    GUICreate($sTitle, 250, 110)
    ;BUTTONS
    GUICtrlCreateLabel("Hier die", 120, 10)
    GUICtrlCreateLabel("gewünschten Optionen", 120, 30)
    GUICtrlCreateLabel("anklicken", 120, 50)
    $1 = GUICtrlCreateCheckbox("Sample löschen?", 10, 10)
    $2 = GUICtrlCreateCheckbox("2 CDs?", 11, 40)
    $ok = GUICtrlCreateButton("OK", 11, 70, 50, 30)
    $exit = GUICtrlCreateButton("Exit", 120, 70, 50, 30)
    GUISetState() ; GERBAUCHT damit GUI angezeigt wird
    While 1
    $msg = GUIGetMsg()
    If $msg = -3 Then ; abfrage für den X button
    Exit
    EndIf
    ;IF für OK button
    If $msg = $ok Then
    If GUICtrlRead($1) = $GUI_CHECKED Then
    _winscpddl()
    Send("{DOWN 2}")
    Sleep(350)
    Send("{ENTER}")
    Sleep(350)
    Send("sa")
    Send("{DEL}")
    Sleep(350)
    If WinActive("Bestätigung") Then
    Send("{ENTER}")
    Sleep(350)
    EndIf
    EndIf
    If GUICtrlRead($2) = $GUI_CHECKED Then
    _winscpddl()
    Send("{DOWN 2}")
    Sleep(350)
    Send("{ENTER}")
    Sleep(350)
    Send("cd")
    Send("{ENTER}")
    Sleep(450)
    Send("{DOWN 5}")
    Sleep(450)
    Send("{F2}")
    Sleep(350)
    Send("{LEFT}")
    Sleep(450)
    Send("+{LEFT 90}")
    Send("^c")
    Else
    _winscpddl()
    Send("{DOWN 5}")
    Sleep(400)
    Send("{F2}")
    Sleep(500)
    Send("^c")
    EndIf
    GUIDelete($sTitle)
    EndIf
    ;If für exit button
    If $msg = $exit Then
    Exit
    EndIf
    WEnd
    EndFunc

    [/autoit]

    was is daran falsch?

  • Script hört einfach Auf???

    • blackdeath911
    • 20. Mai 2009 um 22:57

    hey @ all...

    irgendwie hört mein script einfach auf...

    [autoit]

    Sleep(50)
    WinActivate ("Mozilla Firefox")
    _FFTabAdd ("https://ssl.rapidshare.com/cgi-bin/premiumzone.cgi?export=1")
    sleep (300)
    _FFLoadWait()
    Sleep(1000)
    ; winscp öffnen / auslesen / schließen
    _abfragebox ("test")
    Sleep(1900)
    send ("{ENTER}")
    sleep (100)
    send ("{F10}")
    ; Firefox wieder öffnen und nach dem Release r00 namen im RS export suchen
    WinActivate ("Mozilla Firefox")
    Sleep(100)
    Send("^f")
    Sleep(200)
    Send("^f")
    Sleep(100)
    Send("^v")
    Sleep(1000)

    [/autoit]

    ab der Funktion _abfragebox ("test") macht er irgendwie nicht weiter.... hab schon mit anderen commands dahinter probiert wie ALT F4 und so aber es geht auch nicht.... woran liegts?

    Zitat

    Edit: Und in anderen teilen des SCriptes funktioniert WinActivate ("Mozilla Firefox") auch nicht.... aber das fenster heißt so...
    warum macht er das auch nicht?

    MFG; Blacky911

  • GUi schließt sich nicht

    • blackdeath911
    • 19. Mai 2009 um 22:07

    bin ich dämlich beim Guidelete sollte man auch den richtigen GUI namen angeben :D

    ist alles gefixt...

    thx @ all :)

  • GUi schließt sich nicht

    • blackdeath911
    • 19. Mai 2009 um 22:04

    Variable used without beeing Declarated....

    fehlt dann da ein Include???

    MFG: Blacky911

  • GUi schließt sich nicht

    • blackdeath911
    • 19. Mai 2009 um 21:54

    Hey hab hier meinen Code:

    [autoit]

    #include <GUIConstants.au3>
    While 1
    HotKeySet ("+a", "_123")
    Wend
    Func _123 ()
    MsgBox (_abfragebox ("Abfrage"))
    EndFunc
    Func _abfragebox ($sTitle)
    GUICreate($sTitle,150,100)

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

    $1 = GUICtrlCreateCheckbox("Sample löschen?",10,10)
    $2 = GUICtrlcreateCheckbox("2 CDs?",10,40)
    $ok = GUICtrlcreatebutton("OK",10,70,50,30)
    $exit = GUICtrlcreatebutton("Exit",70,70,50,30)
    GUISETState()

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

    ;schleife die dauerhaft läuft
    While 1
    $msg = GUIGETMSG()
    IF $msg = -3 Then
    Exit ;dann schliesen
    EndIf
    If $msg = $ok Then
    If GUICtrlRead($1) = $GUI_CHECKED THen
    Msgbox(0,"","Sample soll gelöscht werden")
    Endif
    If GUICtrlREad($2) = $GUI_CHECKED Then
    MsgBox(0,"","2 Cds sind vorhanden")
    Endif
    EndIf
    If $msg = $exit Then
    Exit
    EndIf
    WEnd
    ;ende der schliesen abfrage
    ;ende der endlos schleife
    EndFunc

    [/autoit]


    doch wenn ich auf OK drücke bleibt die GUI offen... was muss ich noch reinbringen das sich das beim klick auf OK schließt???

    MFG: Blacky911

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™