mhm...das versteh ich jtz nicht... 
Beiträge von GE IXI TIM
-
-
So MiniPlayer ist über der Taskleiste und das registrieren ist draußen^^
siehe beitrag 1 zum download... -
also: dass mit dem registrieren klappt eh nicht
und beim miniplayer muss man einfach auf die Taskleiste klicken und sie kommt in den vordergrung^^
aber ich mach sie gleich ein wenig hoch...
danke
-
weil bei dir prüft das skript 1mal den status, un kann somit nicht mittendrin abgebrochen werden, jetzt prüft er vor jedem Buchstaben den Status
und der status wird am ende von _mist() auf 0 gesetzt, so wird die Func sicher beendet -
Probiers mal so:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <Date.au3>$reset=0
[/autoit] [autoit][/autoit] [autoit]HotKeySet("^q", "beenden")
[/autoit] [autoit][/autoit] [autoit]
HotKeySet("^w", "abbruch")
HotKeySet("^.", "datum")
HotKeySet("{NUMPADDOT}", "proepunkt")
HotKeySet("{F1}", "mist")While 1
[/autoit] [autoit][/autoit] [autoit]
WEndFunc proepunkt()
[/autoit] [autoit][/autoit] [autoit]
If WinActive("[CLASS:Dialog]", "") Then
Send(".")
Else
Send(",")
EndIf
EndFuncFunc datum()
[/autoit] [autoit][/autoit] [autoit]
;~ Send(@MDAY&"."&@MON&"."&@year) ebenfalls möglich
send(_NowDate())
EndFuncFunc mist()
[/autoit] [autoit][/autoit] [autoit]
If $reset = 0 Then Send("M")
Sleep(1000)
If $reset = 0 Then Send("i")
Sleep(1000)
If $reset = 0 Then Send("s")
Sleep(1000)
If $reset = 0 Then Send("t")
Sleep(1000)
$reset = 0EndFunc
[/autoit] [autoit][/autoit] [autoit]Func abbruch()
[/autoit] [autoit][/autoit] [autoit]
$reset = 1
EndFuncFunc beenden()
[/autoit]
Exit
EndFunc -
Hallo,
Hier möchte ich euch meinen AudioPlayer vorstellen
Funktionen:Zufallswiedergabe
Dateien per Drag&Drop hinzufügen
Playlists erstellen
Mp3-Dateien können statt mit Windows-Media-player mit meinem Prog wiedergegeben werden (also bei öffnen) dank $cmdline[1]
Beim öffnen einer Playlist wird mein Prog geöffnet und dir Playlist ist in die Liste eingetragen und zur sofortigen Wiedergabe bereit
Designwahl
Lautstärkeregler
Statusbar
Miniplayer (Extra Buttonleiste, dass der Player auch minimiert gesteuert werden kann)
Titelinformationen (zeigt Informationen zu aktuellem Titel an, Erscheinungsjahr, Künstler, ...)
ABER: sobald ein Titel abgespielt wird, hängt er ziemlich, vielleich kann mit jemand sagen warum
aber ansonsten: viel Spaß
Enthalten: Compilierte .exe, skript, alle Icons -
hallo erstmal
$Hersteller_Text1 = GUICtrlCreateLabel((GUICtrlRead($Standard_Text1)), 30, 8, 500, 50)
ich weis nocht ob es der fehler ist, aber ich glaube mal^^
also: du benutzt ja hier GuiCtrlread, aber wass soll er denn "readen"?
die Gui wo das Formular ist ist ja momentan gar nicht da.
Ich glaube du musst den Inhalt des Formulares mit GuiCtrlRead in einer Variable deklarieren, wenn die dazugehörige Gui noch verfügbar ist, weist du wie ich meine?
ich weis nicht obs stimmt, aber ört sich iwie logisch an^^
lg, tim -
Spoiler anzeigen
[autoit]
[/autoit]
#include <Date.au3>
HotKeySet("{ENTER}", "_Date")
HotKeySet("{ESC}", "_Exit")
While 1
WEnd
Func _Date()
send(_NowDate())
EndFunc
Func _exit()
Exit
EndFuncProbier es anstatt immer mit @Hour usw. mal mit _nowdate()
-
geht als noch nicht
-
genau so hatt ichs...aber iwie funzt das nicht
wenn ich eine mp3-datei öffne, geht der Windows-media-Player auf... -
danke funkey, aber die funcs klappen bei mir nicht...wie muss die function aussehen, wenn die zu registrierende Datei .mp3 und die Beschreibung..."RegTest" ist?
vielleicht bin ich nur zu dumm die Parameter zu kapieren^^
-
ah okay danke
-
Beispiel:
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 244, 88, 358, 262)
$Input1 = GUICtrlCreateInput("", 16, 8, 145, 21)
$browse = GUICtrlCreateButton("Browse", 168, 8, 75, 25, 0)
$play = GUICtrlCreateButton("Abspielen", 16, 40, 75, 25, 0)
$regwrite = GUICtrlCreateButton("Registry", 96, 40, 75, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
if IsArray($CmdLine) Then
For $i = 1 To $CmdLine[0]
If StringRight($CmdLine[$i], 4) = '.mp3' And FileExists($CmdLine[$i]) Then
GUICtrlSetData($Input1, $CmdLine[$i])
EndIf
Next
EndIf
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $play
$sound = GUICtrlRead($Input1)
SoundPlay($sound)
case $browse
$sound = FileOpenDialog("Sound wählen", @DesktopDir, "Mp3-Dateien(*.mp3)")
GUICtrlSetData($Input1, $sound)
case $regwrite
?????????????????????????????? ;=====Hier soll dann der Weg öffnen mit, standartprogramm auswählen, ... umgangen werden...
EndSwitch
WEnd
hoff mal ihr versteht was ich meine
-
hallo @all
folgendes Problem: ich will mp3-Dateien mit meinem Programm öffnen. Mit $CMDLINE[1] hat das super geklappt.
Nur um eine Mp3-Datei zu öffnen, muss man halt rechtsklick, öffnen mit, haken setzen, usw...sehr umständlich und problematisch wenn ich es Freunden schicke.
Nun hörte ich etwas von Registry Classes shell...?!
damit kann man diesen Weg einfach machen.
kann mir bitte jemand ein Beispiel machen, wie ich diese Registry (mp3-Dateien mit meinem AudioPlayer.exe öffnen) schreibe?
Danke im Voraus
-
jawoll^^ danke^^ habs mit cmdline[1] hinbekommen^^
wie ich ne mp3 datei mit meim progg öffne musst ich ja^^ mit öffnen mit und so...aber von dem registy da hab ich überhaupt keine Ahnung
danke an alle
wenn mit jtz vielleicht noch jmd das andere erklären könnte -
hier ist das script...ist aber unübersichtlich
und noch nicht komplett fertig^^Spoiler anzeigen
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.0.0
Author: myNameScript Function:
Template AutoIt script.#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
$xalpha = 0
$sound = "none"
$status = 0
$what = "none"
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>$iLenMS = ""
$iPosMS = ""#include <FF.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListBoxConstants.au3>
#include <ProgressConstants.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Sound.au3>
#include <Array.au3>
#include<GuiListView.au3>
for $ii = 0 to 600 step 10GUICtrlSetData($progress,Int($ii * 1 / 1))
Next
sleep(600)
GUIDelete($Form2)
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListBoxConstants.au3>
#include <ProgressConstants.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Guilistbox.au3>
#Region ### START Koda GUI section ### Form=c:\users\tim\desktop\mp3.kxf
$Form1 = GUICreate("Mp3-Player", 684, 448, 315, 98, -1, BitOR($WS_EX_ACCEPTFILES,$WS_EX_WINDOWEDGE))
GUISetBkColor(0xB4B4B4)
$List1 = GUICtrlCreateList("", 8, 0, 665, 292, BitOR($LBS_SORT,$LBS_STANDARD,$WS_HSCROLL,$WS_VSCROLL,$WS_BORDER))
$play_pause = GUICtrlCreateButton("play", 8, 312, 35, 33, 0)
$stop = GUICtrlCreateButton("back", 88, 312, 35, 33, 0)
$Slider1 = GUICtrlCreateSlider(216, 304, 350, 37)
$Progress1 = GUICtrlCreateProgress(8, 360, 518, 17)
$wavelabel = GUICtrlCreateLabel("50%", 608, 312, 24, 17)
$Label1 = GUICtrlCreateLabel("Aktueller Titel:", 8, 392, 71, 17)
$nowtitle = GUICtrlCreateLabel("none", 88, 392, 204, 17)
$nowtime = GUICtrlCreateLabel("0:00", 536, 360, 97, 17)
$pause = GUICtrlCreateButton("next", 128, 312, 35, 33, 0)
$Button1 = GUICtrlCreateButton("pause", 48, 312, 35, 33, 0)
$Button2 = GUICtrlCreateButton("stop", 168, 312, 35, 33, 0)
$datei = GUICtrlCreateMenu("&Datei")
$end = GUICtrlCreateMenuItem("Beenden", $datei)
$playlist = GUICtrlCreateMenu("&Playlist")
$erstellen = GUICtrlCreateMenuItem("Erstellen", $playlist)
$laden = GUICtrlCreateMenuItem("Laden", $playlist)
$design = GUICtrlCreateMenu("D&esign")
$open = GUICtrlCreateMenuItem("Öffnen", $datei)
GUICtrlSetState($List1, $GUI_DROPACCEPTED)
GUICtrlSetData($Slider1, "50%")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $end
Exit
case $open
$path = FileOpenDialog("Öffnen", @DesktopDir, "Mp3-Dateien(*.mp3)|Wma-Dateien(*.wma)")
GUICtrlSetData($List1,$path)
case $play_pause
if $status = 0 Then
$what = Guictrlread($List1)
$sound = _SoundOpen($what)
_SoundPlay($sound)
EndIf
If $status = 1 Then _SoundResume($sound)
case $pause
_next()
case $Button1
_SoundPause($sound)
$status = 1
case $Button2
_SoundStop($sound)
_SoundClose($sound)
$status = 0
case $stop
_last()
case $GUI_EVENT_DROPPED
if StringInStr(@GUI_DragFile, "mp3" ) Then
GUICtrlSetData($List1, @GUI_DragFile)
if StringInStr(@GUI_DragFile, "wma" ) Then GUICtrlSetData($List1, @GUI_DragFile)
Else
MsgBox(0, "Fehler", "Keine Gültige Audiodatei" & @crlf & "Nur .mp3 oder .wma Dateien!")
EndIfEndSwitch
Local $iLenMS = _SoundLength($sound, 2)
Local $iPosMS = _SoundPos($sound, 2)
$nowpos = _SoundPos($sound, 1)
$nowlenght = _SoundLength($sound, 1)
$info = $nowpos & "/" & $nowlenght
GUICtrlSetData($nowtime, $info)
GUICtrlSetData($Progress1, Int(100 / $iLenMS * $iPosMS))
$changedwave = Guictrlread($Slider1)
GUICtrlSetData($wavelabel, $changedwave & "%")
SoundSetWaveVolume($changedwave)
$title = Stringsplit($what, "\")
$h = $title[0]
GUICtrlSetData($nowtitle, $title[$h])
if $nowpos <> "00:00:00" Then
if $nowpos = $nowlenght or $nowpos > $nowlenght Then
_SoundStop($sound)
_SoundClose($sound)
$theone = _GUICtrlListBox_GetCaretIndex($List1)
$xbeta = $theone +1
_GUICtrlListBox_ClickItem($List1, $xbeta)
$what = guictrlread($List1)
$sound = _soundopen($what)
EndIf
EndIf
WEndFunc _next()
_SoundStop($sound)
_SoundClose($sound)
$theone = _GUICtrlListBox_GetCaretIndex($List1)
$xbeta = $theone +1
_GUICtrlListBox_ClickItem($List1, $xbeta)
$what = guictrlread($List1)
$sound = _soundopen($what)
_soundplay($sound)
EndFuncFunc _last()
_SoundStop($sound)
_SoundClose($sound)
$theone = _GUICtrlListBox_GetCaretIndex($List1)
$xbeta = $theone -1
_GUICtrlListBox_ClickItem($List1, $xbeta)
$what = guictrlread($List1)
$sound = _soundopen($what)
_soundplay($sound)
EndFunc -
hallo an alle
also: ich habe mir eine Art Mp3-Player programmiert...klappt soweit ganz gut, aber jetzt will ich, dass wenn ich eine mp3-Datei öffne, sich statt dem Media-Player von Windows mein Programm öffnet und diese Datei abspielt...
Beispiel: ich öffne eine mp3-Datei...irgendein Lied...jetzt öffnet sich mein Programm und spielt das Lied ab. Ohne dass sich der Windows Mediaplayer öffnet.
ich weiß wie man bei mp3-Dateien einstellt dass sie mit meinem Programm geöffnet werden, aber dann ist nur mein Programm offen
aber ich brauche ja den Pfad von der Mp3-Datei...un den krieg ich dann nicht raus
ich hoff mir kann jmd helfen -
-
Und was soll ich mit dieser Datei anfangen?
Die hat doch garnichts mit meinem Prob zu tun... -
Das ist für das eintragen der Informationen in meine Datei.
aber $path soll der pfad der .tda datei sein, wenn ich diese öffne.
aber wie soll ich den bekommen, wenn ich diese öffne ich hoff es geht so wie bei Microsoft-Word^^Spoiler anzeigen
$z1 = FileReadLine($path, 2)
$z2 = FileReadLine($path, 4)
$z3 = FileReadLine($path, 6)
$z4 = FileReadLine($path,
$z5 = FileReadLine($path, 10)
$z6 = FileReadLine($path, 12)
$z7 = FileReadLine($path, 14)
$z8 = FileReadLine($path, 16)GUICtrlSetData($data, $z1)
GUICtrlSetData($name, $z2)
GUICtrlSetData($buyprice, $z5)
GUICtrlSetData($buydata, $z3)
GUICtrlSetData($selldata, $z4)
GUICtrlSetData($sellprice, $z6)
GUICtrlSetData($porto, $z7)
GUICtrlSetData($gewinn, $z8