如题。

解决方案 »

  1.   

    一条语句搞定!!!procedure TForm1.Button2Click(Sender: TObject);
    begin
        ShellExecute(Handle,nil,pchar('wmplayer.exe'),nil,nil,SW_SHOWNORMAL );
    end;
      

  2.   

    没有问题的,在我机器上OK!
       要么就是你的机器上的Windows Media Player不存在,或者注册环境被破坏了!忘了告诉你,在uses 上加 ShellAPI 单元
      

  3.   

    倒,你不早说。我想请教你一下,
    你是怎么知道,怎么打开windows media player的昵?