Как загрузить потоковые(stream) данные в WebBrowser не прибегая к открытию файла

Благодарю за поддержку!

		Новости сайта
		Новости форума

Архив исходников

Automatic translation

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Как загрузить потоковые(stream) данные в WebBrowser не прибегая к открытию файла

Автор: Per Larsen

function TForm1.LoadFromStream(const AStream: TStream): HRESULT;
begin
  AStream.seek(0, 0);
  Result := (WebBrowser1.Document as 
          IPersistStreamInit).Load(TStreamAdapter.Create(AStream));
end;