{Eine Seite muss bereits in TWebBrowser geladen sein} {A page must be loaded into TWebBrowser} procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.OleObject.Document.Body.Style.OverflowX := 'hidden'; WebBrowser1.OleObject.Document.Body.Style.OverflowY := 'hidden'; end;
{A page must be loaded into TWebBrowser} procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.OleObject.Document.Body.Style.OverflowX := 'hidden';
WebBrowser1.OleObject.Document.Body.Style.OverflowY := 'hidden';
end;
在<body后加上scroll=no就可以了
<body scroll=no>