html in memo

[himitsu]

meine uralte Billigmethode ginge auch noch und andere Varianten sind in dem Thread da ebenfalls zu sehn

Delphi-Quellcode:

If WebBrowser1.Document = nil Then WebBrowser1.Navigate('about:blank');
With OleVariant(WebBrowser1.Document as IHTMLDocument2) do Begin
  Clear;
  Write(DeinString);
  Close;
End;