Anfänger benötigt kleinen Schubs

  • Hallo AutoIt Gemeinde,

    ich bin was AuotIt betrifft der abosulte Anfänger und versuche mich an diverse Scripte, was bisher auch gut lief, doch nun habe ich mich an einem Script versucht und komme nicht mehr weiter.

    Ich muss daszu sagen das ich der praktiker bin und nicht der lesewurm, so nach dem Motto learning bei doing. Ich will auch nicht das mir jemand mir das Script fertig postet sondern wenn mir jemand einen Gedankenschups gibt mit ggf. einem Beispiel.

    Also zu meinem problem ( für mich jedenfalls ). Das Script ließt aus einem Verzeichnis meine MP3 Datein, mittels derzeit 5 Buttons möchte ich folgende Dinge erreichen.

    Der erste Button soll aus dem Listenfeld die markierte Eintrag übertragen, derzeit wird nur ein Eintrag erstellt.

    Der zweite Button löscht die rechte liste was ok ist

    Der dritte Button soll der markierten Eintrag löschen

    Der Vierte Button soll den markierte Wet aus der linken Liste abspielen ( das mit dem Abspielen bekommen soweit hin , es fehlt nur noch das er den markierten abspielt

    Der fünte Button soll mir die Einträge der rechten Liste auf ein festes definiertes Laufwerk kopieren.

    Anbei das Script

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <ListViewConstants.au3>
    #include <WindowsConstants.au3>

    $Debug_LB = False ; Check ClassName being passed to ListBox functions, set to True and use a handle to another control to see it work

    _Main()

    Func _Main()
    Local $hListBox, $add, $clear, $mylist, $close, $msg

    $Form1 = GUICreate("Form1", 572, 396, 192, 124)
    $hListBox = GUICtrlCreateList("", 20, 30, 200, 361)
    $hListBox1 = GUICtrlCreateList("", 362, 30, 200, 361)
    GUISetState()
    _GUICtrlListBox_BeginUpdate($hListBox)
    _GUICtrlListBox_ResetContent($hListBox)
    _GUICtrlListBox_InitStorage($hListBox, 100, 4096)
    _GUICtrlListBox_Dir($hListBox, "C:\Daten\Eigene Musik\*.mp3")
    _GUICtrlListBox_EndUpdate($hListBox)
    $Button1 = GUICtrlCreateButton("Hinzufügen", 224, 32, 121, 49)
    $Button2 = GUICtrlCreateButton("Liste löschen", 224, 104, 121, 49)
    $Button3 = GUICtrlCreateButton("Button3", 224, 176, 121, 49)
    $Button4 = GUICtrlCreateButton("Button4", 224, 248, 121, 49)
    $Button5 = GUICtrlCreateButton("Button5", 224, 312, 121, 49)

    GUISetState(@SW_SHOW)
    $msg = 0
    While $msg <> $GUI_EVENT_CLOSE
    $msg = GUIGetMsg()

    Select
    Case $msg = $Button1
    GUICtrlSetData($hListBox1, "You clicked button No1|")
    Case $msg = $Button2
    GUICtrlSetData($hListBox1, "")
    Case $msg = $Button3
    Exit
    EndSelect
    WEnd
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
    EndFunc ;==>_Main

    Wie bereits erwähnt ich bin pratiker und kann aus Beispielen besser lernen als wenn ihr mir den Befehl nennt und gut ist.

    Bitte keine Antworten wie "siehe Hilfe etc." und danke für hilfreiche Antworten.

  • also zu deinem problem mit dem button 1 hab ich was:

    [autoit]

    Func list1()
    $search = FileFindFirstFile(".\music\*.*")
    While 1
    $file = FileFindNextFile($search)
    If @error Then ExitLoop
    GUICtrlSetData($list1,$file)
    WEnd
    FileClose($search)
    EndFunc

    [/autoit]

    Es findet alle Files in /music und kopiert sie in list1 bis keine datei mehr vorhanden ist :)