怎样在form里加一个网页或email的超链接

Question

为什么不看以前的帖子呢？？

Answer 1

实现超级链接
在程序中实现打开浏览器，打开邮件程序的功能首先要在uses部分加入uses Shellapi;
接着在需要超级链接的地方使用
ShellExecute(handle,nil,pchar('mailto:[email protected]'),nil,nil,sw_shownormal);
其中pchar()中的mailtos是打开邮件程序的，可以换成http://、ftp://、gopher://、new:、telnet:等多种形式
实现打开文件
打开Windows已经注册的文件其实很简单，根据以下代码定义一个过程：
procedure URLink(URL:PChar);
begin
ShellExecute(0, nil, URL, nil, nil, SW_NORMAL);
end;
在要调用的地方使用
URLink('Readme.txt');
如果是链接主页的话，那么改用
URLink('http://gui.yeah.net');