添加引用：ShellAPI单元
打开PDF文件
shellexecute(handle, 'open', PChar(filePath), nil, nil, SW_SHOWNORMAL);
打开网址
ShellExecute(Application.Handle, nil, 'http://www.iconfont.cn/', nil, nil, SW_SHOWNORMAL);

---------------------
作者：有个家伙喜欢代码
来源：CSDN
原文：https://blog.csdn.net/u012366767 ... 876?utm_source=copy
版权声明：本文为博主原创文章，转载请附上博文链接！

奈斯