菜鸟提问！

Question

点击一个button，触发事件播放C：\1.mp3,如何实现？难不难？
如果文件换成1.rm呢?

Answer 1

shellexecute 用这个API吧，具体我记不清了，你查查帮助

Answer 2

var
  OpenDialog: TOpenDialog;
begin
  OpenDialog := TOpenDialog.Create(self);
  if OpenDialog.Execute then
  begin
    ShellExecute(handle, 'open', PChar(OpenDialog.FileName), '', '', SW_SHOWNORMAL);
  end;
end;

Answer 3

是不是要加个引用文件之类的？
编译通不过，ShellExecute有问题

Answer 4

加单元：ShellAPIif openDialog1.Execute then
   ShellExecute(application.Handle,'open',Pchar(OpenDialog1.FileName),0,'',SW_SHOW);

Answer 5

那些都是调用文件。你可以整合到一起来。{\$Radio}PlaySound(C:\1.mp3);

Answer 6

经过各位的指导，我实现了这个功能，但是都是通过mediaplayer播放mp3的，能不能不用其他播放器而直接放歌的办法？