Hallo,
funktioniert bei mir einwandfrei:
Delphi-Quellcode:
procedure TWebForm.WebBrowserDocumentComplete(Sender: TObject;
const pDisp: IDispatch;
var URL: OleVariant);
begin
if pDisp = WebBrowser.DefaultInterface
then
WebBrowser.OleObject.Document.body.scroll := '
no';
end;
Grüße vom marabu