高分儿！一个小问题！（在线，解决给分儿！）

Question

uses ShellAPI;
ShellExecute(0,nil,'D:\',nil,nil, sw_Show);

Answer 1

可以直接运行光盘里的Autorun文件，先判定光盘盘符，然后再使用ShellExecute

Answer 2

请关注：http://www.csdn.net/expert/topic/607/607950.xml?temp=.2514765

Answer 3

在光盘中直接写个autorun的ini就可以了

Answer 4

在uses语句中加入： ShellAPI单元；
在需要打开光盘的地方：ShellExecute(0,nil,'D:\',nil,nil, sw_Show);

Answer 5

app_path:=extractfilepath(ParamStr(0)); //得到光盘的盘符
procedure TForm1.SpeedButton4Click(Sender: TObject);  //这个按钮就是
                                                      //‘浏览光盘’
var lp_lc:string;
begin
   lp_lc:=  'explorer.exe '+ app_path;
     winexec(pchar(lp_lc),1);
end;ok啦