怎样截获webbrowser的"找不到服务器","该页无法显示"等事件?(100分)

  • 主题发起人 主题发起人 Dusy
  • 开始时间 开始时间
D

Dusy

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样截获webbrowser的"找不到服务器","该页无法显示","无权访问"等事件?
 
OnBeforeNavigate2 或 OnDocumentComplete 事件判断URL
OnTitleChange事件判断Text
 
如果是6.0可以用navigatorerror
 
to e-
请问怎样在Titlechange中截获网页的Title.能否给出具体代码.谢谢.
 
能否说的明白点?
 
procedure TForm1.WebBrowser1TitleChange(Sender: TObject;
const Text: WideString);
begin
Caption := Text; // 把网页的Title赋给 Form1 的 Caption
end;
 
后退
顶部