这是哪错了(20分)

  • 主题发起人 主题发起人 angel725
  • 开始时间 开始时间
A

angel725

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
begin
web.Navigate('mail.163.com');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Web.OleObject.document.all.item('username',0).value := 'a';
Web.OleObject.document.all.item('password',0).value := 'b';
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
Web.OleObject.document.all.item('登陆邮箱',0).click;
end;
点前两个按钮没问题,点button3时,就出来一个框:
Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 0045424F in module 'Project1.exe'. Read of address 00000000'. Process stopped. Use Step or Run to continue.
这是哪错了??
 
没玩过这方面的,手头又没有delphi,帮你找了一下
http://bbs.2ccc.com/topic.asp?topicid=288681
不过我怀疑是不是应该用id呢?
Web.OleObject.document.all.item('btn1',0).click;
或者就是跟编码问题有关了
 
对,用id click
 
后退
顶部