Media Player funktioniert nicht

[bbt2]

Guten Abend zusammen,

ich bin ein Anfänger in Delphi und versuche mich gerade darin den Media Player zu nutzen!

Nun habe ich folgendes Problem, scheind alles zu klappen bis zu dem Punkt wo ich das Programm starte!
Folgendes Problem...
Beim starten, zeigt er mir zwar den Player und den Button an, allerdings nach Betätigung des Buttons passiert rein gar nichts !!!

Delphi-Quellcode:

unit player;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, MPlayer;

type
  TForm1 = class(TForm)
    MediaPlayer1: TMediaPlayer;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);

  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  playList: TStringList; // globale Variable einrichten

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  mediaplayer1.FileName := 'E:\Sonstiges\Lustige Sounds\AphexTwinsTechnoTetris.mp3';
  mediaplayer1.Open;
  mediaplayer1.play;
end;

end.

Danke schon mal !!!

[edit=Matze][quote]- durch [delphi]-Tags ersetzt. MfG Matze[/edit]

[Whookie]

Hm ... sieht für mich okay, aus und sollte daher so funktionieren. Darum denke ich, dass Du eher ein "externes" Problem hast (sofern die mp3-Datei wirklich im angegebenen Pfad existiert).

Kannst Du sie mit dem Windows Media Player abspielen?

[bbt2]

Zitat von Whookie:

Kannst Du sie mit dem Windows Media Player abspielen?

Der Pfad + die Datei existieren!

Und das Lied funktioniert auch super!

Könnte es sein, dass Delphi 6 auf Windows 7 64Bit einige Fehler mit sich bringt?

[mkinzler]

Es wird auch kein Fehler angezeigt?

[Matze]

Bei mir funktioiert es, wie oben gezeigt.
Nur erhalte ich noch eine Meldung, ob ich ffdshow o.ä. nutzen möchte. Keine Ahnung wieso.

Du kannst das angehängte Projekt ja mal bei dir testen (ist allerdings mit TurboDelphi erstellt, aber vielleicht kannst du es dennoch öffnen). Nur, um auszuschließen, dass es an irgendeiner versteckten Einstellung liegt.

[bbt2]

Zitat von mkinzler:

Es wird auch kein Fehler angezeigt?

Nein. Keine Fehler, hätte ich sonst mit aufgeschrieben!

Zitat von Matze:

Bei mir funktioiert es, wie oben gezeigt.

Du kannst das angehängte Projekt ja mal bei dir testen (ist allerdings mit TurboDelphi erstellt, aber vielleicht kannst du es dennoch öffnen). Nur, um auszuschließen, dass es an irgendeiner versteckten Einstellung liegt.

Die Anwendung Funktioniert super.
allerdings beim öffnen des Project kommt ein Fehler:

Meldung:
Bei der Weitergabe des Befehls an das Programm ist ein Fehler aufgetreten.

[bbt2]

Hat keiner eine Antwort?

[bbt2]

Danke! Habe den Fehler selber behoben
Lag an der Übergabe des Befehls zwischen den Button und der Form!

Trotzdem danke!