procedure TForm1.Button1Click(Sender: TObject);
begin
WinExec('rundll32.exe shell32.dll,Control_RunDLL MMSys.cpl',SW_ShowNormal);
end;win2000+delphi6,成功!

解决方案 »

  1.   

    http://www.csdn.net/expert/topic/169/169977.shtm
    这里的程序有打开所有控制面板的功能,win98
      

  2.   

    哈哈!我的是在2000下,那你就先去系统的平台号码GetVersion,
    判断98获2000,在决定执行哪段代码,
    当然这种方法比较丑! 
      

  3.   

    To ch81:
        这种方法虽然丑,却也能解决问题。
        真正的问题是,Win98下的“声音”页并不对应于一个cpl文件。我该怎么办?    谢谢。
      

  4.   

    lyre(大头鬼) :
    xzm2000(不是云)的方法,不是在98下吗?他的程序,我还没看!