AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Arbeitsverzeichnis für TWebBrowser
Thema durchsuchen
Ansicht
Themen-Optionen

Arbeitsverzeichnis für TWebBrowser

Ein Thema von mirage228 · begonnen am 3. Jan 2006 · letzter Beitrag vom 3. Jan 2006
Antwort Antwort
Benutzerbild von mirage228
mirage228

Registriert seit: 23. Mär 2003
Ort: Münster
3.750 Beiträge
 
Delphi 2010 Professional
 
#1

Arbeitsverzeichnis für TWebBrowser

  Alt 3. Jan 2006, 21:19
Hallo,

Ich verwende die Prozedur WB_LoadHTML aus der Code-Library , um Quellcode dynamisch in einen TWebBrowser zu laden.
Wenn dieser Quelltext nun Pfadangaben enthält, z.B. [img]ab.jpg[/img], würde bei einer Datei dieses Bild ja aus dem zu dieser Datei relativen Verzeichnis geladen, was bei dynamischen Inhalten ja nun nicht geht, weil es kein Ausgangsverzeichnis gibt. Das Bild wird dann logischer Weise nicht angezeigt (Source für das Bild ist about:blankab.jpg).

Gibt es eine Möglichkeit dem TWebBrowser ein Standard bzw. Arbeitsverzeichnis via Delphi Code zu verpassen, um dieses Problem zu umgehen?

mfG
mirage228
David F.

May the source be with you, stranger.
PHP Inspection Unit (Delphi-Unit zum Analysieren von PHP Code)
  Mit Zitat antworten Zitat
marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Arbeitsverzeichnis für TWebBrowser

  Alt 3. Jan 2006, 21:46
Hallo David,

hast du schon einmal versucht deinem HTML-Code vor dem dynamischen Laden ein passendes base tag zu verpassen?

Neujahrsgrüße vom marabu
  Mit Zitat antworten Zitat
Benutzerbild von Lannes
Lannes

Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
 
Delphi 3 Professional
 
#3

Re: Arbeitsverzeichnis für TWebBrowser

  Alt 3. Jan 2006, 22:17
Hallo,

@marabu:
guter Tipp mit base-Tag ,hab ich auch schon gesucht und es funktioniert:
WB_LoadHTML(WebBrowser1,'<base href="c:/temp/test/">[img]ab.jpg[/img][img]../images.jpg[/img]');
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
  Mit Zitat antworten Zitat
Benutzerbild von mirage228
mirage228

Registriert seit: 23. Mär 2003
Ort: Münster
3.750 Beiträge
 
Delphi 2010 Professional
 
#4

Re: Arbeitsverzeichnis für TWebBrowser

  Alt 3. Jan 2006, 23:07
Hi marabu,

Super, das funktioniert, Danke sehr

mfG
mirage228
David F.

May the source be with you, stranger.
PHP Inspection Unit (Delphi-Unit zum Analysieren von PHP Code)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:10 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz