Mediaplayer beendet sich.

[Moyyer]

Hi, alle zusammen. Ich wollte mir ein kleines Programm mit einer Mediaplayer-Komponente schreiben.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
mediaplayer1.open;
mediaplayer1.play;
end;

Die wiederzugebende Datei hab ich vorher zugewiesen.
Nun zu meinem Problem. Sobald ich auf den Button klicke, beendet sich mein Programm und ich bin wieder im Delphi. Woran kann das liegen? Hat jemand eine Idee? Er spielt keinen Sound ab.

[edit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]

[flomei]

Dein Code geht bei mir einwandfrei!
Starte vielleich mal Delphi neu. Manchmal hilft´s

MfG Florian

[Moyyer]

Um erlich zu sein ging es bis vor 2 Tagen auch noch, doch jetzt funktioniert es genzlich nicht mehr auch mit Neustart nicht. Doch ich kann mich nicht ensinnen irgendetwas falsch gemacht zu haben.

[hummer]

Zeig mal ein bisschen mehr von deinem Code, z.B. wo die abzuspielende Datei zugewiesen wird. Vielleicht liegt der Fehler ja woanders.

Dein angegebener Code müsste nämlich funktionieren.

[Christian Seehase]

Moin Moyyer,

hast Du auch schon mal probiert alle nicht erforderlichen Dateien des Projektes (die DCUs, die EXE) mal zu löschen und dann das Projekt neu zu kompilieren (bzw. zu erzeugen)?

Zur Sicherheit solltest Du die zu löschenden Dateien vorher sichern. Nicht das zufällig eine im Projektverzeichnis ist, von der Du nicht die Sourcen hast.

[Moyyer]

Ich habe noch etwas herausgefunden. Es liegt nich an der Funktion

Code:

mediaplayer1.play

sondern an

Code:

mediaplayer1.open

wenn ich die funktion mediaplayer1.autoopen auf true setze, startet das progamm gar nicht erst.

Ich hab es schon oft probiert, aber es ist immerwieder dasselbe problem.
Ich weiß einfach nicht was ich falsch gemacht habe.

P.S ich habe das programm "bassplay" von "Torry" zwischendurch mal benutzt, kann es daran liegen?

[Flogo]

Hab das gleiche Problem beim open beendet das Program. Einfach so als wärs normal, keine Fehlermeldung, nichts. Ich hab zwischendurch mal TSSVolumeControll benutzt vielleicht verträgt der Mediaplayer keine Konkurrenz?? Das Problem existiert sogar in einem neuen Projekt, dass nur diese drei Befehle hat (filename - open - play). Das lustige ist die kompilierte Exe läuftund spielt die mp3 ohne Probleme ab. Hoffentlich hat jemand ne Idee wie man dass wieder wegkriegt !?

[woki]

Hi,

ich denke das beenden liegt an Windows, dieses schießt in bestimmten Situationen (z.B. Stackoverflow, meine ich) laufende Programme ab, und hat es nicht nötig den Anwender zu informieren.

Ich habe in ganz anderen Situationen, Ado auch bereits ähnliches Verhalten beobachtet, ohne es bis jetzt ganz erklären zu können.

Grüsse
Woki

[Flogo]

Wie kommt es dann das die erstellte exe läuft(das prog beendet nur wenn es von Delphi aus gestartet wird)? Und kann man dagegen irgendwas tun?

Ich will nicht das ganze debugging mit messageboxen in der kompilierten exe machen !
BITTE helft mir