求指导！！！如何判断一段字符为链接

控件Tpanel中的文本，如果出现类似“Http：//……”，怎么才能让这一段字符串显示为超链接，点击这个链接能够自动调用IE浏览器？？

谢谢

[解决办法]
正则表达式
[解决办法]
怎么判断还是怎么显示？
判断：pos(s,'://')>1
显示：使用label，它的click事件里执行ie，参数为caption
[解决办法]

Delphi(Pascal) code

function IsValidWebAddr(const AUrl: string): Boolean;var  s: string;begin  s := LowerCase(AUrl);  Result := (Pos('ed2k://', s) = 1) or (Pos('http://', s) = 1) or (Pos('ftp://',    s) = 1) or    (Pos('file://', s) = 1) or (Pos('https://', s) = 1) or    (Pos('mailto:', s) = 1) or (Pos('news:', s) = 1) or    (Pos('www.', s) = 1) or (Pos('ftp.', s) = 1);end;
[解决办法]
如果要这个URL是否可连接的, 用SOCKET去测试连接下就行了,INDY, WINNET也行  

[解决办法]
正则表达式不二选择

可以搜索网上教程，N多
[解决办法]
对符合链接条件的label加下划线，和点击事件。
点击时，用shellexecute执行链接命令就可以了