使用TLDHTTP处理网页的有关问题.
我想使用TLDHTTP向一个地址发出请求,然后对返回的网页代码进行处理,得到其中SWF文件的地址,然后下载,但是得到的字符串总是不正确.
function gethtml(skt: TIdHTTP; id: Integer; url: string): string;
var
html: string;
tempstr: string;
strstart,strend:integer;
begin
result:='';
html:=stringreplace(skt.Get(url),' ','',[rfReplaceAll]);//得到返回的HTML
if html<>'' then
begin
if AnsiContainsText(html, '<embed') then//查找是否有该标记,由于我对这个网页的内容比较了解,整个网页只有一个这样的标记
begin
if pos('<embed',html)>0 then
strstart:= pos('<embed',html)//得到开始位置
else
exit;
if pos('quality=high',html)>0 then
strend:= pos('quality=high',html)//得到结束位置
else
exit;
if strend>strstart then
result:=MidStr(html,strstart+10,strend-strstart)//得到开始位置与结束位置之间的字符
end;
end
else
result := '为空';
end;
现在返回的字符串总是不对,竟然在结束的字符串之后.我想可能是空格,换行,或者是汉字的原因,请各位前辈帮忙看看.
问题点数:20、回复次数:0Top




