TEmbeddedWB 讓 WebBrowser 當出現 forbidden 錯誤時不要在顯示 Dialog
procedure TForm1.EmbeddedWB1forbiddenError(Sender: TObject; ErrorLine,
ErrorCharacter, ErrorCode, ErrorMessage, ErrorUrl: String;
var Continueforbidden, Showdialog: Boolean);
begin
Continueforbidden :=true;//繼續執行腳本
Showdialog :=false; //不顯示腳本錯誤訊息視窗
end;
procedure TForm1.EmbeddedWB1forbiddenError(Sender: TObject; ErrorLine,
ErrorCharacter, ErrorCode, ErrorMessage, ErrorUrl: String;
var Continueforbidden, Showdialog: Boolean);
begin
Continueforbidden :=true;//繼續執行腳本
Showdialog :=false; //不顯示腳本錯誤訊息視窗
end;
全站熱搜
留言列表