Question

delphi 如何获取网页中的文字信息

我想在网页中的某个 特定窗口的文字 关键字进行分析，需要调用哪个控件，代码应该怎么写？ 我用的是delphi 7，

Answer 1

网页中特定窗口的文字，这个要根据具体特定窗口的类型来定，比如，如果是flash窗口，那么这个获取就比较困难。

如果是普通的页面文字（全文字），可以用webbrowser控件或是其他网络控件（如tcpclient）获取。

Answer 2

看你的意图，不需要处理大量的数据，那么WebBrowser就可以了
Memo1.Lines.Add(IHtmlDocument2(WebBrowser1.Document).Body.OuterHtml);
这段语句可以直接取网页源代码
或者你可以使用WebBrowser的Document对象的IPersistStreamInit接口

Answer 3

用idhttp：uses IdHTTP;
function GetWebPage(const Url :string; IsUtf8 :Boolean = False):string;
var
idp :TIdHTTP;
begin
Result := '';
idp := TIdHTTP.Create(Application);
try
idp.HandleRedirects := True;
idp.Request.UserAgent := 'Mozilla/5.0';
Result := idp.Get(Url);
if IsUtf8 then
Result := Utf8ToAnsi(Result);
finally
FreeAndNil(idp);
end;
end;
//当网页编码是utf8时,第2个参数请为true,要不汉字会出现乱码
ShowMessage(GetWebPage(Load_web_update + '/SysUpFiles.htm'));