shellexecute(application.Handle,'open',PChar(runpath),nil,nil,SW_SHOWNORMAL);
比如我要打开c:\111.doc
你可以这样写
uses
shellapi
ShellExecute(handle, 'open','winword.exe', '111.doc', 'c:\', SW_SHOWNORMAL);
ShellExecute(handle, 'open','winword.exe', 'c:\111.doc', nil, SW_SHOWNORMAL);
或者干脆
ShellExecute(handle, 'open','c:\111.doc', nil, nil, SW_SHOWNORMAL);
你可以这样写
uses
shellapi
ShellExecute(handle, 'open','winword.exe', '111.doc', 'c:\', SW_SHOWNORMAL);
ShellExecute(handle, 'open','winword.exe', 'c:\111.doc', nil, SW_SHOWNORMAL);
或者干脆
ShellExecute(handle, 'open','c:\111.doc', nil, nil, SW_SHOWNORMAL);
来源：CSDN
作者：iteye_12363
链接：https://blog.csdn.net/iteye_12363/article/details/81883955