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

Beiträge von akira2012

  • Schwierigkeiten mit der Listbox...

    • akira2012
    • 21. Februar 2008 um 15:53

    diese funktionen hab ich garnicht o_O

  • Schwierigkeiten mit der Listbox...

    • akira2012
    • 20. Februar 2008 um 21:23

    Ja das nutzt mir aber doch nichts - Das hat ja noch nichts mit den Zeiten zu tun. Das ist nur um die Themes alle einzulesen. Es geht sich ja um die Tatsache das in der Listbox nur die Dateinamen angezeigt werden und trotzdem durch ein auslesen dieser eine löschung in der ini möglich sein soll wo der Dateiname nur mit dem kompletten Pfad angegeben ist.

  • Schwierigkeiten mit der Listbox...

    • akira2012
    • 20. Februar 2008 um 17:15

    Hallo,

    ich habe das Problem das ich Dateinamen in einer Listbox und parallel in einer .ini speichern lasse. Damit die Listbox nicht mit den Pfaden zugespammt wird füge ich die Dateinamen mit _guictrllistbox_addfile hinzu. In der Ini wird natürlich der komplette Name mit Pfad gespeichert.
    Das klappt alles wunderbar bis ich eine löschfunktion geschrieben habe die beides löschen sollte (eintrag in Listbox und ini-File. Der Eintrag sollte gelöscht werden wenn man einen Namen anklickt in der Box und dann den "lösch-Button" drückt. Nunja den Eintrag aus der Listbox zu bekommen ist kein Problem aber aus dem ini-File.....

    Das Problem ist das guictrlread(listbox) nur den Namen der Datei wie sie dort steht übermittelt und nicht mehr den kompletten Pfad. Darum klappt es auch nicht wenn ich versuche einfach das ergebnis aus der ini zu löschen.

    Meine Frage: Wie bekomme ich die Einträge aus dem ini-File (als sections gespeichert) heraus UND behalte trotzdem NUR die Dateinamen in der Box. Ich habe wirklich schon alles mögliche ausprobiert und bin ratlos :(

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

    AutoIt Version: 3.2.10.0
    Author: Marko H.

    Script Function: Dieses Programm wechselst automatisch zwischen verschiedenen Designs von WindowsXP


    #ce ----------------------------------------------------------------------------

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

    #include
    #include
    #include
    #include
    #include
    #Include
    #include
    #include

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

    Global $themes, $test = 0, $confirmation = 0, $what_now = 0, $liste, $time_now, $timesave, $time_to_save, $x, $top, $timefield[10], $themefield[10], $y

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

    Opt("GUIOnEventMode", 1)

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

    $data = @ScriptDir & "\Data\themes.ini"
    $data2 = @ScriptDir & "\Data\time.ini"

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

    $hauptgui = GUICreate("Designswitcher 2008", 300, 300)
    GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "SpecialEvents")
    GUISetOnEvent($GUI_EVENT_RESTORE, "SpecialEvents")
    $tab = GUICtrlCreateTab(1, 1, 600, 600)

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

    $tab1 = GUICtrlCreateTabItem("settings")
    $durchsuchen = GUICtrlCreateButton("durchsuchen...", "30", "100", "90", "25")
    GUICtrlSetOnEvent($durchsuchen, "durchsuchen")
    $delete = GUICtrlCreateButton("loeschen", "130", "100", "90", "25")
    GUICtrlSetOnEvent(-1, "loeschen")
    $auflistung = GUICtrlCreateList("", "30", "150", "220", "100")
    $themes = IniReadSectionNames($data)
    If @error = 0 Then
    For $i = 1 To $themes[0]
    _GUICtrlListBox_AddString ($auflistung, $themes[$i])
    Next
    Else
    $themes = "X"
    EndIf

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

    $tab2 = GUICtrlCreateTabItem("zeit")
    $number_of_timefields = GUICtrlCreateInput("1", 30, 50, 30, 25, $ES_NUMBER)
    GUICtrlCreateUpdown($number_of_timefields)
    $create_timefields = GUICtrlCreateButton("Zeitfelder erstellen", 90, 50, 100, 25)
    GUICtrlSetOnEvent($create_timefields, "timefields")

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

    $tab = GUICtrlCreateTabItem("start")
    $start = GUICtrlCreateButton("start", 50, 30)
    GUICtrlSetOnEvent($start, "start")

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

    GUISetState()

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

    While 1
    Sleep(1000)
    WEnd

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

    Func test()

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

    EndFunc ;==>test

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

    Func timefields()
    GUICtrlSetState($tab2, $GUI_show)
    FileOpen($data2, 2)
    GUISwitch($hauptgui, $tab2)
    $top = 100
    Global $x = GUICtrlRead($number_of_timefields)
    $themes = IniReadSectionNames($data)
    Switch $x
    Case 1 To 9
    For $i = 1 To $x
    $timefield[$i] = GUICtrlCreateDate("", 30, $top, 100, 25, $DTS_TIMEFORMAT)
    $themefield[$i] = GUICtrlCreateCombo(" Theme wählen...", 150, $top, 100, 25)
    For $s = 1 To $themes[0]
    GUICtrlSetData($themefield[$i], $themes[$s])
    ;MsgBox(0, "", $themes[$s])
    Next

    $top = $top + 30
    Next
    Case 10 To 255555555555555
    MsgBox(0, "Achtung!!", "Bitte wähle eine Zahl zwischen 1 und 9 um das Fenster nicht zu sprengen." & @LF & "Wenn du mehr Designs wählen willst solltest du nochmal mit den Programmierer sprechen!")
    Case Else
    MsgBox(0, "Achtung!!", "Schonmal versucht ein negatives Feld zu erstellen? DAS GEHT NICHT!!!")
    EndSwitch
    GUICtrlSetState($create_timefields, $gui_disable)
    GUICtrlSetState($number_of_timefields, $gui_disable)
    $timesave = GUICtrlCreateButton("Zeiten und Themes übernehmen", 300, $top)
    GUICtrlSetOnEvent($timesave, "timesave")
    FileClose($data2)
    GUICtrlCreateTabItem("")

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

    EndFunc ;==>timefields

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

    Func start()
    $y = "25:25:25"
    Global $time_ini = IniReadSectionNames($data2)
    Do
    $time_now = @HOUR & ":" & @MIN & ":" & @SEC
    For $i = 1 To $time_ini[0]
    If $time_now = $time_ini[$i] Then themechange_theme()
    Global $y = $time_ini[$i]
    Next
    Sleep(100)
    Until $y = $time_now
    EndFunc ;==>start

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

    Func timesave()

    For $i = 1 To $x
    $time_to_save = GUICtrlRead($timefield[$i])
    $theme_to_save = GUICtrlRead($themefield[$i])
    IniWrite($data2, $time_to_save, $theme_to_save, $x)
    Next


    EndFunc ;==>timesave

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

    Func themechange_theme()
    $theme = IniReadSection($data2, $y)
    If @error = 0 Then
    ShellExecute($theme[1][0])
    EndIf

    EndFunc ;==>themechange_theme

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

    Func SpecialEvents()

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

    Select
    Case @GUI_CtrlId = $GUI_EVENT_CLOSE
    Exit

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

    Case @GUI_CtrlId = $GUI_EVENT_MINIMIZE

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

    Case @GUI_CtrlId = $GUI_EVENT_RESTORE
    EndSelect

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

    EndFunc ;==>SpecialEvents

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

    Func loeschen()
    $themes_delete=IniReadSectionNames($data)
    $listitem = GUICtrlRead($auflistung)
    $nummer = _GUICtrlListBox_FindString ($auflistung, $listitem)
    _GUICtrlListBox_DeleteString ($auflistung, $nummer)
    IniDelete($data, $listitem)
    EndFunc ;==>loeschen

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

    Func durchsuchen()
    $themes = IniReadSectionNames($data)
    _ArrayDisplay($themes)

    $files_chose_theme = FileOpenDialog("Wählen Sie ein Design aus", "C:\", "Windwos Themes(*.msstyles)", 1)
    If Not $files_chose_theme = "" Then
    $confirmation = MsgBox(0x4, "Echt jetzt?", "Willst du diese Theme (" & $files_chose_theme & ") wirklich übernehmen?")
    If $confirmation = 6 Then
    If Not $themes = "X" Then
    For $i = 1 To $themes[0]
    If $themes[$i] = $files_chose_theme Then
    MsgBox(0, "Pustekuchen", "Dieses Theme wurde bereits hinzugefügt!")
    $test = 1
    EndIf
    Next
    EndIf
    If $test <> 1 Then
    _GUICtrlListBox_AddString ($auflistung, $files_chose_theme)
    IniWriteSection($data, $files_chose_theme, "1")
    Else
    _insert()
    EndIf
    Else
    _insert()

    EndIf
    EndIf
    EndFunc ;==>durchsuchen

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

    Func _insert()
    Do

    $test = 0
    $what_now = MsgBox(0x4, "Was nun?", "Willst du eine anderes Theme wählen?")
    If $what_now = 6 Then
    $files_chose_theme = FileOpenDialog("Wählen Sie ein Design aus", "C:\", "Windwos Themes(*.msstyles)", 1)
    If Not $files_chose_theme = "" Then
    $confirmation = MsgBox(0x4, "Echt jetzt?", "Willst du diese Theme (" & $files_chose_theme & ") wirklich übernehmen?")
    If $confirmation = 6 Then
    If Not $themes = "X" Then
    For $i = 1 To $themes[0]
    If $themes[$i] = $files_chose_theme Then
    MsgBox(0, "Pustekuchen", "Dieses Theme wurde bereits hinzugefügt!")
    $confirmation = 7
    $test = 1
    EndIf
    Next
    EndIf
    If $test <> 1 Then
    _GUICtrlListBox_AddString ($auflistung, $files_chose_theme)
    IniWriteSection($data, $files_chose_theme, "1")
    EndIf
    EndIf

    EndIf
    EndIf
    Until $confirmation = 6 Or $what_now = 7
    EndFunc ;==>_insert

    [/autoit]


    </GuiTab.au3></GuiConstantsEx.au3></GuiDateTimePicker.au3></File.au3></guilistbox.au3></guilistview.au3></Date.au3></GuiConstants.au3>

  • Problem mit Tab items

    • akira2012
    • 17. Februar 2008 um 19:35

    danke und *dooooh* Die einfachsten sachen sieht man immer nicht... naja ich werds mir merken. Das guiswitch war auf jedenfall ein sehr guter hinweis!

    Danke nochmal


    EDIT: Mir ist grad noch was aufgefallen! Ich habe bemerkt das keine Daten mehr übernommen werden im "themefield" Wodran kann das liegen?

  • Problem mit Tab items

    • akira2012
    • 17. Februar 2008 um 19:07

    versteh ich nicht wieso der wichtig ist aber gut ^^

    [autoit]

    #cs ----------------------------------------------------------------------------

    AutoIt Version: 3.2.10.0
    Author: Marko H.

    Script Function: Dieses Programm wechselst automatisch zwischen verschiedenen Designs von WindowsXP


    #ce ----------------------------------------------------------------------------

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

    #include
    #include
    #include
    #include
    #include
    #Include
    #include
    #include

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

    Global $themes, $test = 0, $confirmation = 0, $what_now = 0, $liste, $time_now, $timesave, $time_to_save, $x, $top, $timefield[10], $themefield[10], $y

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

    Opt("GUIOnEventMode", 1)

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

    $data = @ScriptDir & "\Data\themes.ini"
    $data2 = @ScriptDir & "\Data\time.ini"

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

    $hauptgui = GUICreate("Designswitcher 2008", 300, 300)
    GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents")
    GUISetOnEvent($GUI_EVENT_MINIMIZE, "SpecialEvents")
    GUISetOnEvent($GUI_EVENT_RESTORE, "SpecialEvents")
    $tab=GUICtrlCreateTab(1, 1, 600, 600)

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

    $tab1=GUICtrlCreateTabItem("settings")
    $durchsuchen = GUICtrlCreateButton("durchsuchen...", "30", "100", "90", "25")
    GUICtrlSetOnEvent($durchsuchen, "durchsuchen")
    $delete = GUICtrlCreateButton("loeschen", "130", "100", "90", "25")
    GUICtrlSetOnEvent(-1, "loeschen")
    $auflistung = GUICtrlCreateList("", "30", "150", "220", "100")
    $themes = IniReadSectionNames($data)
    If @error = 0 Then
    For $i = 1 To $themes[0]
    _GUICtrlListBox_Addfile ($auflistung, $themes[$i])
    Next
    Else
    $themes = "X"
    EndIf

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

    $tab2=GUICtrlCreateTabItem("zeit")
    $number_of_timefields = GUICtrlCreateInput("1", 30, 50, 30, 25, $ES_NUMBER)
    GUICtrlCreateUpdown($number_of_timefields)
    $create_timefields = GUICtrlCreateButton("Zeitfelder erstellen", 90, 50, 100, 25)
    GUICtrlSetOnEvent($create_timefields, "timefields")

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

    $tab=GUICtrlCreateTabItem("start")
    $start = GUICtrlCreateButton("start", 50, 300)
    GUICtrlSetOnEvent($start, "start")

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

    GUISetState()

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

    While 1
    Sleep(1000)
    WEnd

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

    func test()

    EndFunc

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

    Func timefields ()
    GUICtrlSetState($tab2, $GUI_show)
    FileOpen($data2, 2)
    $top = 100
    Global $x = GUICtrlRead($number_of_timefields)
    $themes = IniReadSectionNames($data)
    Switch $x
    Case 1 To 9
    For $i = 1 To $x
    $timefield[$i] = GUICtrlCreateDate("", 300, $top, 100, 25, $DTS_TIMEFORMAT)
    $themefield[$i] = GUICtrlCreateCombo(" Theme wählen...", 410, $top, 100, 25)
    For $s = 1 To $themes[0]
    GUICtrlSetData(-1, $themes[$s])

    Next

    $top = $top + 30
    Next
    Case 10 To 255555555555555
    MsgBox(0, "Achtung!!", "Bitte wähle eine Zahl zwischen 1 und 9 um das Fenster nicht zu sprengen." & @LF & "Wenn du mehr Designs wählen willst solltest du nochmal mit den Programmierer sprechen!")
    Case Else
    MsgBox(0, "Achtung!!", "Schonmal versucht ein negatives Feld zu erstellen? DAS GEHT NICHT!!!")
    EndSwitch
    GUICtrlSetState($create_timefields, $gui_disable)
    GUICtrlSetState($number_of_timefields, $gui_disable)
    $timesave = GUICtrlCreateButton("Zeiten und Themes übernehmen", 300, $top)
    GUICtrlSetOnEvent($timesave, "timesave")
    FileClose($data2)

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

    EndFunc ;==>timefields

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

    Func start ()
    $y = "25:25:25"
    Global $time_ini = IniReadSectionNames($data2)
    Do
    $time_now = @HOUR & ":" & @MIN & ":" & @SEC
    For $i = 1 To $time_ini[0]
    If $time_now = $time_ini[$i] Then themechange_theme ()
    Global $y = $time_ini[$i]
    Next
    Sleep(100)
    Until $y = $time_now
    EndFunc ;==>start

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

    Func timesave ()

    For $i = 1 To $x
    $time_to_save = GUICtrlRead($timefield[$i])
    $theme_to_save = GUICtrlRead($themefield[$i])
    IniWrite($data2, $time_to_save, $theme_to_save, $x)
    Next


    EndFunc ;==>timesave

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

    Func themechange_theme ()
    $theme = IniReadSection($data2, $y)
    If @error = 0 Then
    ShellExecute($theme[1][0])
    EndIf

    EndFunc ;==>themechange_theme

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

    Func SpecialEvents ()

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

    Select
    Case @GUI_CtrlId = $GUI_EVENT_CLOSE
    Exit

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

    Case @GUI_CtrlId = $GUI_EVENT_MINIMIZE

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

    Case @GUI_CtrlId = $GUI_EVENT_RESTORE
    EndSelect

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

    EndFunc ;==>SpecialEvents

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

    Func loeschen ()
    $listitem = GUICtrlRead($auflistung)
    $nummer = _GUICtrlListBox_FindString ($auflistung, $listitem)
    _GUICtrlListBox_DeleteString ($auflistung, $nummer)
    IniDelete($data, $listitem)
    EndFunc ;==>loeschen

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

    Func durchsuchen ()
    $themes = IniReadSectionNames($data)
    $files_chose_theme = FileOpenDialog("Wählen Sie ein Design aus", "C:\", "Windwos Themes(*.msstyles)", 1)
    $confirmation = MsgBox(0x4, "Echt jetzt?", "Willst du diese Theme (" & $files_chose_theme & ") wirklich überconfirmation?")
    If $confirmation = 6 Then
    If Not $themes = "X" Then
    For $i = 1 To $themes[0]
    If $themes[$i] = $files_chose_theme Then
    MsgBox(0, "Pustekuchen", "Dieses Theme wurde bereits hinzugefügt!")
    $test = 1
    EndIf
    Next
    EndIf
    If $test <> 1 Then
    _GUICtrlListBox_Addfile ($auflistung, $files_chose_theme)
    IniWriteSection($data, $files_chose_theme, "1")
    Else
    _insert ()
    EndIf
    Else
    _insert ()

    EndIf

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

    EndFunc ;==>durchsuchen

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

    Func _insert ()
    Do

    $test = 0
    $what_now = MsgBox(0x4, "Was nun?", "Willst du eine anderes Theme wählen?")
    If $what_now = 6 Then
    $files_chose_theme = FileOpenDialog("Wählen Sie ein Design aus", "C:\", "Windwos Themes(*.msstyles)", 1)
    $confirmation = MsgBox(0x4, "Echt jetzt?", "Willst du diese Theme (" & $files_chose_theme & ") wirklich überconfirmation?")
    If $confirmation = 6 Then
    If Not $themes = "X" Then
    For $i = 1 To $themes[0]
    If $themes[$i] = $files_chose_theme Then
    MsgBox(0, "Pustekuchen", "Dieses Theme wurde bereits hinzugefügt!")
    $confirmation = 7
    $test = 1
    EndIf
    Next
    EndIf
    If $test <> 1 Then
    _GUICtrlListBox_Addfile ($auflistung, $files_chose_theme)
    IniWriteSection($data, $files_chose_theme, "1")
    EndIf
    EndIf

    EndIf

    Until $confirmation = 6 Or $what_now = 7
    EndFunc ;==>_insert

    [/autoit]


    </GuiTab.au3></GuiConstantsEx.au3></GuiDateTimePicker.au3></File.au3></guilistbox.au3></guilistview.au3></Date.au3></GuiConstants.au3>


    Es geht sich um den Reiter Zeit. Dort werden nicht die Felder erstellt.

  • Problem mit Tab items

    • akira2012
    • 17. Februar 2008 um 01:07

    So gleiches Thema neues Problem - habe oben editiert und brauche hüüülfe ^^

  • Problem mit Tab items

    • akira2012
    • 17. Februar 2008 um 00:18

    Hallo,

    Problem doch nicht gelöst ^^

    Also das mit den Tabs funktioniert ganz gut aber wenn ich in einem Reiter bin und dann dort eine Funktion ausführe die neue Buttons oder edits erstellen soll dann werden diese nicht angezeigt!! habe schon versucht mit guictrlsetstate was dran zu ändern aber nutzt nichts... NEED HELP

    MfG

  • Serversay-Tool für Gameserver!??!?

    • akira2012
    • 4. Februar 2008 um 22:43

    Ja ich meine halt wie in HLSW einen Serverbefehl zu senden halt nur ohne hlsw. Naja das Programm einfach zu starten und mein Ziel durch Mausklicks zu erreichen ginge natürlich ist aber nur suboptimal würde ich sagen.
    Per TCP denke ich auch aber ich weiß nicht wie der befehl aussehen soll der gesendet wird. Immerhin muß das rcon passwort ja mit gesendet werden und dann der befehl. Also 3 große ??? ^^

    Wer eine idee hat immer her damit.

  • Serversay-Tool für Gameserver!??!?

    • akira2012
    • 31. Januar 2008 um 13:01

    Keiner eine Idee? o_O

  • Serversay-Tool für Gameserver!??!?

    • akira2012
    • 26. Januar 2008 um 21:16

    Hallo alle miteinander,

    ich wollte nur mal fragen ob jemand weiß ob eine Möglichkeit besteht mit AutoIt ein tool zu schreiben, mit dem man eine Nachricht via svsay (funzt bei JKA-Servern) unter Nutzung des rcon-passwortes, senden kann.

    Hoffe das hat jetzt auch einer verstanden ^^


    MfG

    akira2012


    P.S. Sorry ich glaub das ist TEILWEISE das falsche Forum -.-

  • jetzt aber wirklich

    • akira2012
    • 31. Oktober 2007 um 20:41
    Zitat

    Also der Einzige der hier jemand anderen beleidigt bist wohl du.
    Genauso trittst du hier als Einziger vollkommen kindisch auf...
    Und achja: Ich lass mir sowas nur von Personen bieten, die der deutschen Sprache mächtig sind und keine großen Grammatikfehler in ihre Sätze bauen.

    Von daher: Wenn es dir Spaß macht andere zu beleidigen: Ab innen Kindergarten, da sind die Leute wenigstens zum Großteil mit dir auf einer Niveaustufe

    "innen Kindergarten"? Einwandfreie Grammatik! ;)

    Ich möchte mich bei euch entschuldigen das war wirklich nicht in Ordnung. Weiß auch nicht was mich da geritten hat aber ich wollte anfangs einfach nur nen blöden Scherz machen und das ganze ist einfach aus dem Ruder gelaufen. Ich hab mich nur über die aggressive Antwort von DJB aufgeregt und überreagiert. Trotz alledem ist das natürlich keine Rechtfertigung. Ich hoffe Ihr könnt die Sache wieder vergessen und nehmt meine Entschuldigung an. Ich freue mich schon hoffentlich bald wieder was von eurem Pokerspiel zu hören.

    P.S. Mein "Pokerspiel oder was das sein sollte" ist auf Eis gelegt, da ich leider wegen meiner Arbeit im Moment nicht zum Programmieren komme. Ich weiß nichtmal welche Version von AutoIT grad aktuell ist.

    P.P.S: Für die 1000 Grammatikfehler kann ich nichts ich tippe die Antworten mit 100 zeichen pro Sekunde, da ist keine Zeit für ne Grammatikprüfung ^^.


    MfG

    akira2012

  • jetzt aber wirklich

    • akira2012
    • 29. Oktober 2007 um 19:52

    Angriff ist die beste Verteidigung was?
    Naja wenn dir intelligenten Menschen auch noch aufgefallen wäre das ich die letzten Monate nicht auf dieser Seite war.

    Naja wenigstens bin ich nicht beleidigend geworden aber was soll man von solch kleinen Kindern wie dich und deinen Kumpel schon erwarten.

    Trotzdem wird das Game von euch vor der nächsten Jahrtausendwende nicht fertig - aber Hauptsache Ihr habt mal das Maul aufgerissen. Also gl & hf auch weiterhin beim nichtstun.


    ,,I,,
    Verwarnung GtaSpider: [29.10.2007 21:23]
    Sowas ist echt eine Unverschämtheit. Du kannst gerne deine Meinung frei äußern, aber bitte in einem anderen Ton.
    Bleibt bei einer Verwarnung, aber ich hoffe, dass das nicht nochmal vorkommt.

  • jetzt aber wirklich

    • akira2012
    • 28. Oktober 2007 um 00:40

    Lol. Hmm ich warte ja sehnsüchtig auf den Threat. NOOB-Hold'em JETZT ABER WIRKLICH ECHT DIE 3. ACTION!
    Nehmts mir nicht übel aber als ich das letzte mal hier war vor Monaten wart ihr glaub ich genauso weit.... xD

    Kennt ihr Michael Ende? xD

    MfG

    akira2012

  • Warrock aim bot

    • akira2012
    • 28. August 2007 um 02:26

    würde sich einer von den admins erbarmen dieses thema zu schließen und nie wieder ans tageslicht zu lassen? Ich kann diese ewigen Diskussionen nicht mehr hören. Das ist doch alles Kinderkacke ob aimbot oder nicht. Ich dachte hier gehts ums programmieren - also entweder helft ihr ihm oder lasst es ganz sein.


    MfG

    akira2012


    EDIT BugFix:

    Ich sehe keinen zwingenden Grund zum Eingriff (auch wenn ich das Thema persönlich nicht besonders toll finde).
    Ich möchte nur alle Beteiligten bitten, sich auf das Sachliche zu beschränken und emotionale 'Entgleisungen' außen vorzulassen.
    Keinerlei Antwort wäre eine viel deutlichere Mißachtung des Projekts als der etwas wilde verbale Schlagabtausch.
    :mod:

  • GUI - Musik - Lautstärke!

    • akira2012
    • 11. August 2007 um 18:12
    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.2.4.9
    Author: myName

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

    Script Function:
    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here
    #NoTrayIcon
    #include <Date.au3>
    #include <GUIConstants.au3>
    #include <Sound.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Player", 636, 124, 197, 126, BitOR($WS_CAPTION,$WS_BORDER,$WS_CLIPSIBLINGS))
    $Button1 = GUICtrlCreateButton("RePlay", 368, 20, 65, 33, 0)
    $Pausebutton = GUICtrlCreateButton("&Pause", 432, 20, 65, 33, 0)
    $Button3 = GUICtrlCreateButton("&Next", 496, 20, 65, 33, 0)
    $Button4 = GUICtrlCreateButton("&Open", 560, 20, 65, 33, 0)
    $Button5 = GUICtrlCreateButton("EXIT", 24, 20, 41, 25, 0)
    $Volume = GUICtrlCreateSlider(0, 100, 640, 25)
    GUICtrlSetData(-1, 50)
    GUISetCursor (3)
    GUISetBkColor(0x000000)

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

    $Input1 = GUICtrlCreateInput("Notizen:", 88, 16, 249, 57)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1 ;
    Dim $re = 0 ; Das hier ist ein so blöder Fehler
    ;das man merkt das du einfach nicht weißt was du tust und NICHTS
    ;selber versucht hast. Ich übersetze mal für dich was du da stehen
    ;hast: $re=0 Wenn $re = 1 ist DANN _soundplay(1). Allein bis dahin ist
    ;es so ein blöder 'Fehler... Sry aber ich schließe mich Bugfix an. Les die
    ;Links durch die ich dir weiter oben genannt habe anpnsten hat es
    ;keinen Sinn und ich helfe auczh nicht weiter!
    IF $re = 1 Then
    SoundPlay($re)
    Else
    If $re = 0 Then
    MsgBox(64, "Error", "Keine Datei geöffnet!")
    EndIf
    EndIf

    Case $Pausebutton ;|
    Dim $Pause = 0 ;|
    If $pause = 1 Then ;|
    _SoundResume($re) ;|
    $pause = 0 ;| ; und das hier habe ich doch genau nach seiner Beschreibung gemacht ..! ?
    Else ;|
    _SoundPause($re) ;|
    $pause = 1 ;|
    EndIf ;|
    Case $Button4
    $re = FileOpenDialog('','','Mp3-Files (*.mp3;*.wav)', 1)
    If @error = 2 Then
    MsgBox(0, "Error", "The file does not exist")
    Exit
    ElseIf @error = 3 Then
    MsgBox(0, "Error", "The alias was invalid")
    Exit
    ElseIf @extended <> 0 Then
    $extended = @extended
    $errorstring = DllCall("winmm.dll","int","mciGetErrorStringA","str",$extended,"str","","int",65534,"hwnd",0)
    MsgBox(0, "Error", "The open failed." & @CRLF & "Error Number: " & $extended & @CRLF & "Error Description: " & $errorstring[2] & @CRLF & "Please Note: The sound may still play correctly.")
    Else
    MsgBox(0, "Success", "The file opened successfully")
    EndIf

    Case $Volume
    SoundSetWaveVolume(100)
    Case $Button5
    WinClose("Player")
    MsgBox(0,'',"The time is:" & _NowTime())
    EndSwitch
    SoundSetWaveVolume(GUICtrlRead($Volume))
    WEnd

    [/autoit]
  • GUI - Musik - Lautstärke!

    • akira2012
    • 11. August 2007 um 13:18

    Wie alt bist du eigentlich? o_O Nur so aus reinem interesse. Es scheint als würdest du einfach nicht verstehn was Bugfix von dir will. Natürlich kannst du immer irgendwas hinschreiben und dann fragen "SO?" Aber nach dem 1000 mal wird das echt nervig.
    Wenn du eine Aufgabe haben willst dann klicke hier links auf AutoIT Tutorial und AutoIT Doku - die Links sind beide erstklassig zum erlenen von den AutoIT Grundfunktionen. Na klar könnte jeder von uns dir das Skript innerhalb von 5 min grade biegen aber dann wärs nicht mehr deins...


    MfG

    akira2012

    EDIT: Da du ja kein Englisch kannst. https://autoit.de/www.leo.org ist ein Online Wörterbuch zum üersetzen. Und "Variable used without beeing declared" heißt soviel wie das du eine Variable benutzt hast bevor du ihr einen Wert zugewiesen hast. (das war eine Gratisübersetzung alle weiteren kosten Kohle :P )

  • GUI - Musik - Lautstärke!

    • akira2012
    • 10. August 2007 um 20:38
    Spoiler anzeigen
    [autoit]

    #NoTrayIcon
    #include <GUIConstants.au3>
    #include <Sound.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Player", 633, 226, 193, 115, BitOR($WS_CAPTION,$WS_BORDER,$WS_CLIPSIBLINGS))
    $Button1 = GUICtrlCreateButton("Replay", 368, 152, 65, 33, 0)
    $Pausebutton = GUICtrlCreateButton("&Pause", 432, 152, 65, 33, 0)
    $Button3 = GUICtrlCreateButton("&Next", 496, 152, 65, 33, 0)
    $Button4 = GUICtrlCreateButton("&Open", 560, 152, 65, 33, 0)
    $Button5 = GUICtrlCreateButton("EXIT", 24, 160, 41, 25, 0)
    $Volume = GUICtrlCreateSlider(0, 192, 625, 25)
    GUICtrlSetData(-1, 50)
    GUICtrlSetCursor($Volume, 5)
    $List1 = GUICtrlCreateList("Halllo Du Da !", 0, 0, 625, 149)
    $Checkbox2 = GUICtrlCreateCheckbox("Repeat All!", 104, 160, 73, 17)
    $Checkbox3 = GUICtrlCreateCheckbox("Repeat ", 200, 160, 57, 17)
    $Input1 = GUICtrlCreateInput("0", 280, 160, 17, 21)
    $Label1 = GUICtrlCreateLabel("ALabel1", 376, 152, 43, 17)
    $Label2 = GUICtrlCreateLabel("Times", 304, 160, 42, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    ;hier muß die IF abfrage beginnen (wenn pause schon gedrückt ($pause=1 oder so)
    ;dann wieder abspielen und $pause = 0 setzen
    ; wenns nicht so ist dann pause machen und $pause = 1 setzen
    SoundPlay($re)
    case $Pausebutton
    _SoundPause($re)
    Dim $Pause = 0

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

    Case $Button4
    $re = FileOpenDialog('','','Mp3-Files (*.mp3;*.wav)')
    SoundPlay($re) ; das hier macht absolout keinen sinn. Wenn du den
    Case $Button3 ;Open Button nimmst um an das MP3 zu kommen und $re = FileFindNextFile("start.wav") ;dann das wieder zunichte machst

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

    SoundPlay($re)
    Case $Volume
    SoundSetWaveVolume(1)
    Case $Button5
    WinClose("Player")

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

    EndSwitch
    SoundSetWaveVolume(GUICtrlRead($Volume))
    WEnd

    [/autoit]
  • GUI - Musik - Lautstärke!

    • akira2012
    • 10. August 2007 um 19:12

    du hast den Pause Button doch garnicht eingebaut wie soll er denn dann funzen? -.-
    Du musst ihn erstmal in die $msg schleife reinbaun und dir überlegen was passieren soll wenn du "pause" drückst (in dem fall also _soundpause) aber NUR wenn die Pause nicht schon aktiv ist und dafür war denke ich auch Bugfix variable gedacht. sozusagen als AN und AUS schalter....


    MfG

    akira2012

  • MsgBox - Maus

    • akira2012
    • 9. August 2007 um 21:35

    nein - mega meint den AUTOIT Code - der der in Scite steht ...

  • Jetzt kommt GUI

    • akira2012
    • 5. August 2007 um 08:55

    ich hatte mal 2 wasserschildkröten. Also lass dir gesagt sein Lina - das ist verdammt viel Arbeit! Und sehr alt werden die kleinen süßen auch noch....

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™