5,388
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
lijixue 2003-02-10
- 打赏
- 举报
up
xrfw 2003-02-10
- 打赏
- 举报
补充
interface 下的use里加shellapi单元
interface 下的use里加shellapi单元
jog81 2003-02-09
- 打赏
- 举报
ShellExecute(Handle,'Open',PChar('help\help.chm'),nil,Pchar(ExtractFileDir(ParamStr(0))),SW_SHOW);
这是用来调用程序文件夹里的HELP文件夹的help.chm！
这是用来调用程序文件夹里的HELP文件夹的help.chm！
xrfw 2003-02-09
- 打赏
- 举报
ShellExecute(0,'open','**.chm',nil,nil,SW_SHOW);
