Ich hab mich mal drangesetzt und bisher kommt dashier raus:
Das ist ein funktionsfähiger musikplayer:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <ProgressConstants.au3>
#include <SliderConstants.au3>
#include <WindowsConstants.au3>
#include <musicplayer_UDF.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 625, 426, 192, 124 , Default, $WS_EX_ACCEPTFILES)
$Button1 = GUICtrlCreateButton("Play/Pause", 32, 24, 89, 33)
$Button2 = GUICtrlCreateButton("Stop", 184, 24, 97, 33)
$Button3 = GUICtrlCreateButton("Neue Datei", 360, 24, 81, 33)
$hSlider = GUICtrlCreateSlider(0, 88, 625, 49)
$hlistview = GUICtrlCreateListView("Dateiname|Pfad", 8, 176, 601, 233)
$Progress1 = GUICtrlCreateProgress(16, 128, 521, 33)
$playplayliste = GUICtrlCreateButton("Playliste Abspielen",500,24)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_musicmodul_main(@ScriptDir & "\sys\", $Button1, $Button1, $Button2, $hSlider, $Progress1, $Button3, $hlistview,$playplayliste)
[/autoit]Source kommt demnächst...
hier schonmal der funktionsheader:
Spoiler anzeigen
; #FUNCTION# ======================================================================================
; Name ..........: _musicmodul_main()
; Description ...: Eine Funktion zum bauen eines musikplayers
; Syntax ........: _musicmodul_main($Dllpath, $playbutton, $pausebutton, $stopbutton, $volumeslider, $progressprogr[, $newfilebutton = ""[, $hlistview = ""[, $playlisteplay = ""[, $applicationname = @ScriptName]]]])
; Parameters ....: $Dllpath - Der Pfad zu den DLLs mit abschließendem "\"
; $playbutton - Der Playbutton
; $pausebutton - Der Pausebutton
; $stopbutton - Der Stopbutton
; $volumeslider - Der Lautstärkeslider
; $progressprogr - Der Progress zum anzeigen des Liedfortschrittes
; $newfilebutton - [optional] Der Button zum öffnen einer neuen Datei (default:"")
; $hlistview - [optional] Das Playlistelistview (default:"")
; $playlisteplay - [optional] Der button zum starten der Playliste (default:"")
; $applicationname - [optional] Der Name der Anwendung (default:@ScriptName)
; Author ........: JuraX
; Remarks .......: Bei einer playliste muss bei GuiCreate nach dem Parameter Width folgendes angehängt werden: [, -1, -1, Default, $WS_EX_ACCEPTFILES]
; Link ..........: https://autoit.de/index.php?form=PostAdd&threadID=19334
; Example .......: Yes
; #include <ButtonConstants.au3>
; #include <GUIConstantsEx.au3>
; #include <ListViewConstants.au3>
; #include <ProgressConstants.au3>
; #include <SliderConstants.au3>
; #include <WindowsConstants.au3>
; #include <musicplayer_UDF.au3>
; $Form1 = GUICreate("Form1", 625, 426, 192, 124 , Default, $WS_EX_ACCEPTFILES)
; $Button1 = GUICtrlCreateButton("Play/Pause", 32, 24, 89, 33)
; $Button2 = GUICtrlCreateButton("Stop", 184, 24, 97, 33)
; $Button3 = GUICtrlCreateButton("Neue Datei", 360, 24, 81, 33)
; $hSlider = GUICtrlCreateSlider(0, 88, 625, 49)
; $hlistview = GUICtrlCreateListView("Dateiname|Pfad", 8, 176, 601, 233)
; $Progress1 = GUICtrlCreateProgress(16, 128, 521, 33)
; $playplayliste = GUICtrlCreateButton("Playliste Abspielen",500,24)
; GUISetState(@SW_SHOW)
; _musicmodul_main(@ScriptDir & "\sys\", $Button1, $Button1, $Button2, $hSlider, $Progress1, $Button3, $hlistview,$playplayliste)
; =================================================================================================
die bass sachen
autoit.de/wcf/attachment/8821/
JuraX