Registriert seit: 10. Jan 2003
Ort: Schwall
71 Beiträge
Delphi 8 Professional
|
10. Jun 2003, 23:56
Hallo, nirvanalizer
Ich habs mal bei mir ausprobiert
Windows XP Prof.
Delphi 6 Prof.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then begin
MediaPlayer1.Close;
MediaPlayer1.FileName:=OpenDialog1.FileName;
MediaPlayer1.Open;
end;
end;
funktioniert einwandfrei !
Gruß, Tom
Thomas van Veen Es gibt keine Probleme, nur Lösungen, auf die man nicht gleich kommt !
|