procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
mediaPlayer1.FileName:=Opendialog1.FileName;
MediaPlayer1.open;
end ;
end;end.
我就用了这几行代码打开一个mp3文件,但是每当我点打开的时候窗口都自动关闭,这是怎么回事?急等
begin
if OpenDialog1.Execute then
begin
mediaPlayer1.FileName:=Opendialog1.FileName;
MediaPlayer1.open;
end ;
end;end.
我就用了这几行代码打开一个mp3文件,但是每当我点打开的时候窗口都自动关闭,这是怎么回事?急等
再就是不知道支不支持mp3呢