Webbrowser für Voransicht

[MaxMara]

Hallo Gemeinde!
Gibt es bei der Webbrowser-Komponente die Möglichkeit Quelltext von einem Memo als Voransicht anzeigen zu lassen? Wenn möglich sollte man nicht den HTML-Code zwischenspeichern.

Danke und Grüße
Christian

Edit: Suche hab ich verwendet und diesen Beitrag gefunden: http://www.delphipraxis.net/internal...t.php?t=121432, weiss aber nicht, ob das für mich genau die richtige Lösung ist.

[FAlter]

Hi,

ein weiterer Vorschlag wäre, wenn du nicht unbedingt den InternetExplorer verwenden möchtest, diese Komponenten hier:

http://www.pbear.com/htmlviewers.html#download

Ist aber etwas buggy und insbesondere nicht ganz up-to-date. Und die Weiterentwicklung wurde eingestellt. :(

Hat eine Methode, um aus TStrings zu laden, sollte damit also kein Problem sein.

Mfg
FAlter

[MaxMara]

Zitat:

Zitat von FAlter

Hi,

ein weiterer Vorschlag wäre, wenn du nicht unbedingt den InternetExplorer verwenden möchtest, diese Komponenten hier:

http://www.pbear.com/htmlviewers.html#download

Ist aber etwas buggy und insbesondere nicht ganz up-to-date. Und die Weiterentwicklung wurde eingestellt. :(

Hat eine Methode, um aus TStrings zu laden, sollte damit also kein Problem sein.

Mfg
FAlter

Super, funktioniert einwandfrei damit.
Danke!!

[toms]

Hallo, mit dem Webbrowser wäre dies natürlich auch möglich.
Du Könntest es so machen:

Delphi-Quellcode:

procedure WBLoadHTML(WebBrowser: TWebBrowser; HTMLCode: string) ;
// [url]http://delphi.about.com/cs/adptips2004/a/bltip0104_4.htm[/url]
var
   sl: TStringList;
   ms: TMemoryStream;
begin
   WebBrowser.Navigate('about:blank') ;
   while WebBrowser.ReadyState < READYSTATE_INTERACTIVE do
    Application.ProcessMessages;

   if Assigned(WebBrowser.Document) then
   begin
     sl := TStringList.Create;
     try
       ms := TMemoryStream.Create;
       try
         sl.Text := HTMLCode;
         sl.SaveToStream(ms) ;
         ms.Seek(0, 0) ;
         (WebBrowser.Document as IPersistStreamInit).Load(TStreamAdapter.Create(ms)) ;
       finally
         ms.Free;
       end;
     finally
       sl.Free;
     end;
   end;
end;

// Aufruf:

Delphi-Quellcode:

  WBLoadHTML(WebBrowser1, Memo1.Text) ;

[MaxMara]

Danke Toms,
jetzt bin ich wirklich am überlegen, welche von den beiden Varianten ich verwenden soll.
Diese ThtmlViewer Komponente ist doch schon etwas älter und ich weiss nicht (bzw. hab noch nicht rausgefunden) welche Standards sie unterstützt...

EDIT: Habe mich für Toms Variante entschieden. ThtmlViewer unterstützt nur sehr wenige CSS Styles.

Danke noch mal an alle Beteiligten :)

[FAlter]

Hi,

Zitat:

Version 9 of these components supports most of the HTML 3.2 specifications with many additional popular HTML 4 enhancements. Many Cascading Style Sheet properties are also supported.

Sehr schwammig formuliert (most, many). Und noch kein XHTML, soweit es nicht abwärtskompatibel ist.

Zitat:

* Cascading Stylesheets
* Frames
* Bitmap, GIF, PNG, and JPEG Images
o Animated GIFs
o Transparent images
o Image caching
o Left and right floating images
o Image sizing attributes
o Client side image maps
* Large HTML files
* HTML Tables
* HTML Forms
* Font sizes, styles, and colors with HTML tags or default settings
* Background colors and images
* Formatted printing of the HTML document
* Print preview
* Text search
* Copy to clipboard
* Subscripts and superscripts

Dafür bist du vom IE unabhängig. Mich selbst swtört es vor allem, wenn ich in einem Programm (z. B. in Delphis Hilfe) einen Link anklicke und sich dieser im IE und nicht im FF öffnet. Bei Mozillas ActiveX-Control hingegen kannst du dich nicht darauf verlassen, dass es jeder User hat. (Und bei ReactOS (aber davon muss man ja noch gar nicht reden) oder Wine auch nicht auf den IE. In Wine ist allerdings auch die Komponente noch etwas mehr Buggy, bzw. das fällt mehr auf.)

Mfg
FAlter