Delphi调用API函数

 添加引用:ShellAPI单元

  • 打开PDF文件
shellexecute(handle, 'open', PChar(filePath), nil, nil, SW_SHOWNORMAL);
  • 打开网址
ShellExecute(Application.Handle, nil, 'http://www.iconfont.cn/', nil, nil, SW_SHOWNORMAL);

猜你喜欢

转载自blog.csdn.net/u012366767/article/details/81670876