请问如何做超链接 — 编程爱好者社区

您所在位置：社区首页 — Delphi讨论区 — 请问如何做超链接

主题：请问如何做超链接

channelxp [专家分：20] 发布于 2007-07-12 16:13:00

我有一个Label,它的Caption是一个网址,请问如何实现点击这个Label就可以到达相应的网页呢,如果用Label不行的话要用什么控件搭配什么方法呢

沙发

channelxp [专家分：20] 发布于 2007-07-12 17:08:00

procedure TAboutForm.LbWebAddClick(Sender: TObject);
begin
ShellExecute(Handle, nil, 'www.qq.com', nil, nil, SW_SHOWNORMAL);
end;

板凳

whale666 [专家分：0] 发布于 2007-08-01 13:10:00

Label1.Caption:='编程爱好者';
Label1.Hint:='www.programfan.com';

ShellExecute(Handle, nil, pchar(Label1.hint), nil, nil, SW_SHOWNORMAL);

您尚未登录，请登录后再回复。点此登录或注册