2个回答
展开全部
在WebBrowser的onWebBrowser1DocumentComplete事件中进行控制。实际是控制页面的CSS。
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
WebBrowser1.OleObject.Document.Body.Scroll := 'no'; //不显示滚动条
WebBrowser1.OleObject.Document.Body.style.border := 'none'; //不显示边框
end;
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
WebBrowser1.OleObject.Document.Body.Scroll := 'no'; //不显示滚动条
WebBrowser1.OleObject.Document.Body.style.border := 'none'; //不显示边框
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询