如何取出自己想要得字符(50)

</b>
<cite><b>coney</b>free.spaces.live.com/ - </cite><span class=gl><a href="htt比如上面我想取出 coneyfree.spaces.live.com 需要怎么操作呢

用正则式很容易取出

写个函数把<>这样格式的字符删除再处理下就可以了！

procedure TForm1.Button1Click(Sender: TObject);var s: string;
p1, p2: Integer;
begin
s := '</b>
<cite><b>coney</b>free.spaces.live.com/ - </cite><span class=gl><a href="htt';
p1 := Pos('<', S);
p2 := Pos('>', S);
while p1 + p2 > 0 do
begin
if (P1 > 0) and (P2 > 0) then
system.Delete(S, P1, P2 - P1 + 1) else
if P1 > 0 then
system.Delete(S, P1, Length(S));
p1 := Pos('<', S);
p2 := Pos('>', S);
end;
p1 := Pos('/', S);
if P1 > 0 then
system.Delete(S, P1, Length(S));
showmessage(s);
end;

将此代码用WEBBRROWSE显示,然后把显示结果存成文本,再读进来

同意楼上，WEBBRROWSer本身应该有存网页文本的功能。查资料看看