Пытаюсь загрузить текст из memo в webbrowser, но
Код:
procedure TForm1.Button1Click(Sender: TObject);
var Astream:Tstream;
begin
memo1.Lines.SaveToStream(Astream);
AStream.seek(0, 0);
(WebBrowser1.Document as IPersistStreamInit).Load(TStreamAdapter.Create(AStream));
end;
при нажатии на кнопку вылазит ошибка "access violation at adress ..."
Что не так?
