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



打赏

取消

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

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

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

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

评论

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