Delphi LinkLabel1 用法

本文整理自网络，侵删。

 
uses ShellAPI;

procedure TForm1.FormCreate(Sender: TObject);
begin
  LinkLabel1.Caption := '<a href="http://www.1231818.com/">1231818</a>';
end;

procedure TForm1.LinkLabel1LinkClick(Sender: TObject; Link: string;
  LinkType: TSysLinkType);
begin
  ShellExecute(0, nil, PChar(Link), nil, nil, 1);
end;
 

相关阅读 >>

Delphi idhttp添加头信息

Delphi得到字符串中第一个汉字的位置

Delphi 数字转excel字母列序号

Delphi 利用windows api判断文件共享锁定状态

Delphi 替换系统文件实现绕过杀软启动

Delphi编程如何判断图片文件的真实类型？

Delphi 打开文件夹并定位到一个文件

Delphi实现dbgrid全选和反选功能

Delphi 读文件到十六进制的函数(Delphi 7 下可用)

Delphi 扫雷外挂

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

转载请注明出处：木庄网络博客 » Delphi LinkLabel1 用法