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》频道 >>

转载请注明出处：木庄网络博客 » delphi xe vcl - Tlinklabel(链接标签)