TWebBrowser-Problem

Heyho.. ich habe ein kleines Problem mit dem TWebBrowser.
Es geht darum, HTML-Code im Browser anzeigen zu lassen.

prozedur:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure LoadHTMLToWebbrowser(AWebBrowser: TWebBrowser;

AHTMLCode: TWideStrings); // ehemals TStrings

var

  myDocument:OleVariant;

begin

  //falls nötig, leere Seite anzeigen

  if AWebBrowser.Document = nil then

  AWebBrowser.Navigate('about:blank');

  //HTML-Code in TWebBrowser.Document schreiben

  myDocument:=AWebBrowser.Document;

  myDocument.Clear;

  myDocument.Write(AHTMLCode.Text);

  myDocument.Close;

end;

LoadHTMLToWebBrowser(WebBrowser1,SynMemo1.Lines); // Fehler hier [Fehler] Unit1.pas(46): E2010 Inkompatible Typen: 'WideStrings.TWideStrings' und 'SynUnicode.TWideStrings'

WideStrings steht in der Uses-Klausel.

Dann hatte ich es noch mit dem hier Probiert:
code := WebBrowser1.OleObject.Document.Body.InnerHtml; Aber dagibts eine Zugriffsverletzung.

TWebBrowser-Problem

TWebBrowser-Problem

Forumregeln