Delphi TWebBrowser - загрузить Html из строки

Окружение: Delphi 7

Задача

загрузить в компонент TWebBrowser Html из строки

Решение

procedure THTMLEdit.EditText(CONST HTMLCode: string);
var
  Doc: Variant;
begin
  if NOT Assigned(wbBrowser.Document) then
    wbBrowser.Navigate('about:blank');

  Doc := wbBrowser.Document;
  Doc.Clear;
  Doc.Write(HTMLCode);
  Doc.Close;
end;

Взял отсюда:
http://stackoverflow.com/questions/39773033/which-is-the-best-way-to-load-a-string-html-code-in-twebbrowser

Доп. информация

Еси Вы хотите узнать, как получить Html из TWebBrowser, Вам сюда:
Как получить отредактированный HTML из TWebBrowser