delphi xe vcl - Tlinklabel(链接标签)


本文整理自网络,侵删。

 
uses ShellAPI;
procedure TForm1.FormCreate(Sender: TObject);
begin
  LinkLabel1.Caption := '<a href="http://www.52chaxun.com/">我爱查询网</a>';
end;
procedure TForm1.LinkLabel1LinkClick(Sender: TObject; Link: string;
  LinkType: TSysLinkType);
begin
  ShellExecute(0, nil, PChar(Link), nil, nil, 1);
end;

相关阅读 >>

Delphi有关asqlite控件支持中文路径的解决方案

Delphi 的编码与解码(或叫加密与解密)函数

Delphi2009之timage

Delphi 判断时间是否合法 -isvaliddatetime、isvaliddate、isvalidtime、isvaliddateday

Delphi idhttp 设置cookie 和访问后读取cookie 值

Delphi中使用flash控件

Delphi enumwindows回调函数获取qq2009窗体句柄

Delphi 判断尾串是否匹配,不分大小写

Delphi wmi 取硬件信息

Delphi 如何让scrollbox的内容与滚动条一起实时滚动

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...