D Dusy Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-02 #1 怎样截获webbrowser的"找不到服务器","该页无法显示","无权访问"等事件?
E e- Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-02 #2 OnBeforeNavigate2 或 OnDocumentComplete 事件判断URL OnTitleChange事件判断Text
D Dusy Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-08 #4 to e- 请问怎样在Titlechange中截获网页的Title.能否给出具体代码.谢谢.
B bundur Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-08 #6 procedure TForm1.WebBrowser1TitleChange(Sender: TObject; const Text: WideString); begin Caption := Text; // 把网页的Title赋给 Form1 的 Caption end;
procedure TForm1.WebBrowser1TitleChange(Sender: TObject; const Text: WideString); begin Caption := Text; // 把网页的Title赋给 Form1 的 Caption end;