Question

怎样用Delphi 来读取网页特定标签里的字符串

我用Delphi 7 内嵌网页(WebBrowser控件),打开一个网页，我想通过程序得到指定网页元素特征里的文字字符串.通过网页分析软件得知：tag:FONT&txt:雍正五年&index:1    我想用Delphi程序来读取“雍正五年”(注:里面的字符是随机的) 请问要怎样写代码?

Answer 1

var
doc,frm: IHTMLDocument2;
iw: IWebbrowser2;
//userinputelement: IHTMLInputElement;
//str: string;
strlist: TStringList;
begin
//进行地图扫描
doc := WebBrowser1.Document as IHTMLDocument2;
iw := GetFrame(1);
frm := iw.Document as IHTMLDocument2;
strlist := TStringList.Create;
Memo1.Lines.Clear;
Memo1.Lines.Add(frm.body.innerHTML);
Memo1.Lines.SaveToFile('1.txt');
strlist.LoadFromFile('1.txt');
//SplitMapxy(strlist);
//FreeAndNil(strlist);
end;

然后从字符串中分解出来