Delphi Mediaplayer Fehler

[CreativeMD]

Hallo Liebe Community
Ich will eine Datei mit OpenDialog in den Mediaplayer einspeisen. Aber wenn ich eine Datei in Documente auswähle funktioniert es nicht.
Liegt es an Windows 7?
Danke im voraus!

[smart]

zeig mal dein code.

[Klaus01]

Hallo,

was passiert denn nicht?

Wird die Datei nicht gefunden?
Wird sie, wenn sie denn gefunden wurde, nichtabgespielt?

Schon mal F8/F7 ausprobiert?

Grüße
Klaus

[CreativeMD]

Also es soll eine Playlist sein die etwas aus der Datei öffnet.

Delphi-Quellcode:

if ausgelesen[aktuell] = 'Spiel' then aktuell := 4;

      Form1.Mediaplayer1.Close;
      Form1.Mediaplayer1.Filename := ausgelesen[aktuell];
      Form1.Mediaplayer1.Open;
      Form1.Mediaplayer1.Play;
      Form1.Liedtitel.AlphaChannel := 1;
      Form1.Liedtitel.Visible := true;
      Form1.Liedtitel.Caption := '♪ Play song: ' + ExtractFileName(ausgelesen[aktuell]);
      aktuell := aktuell+1;
      warten := 2000;
      ausgelesen.Free;
    end;

Die Datei exsitiert wirklick
C:\Users\Nicht Wichtig\Documents\01 Better Way.mp3
Nicht Wichtig ist der Benutzername den ich nicht zeigen will.

Der Fehler ist in einer MessageBox und lautet:
"Kein MCI-Gerät geöffnet"
"Fehler beim Starten vom MCI

[smart]

Delphi-Quellcode:

  if OpenDialog1.Execute then
     begin
       if ausgelesen[aktuell] = 'Spiel' then aktuell := 4;
 
       Form1.Mediaplayer1.Close;
       Form1.Mediaplayer1.Filename := OpenDialog1.FileName;
       Form1.Mediaplayer1.Open;
       Form1.Mediaplayer1.Play;
       Form1.Liedtitel.AlphaChannel := 1;
       Form1.Liedtitel.Visible := true;
       Form1.Liedtitel.Caption := '♪ Play song: ' + ExtractFileName(ausgelesen[aktuell]);
       aktuell := aktuell+1;
       warten := 2000;
       ausgelesen.Free;
     end;

so würde ich das machen.

[CreativeMD]

Sorry eine Datei speichert die Playlist ab.
Welche Dateien geöffnet werden müssen und dann öffnet der Mediaplayer die entsprechende Datei. Also es ist nur indirekt mit Opendialog, weil man damit nur was in die Playlist datei reinschreibt

[smart]

Oh sorry, du woltest ja eine liste.

[smart]

Sorry, aber ich verstehe nicht so ganz was du machen möchtest? Was ist

Delphi-Quellcode:

ausgelesen[aktuell]

? Ein wenig mehr Info wäre gut.
In

Delphi-Quellcode:

ausgelesen[aktuell]

müsste der Pfard und der Dateiname enthalten sein.

[CreativeMD]

dort ist der Dateiname drin.
Mit allen anderen Pfaden funktioniert es ja.

[smart]

mit welchen denn nicht?

[EWeiss]

Zitat:

Zitat von smart (Beitrag 1139278)

mit welchen denn nicht?

C:\Users\Nicht Wichtig\Documents\01 Better Way.mp3

Versuchs mal mit Admin rechten

gruss

[lbccaleb]

An den Schreibrechten kann es nicht liegen, da er keine brauch! Oder möchte er auch MP3 Dateien schreiben?
So wie ich das Verstanden hab, will er Sie nur abspielen, dann sollte das auch kein Problem darstellen...

Allerdings solltest du dir nicht Jeden Schnippel aus der Nase ziehen lassen^^
Woher sollen wir wissen, was in deinem Code Bsp. "ausgelesen" ist usw.

Geb uns also mehr Code und beschreibe genau was du willst, dann irgendwie leuchtet zu mindest mir das nicht richtig ein!

BTW: Als Offensichtlicher Anfänger gleich ne Delphi XE2 Architect, nicht schlecht ;)

[smart]

genau das habe ich auch schon angeregt. Vieleicht ist auch die MP3 - Datei beschädigt. Wir brauchen mehr Infos.

[CreativeMD]

Mit dem was in Dokumente ist was ich schon gesagt habe
Die Datei exsitiert wirklick
C:\Users\Nicht Wichtig\Documents\01 Better Way.mp3
Nicht Wichtig ist der Benutzername den ich nicht zeigen will.

[smart]

Zitat:

Zitat von CreativeMD (Beitrag 1139290)

Mit dem was in Dokumente ist was ich schon gesagt habe
Die Datei exsitiert wirklick
C:\Users\Nicht Wichtig\Documents\01 Better Way.mp3
Nicht Wichtig ist der Benutzername den ich nicht zeigen will.

Was meinst Du mit Beutzername? Du möchtest doch eine Datei abspielen? Nur mit bestimmten Rechten oder wie?
Bei der Fehlermeldung kann auch die MP3 beschädigt sein.

[CreativeMD]

Nein in Windows 7 hat jeder Benutzer einen Ordner wo alle Daten drin sind. Ich will nur nicht meinen Namen angeben.

[smart]

Zitat:

Zitat von CreativeMD (Beitrag 1139292)

Nein in Windows 7 hat jeder Benutzer einen Ordner wo alle Daten drin sind. Ich will nur nicht meinen Namen angeben.

Das mit den Ordner ist klar, aber was hat das mit deinem Name zu tun? Wenn ich eine MP3 abspiele egal wie, hat es doch nichts mit deinem Name zu tun? Ich verstehe nicht wie Du das meinst.

[EWeiss]

Zitat:

Das mit den Ordner ist klar, aber was hat das mit deinem Name zu tun?

Er hat uns den Pfad mitgeteilt wo seine MP3 abgelegt ist und will uns seinen Namen C:\User\UserName nicht nennen.
Was auch verständlich ist.

Zu den Problem kann auch nur raten vielleicht Datei kaputt.

gruss

[CreativeMD]

EWeiss ja das habe ich gemeint.
Das Problem ist nicht das die Datei kapput ist.
Ein Freund hat mir gesagt es liegt wahrscheinlich daran das der Ordner User/UserName/Documents in Wirklichkeit anders heißt.
Das aber nur bei Windows 7 so. Also müsste ich mit irgendeinem Befehl
denn Pfad umändern.

[lbccaleb]

Beschreib doch erstmal was nicht geht, genau!!!!
Denn dein Benutzername und was weiß ich nicht was sind uns doch Bannane...

Aber wir müssen doch ne Fehlermeldung oder sonnst was haben, damit wir ansatzweise wissen können was denn nun nicht geht, oder Probleme macht. Hier kann doch keiner Hell sehen

[MGC]

Hallo erstmal,

ich glaube das größte Problem scheint hier zu sein, dass nicht ganz geklärt ist, in welchem Verzeichnis sich der "Eigene Dateien"-Ordner befindet.

Hier ist ein schöner Artikel dazu, wie man diesen, sowie auch andere wichtige Systemordner, ermittelt, selbst wenn der Anwender diese Ordner nach eigenem Ermessen verschoben hat. Ich denke, es funktioniert genauso auch unter Win 7.

Viele Grüße,

[DeddyH]

Ob es sich um den "Eigene Dateien"-Ordner handelt halte ich im Moment nicht für wirklich wichtig (wobei der mit SHGetFolderPath oder SHGetKnownFolderPath einfacher zu ermitteln ist). Bleibt die bereits gestellte Frage, ob evtl. die Datei beschädigt ist oder ob es tatsächlich am Speicherort liegt. Dazu kann man die Datei ja einmal woanders hin kopieren und testen, ob sie sich von dort abspielen lässt, oder man versucht andersherum, eine andere Datei aus dem gleichen Ordner abzuspielen. So kann man zumindest einen Anhaltspunkt bekommen, was eigentlich wirklich das Problem ist (evtl. kommen sogar Leerzeichen im Dateinamen in Betracht, aber das halte ich für wenig wahrscheinlich, wenn auch nicht unmöglich).

[CreativeMD]

ok
ich glaube es liegt an dem Zugriff.
Es wird der Zugriff verweigert aber wie behebe ich das Problem

[DeddyH]

Kopier die Dateien doch einfach in ein Verzeichnis, in dem Du die entsprechenden Rechte besitzt (CSIDL_MYMUSIC oder CSIDL_COMMON_MUSIC als Parameter für SHGetFolderPath sollte das vorgesehene Verzeichnis liefern). Der ursprüngliche Pfad sieht mir zumindest danach aus, als sei er von einem Windows 2000 oder XP nach Win7 kopiert worden.

[CreativeMD]

Das Problem ist nur das die Datei,
nicht in dasselbe Verzeichnis soll.
Es soll ja eine Playlist werden und ich kann
nicht einfach jede Datei duplizieren.
Gibt es keine andere Lösung?

[DeddyH]

Prüfe, ob Du Leserechte auf die Datei hast. Wenn nicht, wird sie nicht in die PlayList aufgenommen bzw. nachträglich daraus gelöscht (ggf. auf Nachfrage).

[CreativeMD]

Also noch eine neue Vermutung ich glaube es liegt an Delphi,
weil mein Freunde hat es debuggt und bei ihm funktioniert es.

[haentschman]

... ja, weil bei Ihm der Zugriff aus Rechtegründen funktioniert.

Probier mal folgendes:

1. Erstelle eine Wuppdi.txt in einem Ordner wo du Schreibrechte hast.
2. kopiere die Datei in den gleichen Ordner wie die mp3
3. Kannst du dann die Datei öffnen, bearbeiten und speichern ?

PS: Wir wissen immer noch nicht ob du in deinem Benutzerverzeichnis ausreichende Rechte hast. Normalerweise ja...aber was ist schon normal.

[CreativeMD]

Sorry du hast mich falsch verstanden.
Das Problem liegt weder an mein Code noch ein irgendwelchen Zugriffen.
Das Problem liegt bei Delphi, weil jemand hat für mich das Projekt compiliert und mir die EXE geschickt, dann hat es funktioniert.
Also muss es an Delphi liegen, oder?

Edit
Und ja ich habe damit diese Datei geöffnet und es hat funktioniert und ich habe Rechte darauf.

[haentschman]

Zitat:

weil jemand hat für mich das Projekt compiliert und mir die EXE geschickt, dann hat es funktioniert.

...das hast du nicht gesagt, denn...

Zitat:

weil mein Freunde hat es debuggt und bei ihm funktioniert es.

...ist was völlig anderes.

[EWeiss]

Vielleicht sollte man mal ein Unterforum anlegen in etwa wie
"RÄTZELRATEN"

Dann noch viel Spass bei der QuizFrage...

gruss

[lbccaleb]

1. Er geht auf absolut keien Hilfestellung ein.
2. Er hat es in 4 Seiten nicht geschafft, sein Problem genau zu beschreiben, und event. weiter helfenden Quell Text zu posten.
3. Weiß er mit absoluter Sicherheit nicht, was Er da überhaupt tut...
4. Stellt sich mir die Frage, wieso immer noch Leute versuchen zu helfen.... :shock:

[haentschman]

Zitat:

Stellt sich mir die Frage, wieso immer noch Leute versuchen zu helfen....

... Weihnachten steht vor der Tür. Da sind wir entspannter :stupid: