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 textfile读取文本文件

Delphi idhttp下载html的代码(含错误处理)

Delphi 之 定时器 (ttimer组件)

Delphi共享软件防破解的实用方法

Delphi　病毒

Delphi 常用4种对话框

idftp tencoding and iidtextencoding

Delphi link() 精简打开网址

Delphi xml解析、使用treeview呈现效果

Delphi fmx使用 timage 显示动画图片

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

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