Delphi-PRAXiS - Delphi TWebBrowser: Scrollbars *wirklich* ausblenden

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi TWebBrowser: Scrollbars *wirklich* ausblenden (https://www.delphipraxis.net/79065-twebbrowser-scrollbars-%2Awirklich%2A-ausblenden.html)

Meflin

15. Okt 2006 20:10

TWebBrowser: Scrollbars *wirklich* ausblenden

Moin moin!

Ich habe eine TWebBrowser-Instanz. Diese soll in keinem Fall niemals wirklich nie eine Scrollbar anzeigen. Es sei dazugesagt dass ich über alle darin anzuzeigenden HTML-Dokumente volle Kontrolle habe.

Nun habe ich sschon so einiges versucht, was sich da so an Tipps finden lässt.

Delphi-Quellcode:

			wb.OleObject.Document.Body.Style.OverflowY:='hidden';

wb.OleObject.Document.Body.Style.OverflowX:='hidden';

Ergebnis: die Scrollbalken sind da.

Delphi-Quellcode:

wb.OleObject.Document.Body.Scroll := 'no';

Ergebnis: die Scrollbalken sind da.

Code:

			<style type="text/css">

<!--

body {

   border: none;

   overflow: hidden

}

-->

</style>

Ergebnis: die Scrollbalken sind da.

:wall:

Wie bekomme ich diese dummen Geisterbalken (sie werden ja nichtmal gebraucht da es nichts zu scrollen gibt) *wirklich* weg, ich bin so langsam am verzweifeln :cry:

Matze

15. Okt 2006 20:21

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Hi,

wann rufst du

Delphi-Quellcode:

			wb.OleObject.Document.Body.Style.OverflowY:='hidden';

wb.OleObject.Document.Body.Style.OverflowX:='hidden';

auf? Soweit ich weiß funktioniert das nur, wenn bereits eine Seite im TWebBrowser geladen ist.

Meflin

15. Okt 2006 20:22

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Moin,

ich habe es im OnDocumentComplete und manuell via Button-Click versucht, es funktioniert beide male nicht!

marabu

15. Okt 2006 21:02

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

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

Meflin

16. Okt 2006 13:38

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Geht nicht, war ja auch bei den Möglichkeiten schon dabei, der Scrollbalken wird angezeigt.

BTW: ich habe IE 6 ;)

marabu

16. Okt 2006 13:45

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Ich auch.

Grüße

Meflin

16. Okt 2006 13:47

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Zitat:

Zitat von marabu

Ich auch.

:wall: woran zum Geier könnte das dann noch liegen? :stupid:

marabu

16. Okt 2006 14:05

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Vielleicht hast du zuviel herumprobiert und jetzt finden sich in deinem Code Relikte aller deiner Ansätze, die sich gegenseitig stören. Versuche doch deinen bestehenden Code etwas aufzuräumen. Irgendwann sollte dann der von mir verwendete Code auch bei dir funktionieren.

Grüße

Meflin

17. Okt 2006 14:11

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Ich habe jetzt alles doppelt und dreifach kontrolliert: da ist keine andere Code-Leiche! Aber vielleicht hast du ja noch was drin, was mir fehlt :stupid:

Ansonsten weis ich wirklich nicht mehr weiter...

marabu

18. Okt 2006 20:35

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Liste der Anhänge anzeigen (Anzahl: 1)

Hallo,

Zitat:

Zitat von Meflin

Aber vielleicht hast du ja noch was drin, was mir fehlt

kann ich mir nicht vorstellen, aber schau ruhig mal nach.

Gute Nacht

marabu

EWeiss

18. Okt 2006 21:14

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Funktioniert!
Habe es mal zu Testzwecken geladen..
Benutze auch IE6

gruß

Meflin

19. Okt 2006 14:18

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Interessanterweise funktioniert das bei mir auch wenn ich z.B. die DP mit dem TWebBrowser an-surfe, aber nicht, wenn ich das lokale HTML-Dokument aufrufe :gruebel:

Code:

			<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

<title>Untitled Document</title>

</head>

<body>

  <font color="#000000">Blubber</font> <font color="#CDCDCD">Blubber</font>

  <font color="#000000">Blubber</font> <font color="#CDCDCD">Blubber</font>

  [img]design/screen.jpg[/img][img]design/held.jpg[/img]

  [img]design/info.jpg[/img]

</body>

</html>

Das ist der komplette Quelltext, da ist doch wirklich NICHTS was diese Scrollbar erklären würde :cry:

EWeiss

19. Okt 2006 14:42

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Auch Lokal funktioniert es bei mir :(

Zitat:

file://D:\wb-scroll\winampmb.htm

Kann kein Problem feststellen.

Deine Html allerdings nicht.

EDIT:
Das ist der Fehler

Zitat:

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

Schmeiß die zeile raus dann gehts!

Steht diese Zeile in meinen Document siehe oben ! Dann geht auch dieses nicht mehr!
Jetzt frag mich nicht warum. KA

Habe es nochmal geprüft. Denke der Browser nimmt das Dokument nicht mehr als html Format an.
Nur wenn das Document mit html anfängt und endet dann funktioniert der code.

Nur wenn du den ersten aufruf <html> über diese Zeile setzt dann funktioniert es auch damit.

Zitat:

<html xmlns="http://www.w3.org/1999/xhtml">
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
</head>

<body>
Blubber Blubber

Blubber Blubber

[img]design/screen.jpg[/img][img]design/held.jpg[/img]
[img]design/info.jpg[/img]
</body>
</html>

gruß

Meflin

19. Okt 2006 16:26

Re: TWebBrowser: Scrollbars *wirklich* ausblenden

Danke, jetzt geht das bei mir auch. Verstehen soll das wer will, ich jedenfalls nciht :mrgreen:

Damit wäre dieses - etwas seltsame - Problem auch gelöst :)

Alle Zeitangaben in WEZ +1. Es ist jetzt 17:06 Uhr.