[UDF] _CreateDummyFile - Dummy-Dateien einfach erzeugen

  • Hallo, wenn Du die Macros verwendest kannst Du einige Deiner kl. Funktionen sparen (siehe Beispiel).
    Die Group noch schließen. 8)

    [autoit]


    GUICtrlCreateGroup("Group 1", 190, 60, 90, 140)
    ; [...]
    GUICtrlCreateGroup("", -99, -99, 1, 1) ;close group

    [/autoit]
    Spoiler anzeigen
    [autoit]


    #include <Sound.au3>

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

    Opt("GUIOnEventMode", 1)

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

    Global $CurrentSound
    #region ### START Playlister GUI section ###
    GUICreate("Playlister", 283, 224, 634, 131)
    GUISetOnEvent(-3, "_Func")
    $lbl = GUICtrlCreateLabel("", 0, 104, 279, 17)
    $bn1 = GUICtrlCreateButton("Open", 48, 40, 75, 22)
    GUICtrlSetOnEvent(-1, "_Func")
    $bn2 = GUICtrlCreateButton("Play", 128, 152, 75, 22)
    GUICtrlSetOnEvent(-1, "_Func")
    $Pause = GUICtrlCreateButton("Break", 8, 152, 75, 22)
    GUICtrlSetOnEvent(-1, "_Func")
    $ckb = GUICtrlCreateCheckbox("Save", 160, 48, 97, 17)
    GUICtrlSetState(-1, 1)

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

    GUISetState(@SW_SHOW)
    #endregion ### END Playlister GUI section ###

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

    #region ### START Playlister Loop section ###
    While Sleep(100)
    WEnd
    #endregion ### END Playlister Loop section ###

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

    #region ### START Playlister Func section ###
    Func _Func()
    Switch @GUI_CtrlId
    Case -3
    Exit
    Case 4
    MsgBox(0, "", "Aus der Funktion - Open !")
    Case 5
    MsgBox(0, "", "Aus der Funktion - Play !")
    ;~ _SoundResume($CurrentSound)
    Case 6
    MsgBox(0, "", "Aus der Funktion - Break !")
    ;~ _SoundPause($CurrentSound)
    EndSwitch
    EndFunc ;==>_Func
    #endregion ### END Playlister Func section ###
    ; Ende

    [/autoit]