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 时间与相关类型(3): tfiletime、tsystemtime 及 dos 时间

Delphi文本转换图片

Delphi中实现磁盘信息类(tdriveinfo)

Delphi获取网卡mac地址的两种方法

Delphi idhttp访问百度

Delphi向当前窗口模拟键盘ctrl+v发送"粘贴"

Delphi 获取计算机名称3

Delphi整理二（object pascal语言）

Delphi 判断是否为二进制文件

Delphi 判断当前活动窗口

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

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