遍历网页中的所有元素(200分)

Y

yifeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-03

• #1

var
i,j,len:integer;
elec:IHTMLElementCollection;
doc:ihtmldocument2;
begin
doc:= webbrowser1.document as IHtmlDocument2;
elec:= doc.all;
for i:= 0 to elec.length-1 do begin
memo1.lines.add(IHTMLElement(elec.item(i,emptyparam)).tagname);
end;
end;


却得到了Access violation

elec.item(i,emptyparam) 到底该怎么用？

 

G

goddy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-04

• #2

一個一個的調試

 

Y

yifeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-14

• #3

什么意思？不懂？

 

C

control

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-15

• #4

item(i,0)

 

程

程云

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-15

• #5

"IHTMLElementCollection" 这是个是什么？

在哪里有声明？

 

Y

yifeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-23

• #6

mshtml

 

Y

yifeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #7

各位老大，看看吧！

 

X

xygz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #8

这是我在用的一段程序，找相关的文件怎么也找不到，
item要用例外的参数吗？

procedure TForm1.WebBrowser1DownloadComplete(Sender: TObject);
var T : OleVariant;
i : Integer;
begin
t:= WebBrowser1.Document;
t.all.item(36).value:='xxx';
t.all.item(47).value:='xxxx';
t.all.item(61).click;
end;

 

J

j_shen2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-24

• #9

这是典型的接口类型匹配错误，先试一试AS一下，下面修改调试通过。
procedure TForm1.Button1Click(Sender: TObject);
var
i,j,len:integer;
elec:IHTMLElementCollection;
doc:ihtmldocument2;
chele:IHTMLElement;
begin
doc:= webbrowser1.document as IHtmlDocument2;
elec:= doc.all;
for i:= 0 to elec.length-1 do begin
//memo1.lines.add(IHTMLElement(elec.item(i,emptyparam)).tagname);
chele:=elec.item(i,emptyparam) as IHTMLElement;
memo1.Lines.Add(chele.tagname);
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
webbrowser1.Navigate('C:/TEMP/FILE0.HTML');
end;

 

J

j_shen2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-26

• #10

发分了？

 

Y

yifeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-09-26

• #11

你催的还真紧 ：-）