HTML in TWebBrowser injizieren

**Die Muhkuh**

Hi marabu,

ich hab es eben getestet, leider funktioniert es nicht:

Delphi-Quellcode:

			procedure TfrmMain.Vorschau1Click(Sender: TObject);

var

  frmPreview: TfrmPreview;

  tmp: String;

begin

  frmPreview := TfrmPreview.Create(Application);

  tmp := '<html><head></head><body>';

  tmp := tmp + TConverter.ConvertBBtoHTML(reEditor.Text);

  tmp := tmp + '</body></html>';

  try

    frmPreview.wbBrowser.OleObject.Open('about:blank', '_blank');

    frmPreview.wbBrowser.OleObject.Clear;

    frmPreview.wbBrowser.OleObject.WriteLn(tmp);

    frmPreview.wbBrowser.OleObject.Close;

    frmPreview.ShowModal;

  finally

    frmPreview.Free;

  end; 

end;

Fehlermeldung:

markieren

Code:

			---------------------------

Benachrichtigung über Debugger-Exception

---------------------------

Im Projekt Projekt1.exe ist eine Exception der Klasse EOleError mit der Meldung 'Die Methode 'Open' wird vom Automatisierungsobjekt nicht unterstützt' aufgetreten.

---------------------------

Anhalten   Fortsetzen   Hilfe   

---------------------------

HTML in TWebBrowser injizieren

Re: HTML in TWebBrowser injizieren

Forumregeln