就是沒辦法判斷該網頁是否下載完畢。參考了網上代碼:
procedure TForm1.WebBrowser1NavigateComplete2(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
if glpDisp = nil then glpDisp := pDisp;
end;
3、DocumentComplete 事件寫如下代碼
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
if (glpDisp <> nil) and (glpDisp = pDisp) then
begin
glpDisp := nil;
ShowMessage('完成');
end;
end;
該如何解決?謝謝!
uj5u.com熱心網友回復:
WebBrowser1.isbusyWebBrowser1.state<>complete
具體的沒記住
uj5u.com熱心網友回復:
這個代碼下載別的一些網頁的代碼可以,但對money.163.com這個就不行,不知為啥?uj5u.com熱心網友回復:
建議使用Embedded Web Browser獲取原始碼僅一句代碼:EmbeddedWB.DocumentSource
uj5u.com熱心網友回復:
試過了,獲取money.163.com原始碼成功。uj5u.com熱心網友回復:
我試一下看看uj5u.com熱心網友回復:
建議使用Embedded Web Browser獲取原始碼僅一句代碼:EmbeddedWB.DocumentSource
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/80240.html
標籤:VCL組件開發及應用
