WebBrowser ohne Scrollbar und mit Tab

PMTheQuick · Beitrag von **PMTheQuick** » 07.01.2009 19:57

Hi,

aktuell habe ich das hier:

Procedure Webgadget_PostMessage(Gadget.l, wParam, lParam)
  Static FirstCall.l
  If IsGadget(Gadget) And GadgetType(Gadget) = #PB_GadgetType_Web
    If FirstCall = 0
      CoInitialize_(0)
      CoCreateInstance_(?CLSID_IOleInPlaceActiveObject, 0, 1, ?IID_IOleInPlaceActiveObject, @OleObject.IOleInPlaceActiveObject)
      FirstCall = 1
    EndIf
    WebObject.IWebBrowser2 = GetWindowLong_(GadgetID(Gadget), #GWL_USERDATA)
    WebObject\QueryInterface(?IID_IOleInPlaceActiveObject, @OleObject.IOleInPlaceActiveObject)
    web.MSG\message = #WM_KEYDOWN
    web\wParam = wParam
    web\lParam = lParam
    OleObject\TranslateAccelerator(@web)
    OleObject\Release()
  EndIf
EndProcedure

...

WebGadget(0, 0, 0, WindowWidth(0), WindowHeight(0), "http://localhost:8800/")

...

Select EventID
    Case #WM_KEYDOWN
      If EventGadget = 0
        If EventwParam() = #VK_TAB Or EventwParam() = #VK_DELETE
          Webgadget_PostMessage(0, EventwParam(), EventlParam())
        EndIf
      EndIf
  EndSelect

...

DataSection
  IID_IOleInPlaceActiveObject: ; {00000117-0000-0000-C000-000000000046}
  Data.l $00000117
  Data.w $0000, $0000
  Data.b $C0, $00, $00, $00, $00, $00, $00, $46
  CLSID_IOleInPlaceActiveObject: ; {00000320-0000-0000-C000-000000000046}
  Data.l $00000320
  Data.w $0000, $0000
  Data.b $C0, $00, $00, $00, $00, $00, $00, $46
EndDataSection

Und bevor das Prog beendet wird noch: CoUninitialize_()

Ja, es gibt nen Trick. so #PB_Web_Mozilla verwenden, und die Bars sind weg. Ist ja nett! Doch dadurch geht der Tab-Support nicht mehr. Ich will Scrollbars NUR wenn nötig und Tab-Support muss unbedingt gehen. Wie soll ich das anstellen?

Gruss
PMTheQuick

Achja: PB 4.30 Final

KeyKon · Beitrag von **KeyKon** » 08.01.2009 04:15

Den Quelltext der Seite verändern und scroll="no" in das <body> Tag einfügen sollte auf jeden Fall funktionieren, wie das direkt geht weis ich nicht...

Beitrag von **Kiffi** » 08.01.2009 10:11

KeyKon hat geschrieben:Den Quelltext der Seite verändern und scroll="no" in das <body> Tag einfügen sollte auf jeden Fall funktionieren, wie das direkt geht weis ich nicht...

bin mir jetzt nicht ganz sicher, aber vermutlich werden dann die Scrollbars
generell nicht mehr angezeigt (und nicht, wie von PMTheQuick gewünscht,
bei Bedarf eingeblendet).

Grüße ... Kiffi

PMTheQuick · Beitrag von **PMTheQuick** » 08.01.2009 18:13

Kiffi hat geschrieben:
KeyKon hat geschrieben:Den Quelltext der Seite verändern und scroll="no" in das <body> Tag einfügen sollte auf jeden Fall funktionieren, wie das direkt geht weis ich nicht...
bin mir jetzt nicht ganz sicher, aber vermutlich werden dann die Scrollbars
generell nicht mehr angezeigt (und nicht, wie von PMTheQuick gewünscht,
bei Bedarf eingeblendet).

Grüße ... Kiffi

Jupp, genau! Und zudem ist das <body> nicht gut möglich. Wenn jemand über 1000 Dateien anpassen will, gerne! (Bewerbungen per PN ROFL)

Gruss
PMTheQuick

AND51 · Beitrag von **AND51** » 08.01.2009 18:48

PMTheQuick hat geschrieben:Jupp, genau! Und zudem ist das <body> nicht gut möglich. Wenn jemand über 1000 Dateien anpassen will, gerne!

*finger heb*

Es gibt auch Editoren, die in Dateien suchen und ersetzen können. Aber hey, wozu bist du Programmierer?
Ein bisschen ExamineDirectory(), dazu eine Prise OpenFile() und das ganze garniert mi einem Hauch ReplaceString(), das gibt die perfekte Mischung.

Außerdem heißt es nicht scroll="no", sondern scroll="auto", KeyKon!

KeyKon · Beitrag von **KeyKon** » 09.01.2009 08:22

Ich hab erst verstanden er will sie generell weg haben...

Beitrag von **Andesdaf** » 11.01.2009 12:06

AND51 hat geschrieben:
PMTheQuick hat geschrieben:Jupp, genau! Und zudem ist das <body> nicht gut möglich. Wenn jemand über 1000 Dateien anpassen will, gerne!
*finger heb*
Es gibt auch Editoren, die in Dateien suchen und ersetzen können. Aber hey, wozu bist du Programmierer?
Ein bisschen ExamineDirectory(), dazu eine Prise OpenFile() und das ganze garniert mi einem Hauch ReplaceString(), das gibt die perfekte Mischung.

Wie in der Küche

@KeyKon:
> Ich will Scrollbars NUR wenn nötig und [...]