如何用delphi制作光盘导航？？？？？————急，急，急

blade77 2003-09-22 05:52:26

就是我放张光盘到光驱里面，光盘自动运行光盘上的
AUTORUN.EXE文件，弹出一个窗口，上面有些按钮，点击按钮，将打开或运行光盘上的某个文件，我问你这个按钮的onclick事件的代码怎么写，注意光驱盘符号是随电脑不同而不同，不是确定的。就是光盘的导航窗口。

...全文

34 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

kuan 2003-09-22

打赏
举报

来晚了，就用相对路径，
或者换个函数 winexec（PCHAR（ExtractFilePath(Application.ExeName)+相对路径\文件名),9)

dawnming 2003-09-22

打赏
举报

帮你up一下

haoguozhong 2003-09-22

打赏
举报

同意 lxpbuaa(桂枝香在故国晚秋)

jpyc 2003-09-22

打赏
举报

http://218.56.11.178:8009/Browers.aspx?FID=70

lxpbuaa 2003-09-22

打赏
举报

假设要打开的文件名（含相对于AUTORUN.EXE的路径）为F。那么：
uses ShellObj;

ShellExecute(Handle, 'open', PChar(ExtractFilePath(ParamStr(0)) + F)), nil, nil, SW_SHOW);

————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————