请问,如何在一条字符串中把网址提出来,请指教.

Question

var
d:string;
begin
d:='asdfasdfasdfhttp://www.csdn.comsafdfasdfasdfasfd';
请问如何把 http://www.csdn.com 这个网址提出来呢?
end;

Answer 1

http:// 优先级1
www.优先级2
其他情况不管；
你的 'asdfasdfasdfhttp://www.csdn.comsafdfasdfasdfasfd' 只能被识别http://www.csdn.comsafdfasdfasdfasfd ，因为尾部没空格字符，除非你做个.com .org 之类的列表；搜索方式是先匹配最优的字符，如果没找到，则定位www.，定位后开始截取后面的字符一直到空格即可。其他很多乱七八糟的url方式不用考虑，都是不标准的，不信你可以输入到ie 地址栏，它并不解释这个。

Answer 2

跟楼上的意见差不多
先有一个前缀的标准，如
http://
www.
再有一个后缀的标准，如
.com
.net
.cn
.org
然后就找呗，找到头，再找到尾，中间的就是了。对字符串的操作用Pos,Copy等函数
当然，最主要的还是具体问题具体分析，比如是否需要提取多个网址等...

Answer 3

用 Pos,Copy 函数提取，自己判断