delphi Link() 精简打开网址

本文整理自网络，侵删。

 

 
 
uses ShellAPI;
{打开网址}
//调用 Link('www.baidu.com'); 
procedure Link(URL:string); 
begin 
  ShellExecute(Application.Handle,nil, PChar(URL), 0, 0, SW_SHOWNORMAL); 
end;
 

相关阅读 >>

Delphi fdquery遍历输出 json

Delphi ansi字符串转unicode编码

Delphi listview1 中添加check选中事件

Delphi 完美的线程注入和卸载

Delphi 合并文件

Delphi开发的服务中调用指定应用程序

Delphi tbytedynarray转化为string

Delphi 通过http获取软件版本

Delphi for 循环 to和downto的理解

Delphi 获得memo、richedit的光标位置

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi Link() 精简打开网址