TWebBorwser - страничка из буфера

[OrdJONY]

Можно ли в TWebBrowser отобразить страницу из буфера в памяти? Я к примеру делаю HTML-код в программе, а потом его надо отобразить в браузере. Можно ли такое сделать???

[AlDelta]

А почему нельзя на автомате сохранить HTML-код в какой-нибудь временный файл, а потом его открыть с помощью TWebBrowser? После просмотра фременный фалик прибить.
Мне кажется так проще.

[OrdJONY]

Я тоже так думал, но всетаки хочется сделать чтение из буфера

все я сам нашел решение проблемы, если кому надо то вот код:

Uses ActiveX;
...
Var
 ms : TStream
...
   (WebBrowser.Document as IPersistStreamInit).Load(TStreamAdapter.Create(ms));

[Квэнди]

uses
ActiveX;

procedure WB_LoadHTML(WebBrowser: TWebBrowser; HTMLCode: string);
var
sl: TStringList;
ms: TMemoryStream;
begin
WebBrowser.Navigate('about:blank');
while WebBrowser.ReadyState < READYSTATE_INTERACTIVE do
Application.ProcessMessages;

if Assigned(WebBrowser.Document) then
begin
sl := TStringList.Create;
try
ms := TMemoryStream.Create;
try
sl.Text := HTMLCode;
sl.SaveToStream(ms);
ms.Seek(0, 0);
(WebBrowser.Document as
IPersistStreamInit).Load(TStreamAda pter.Create(ms) );
finally
ms.Free;
end;
finally
sl.Free;
end;
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
WB_LoadHTML(WebBrowser1, 'SwissDelphiCenter');
end;

[OrdJONY]

Именно это я и нашел в DW

[Квэнди]

Ну и в чем проблема ?

[OrdJONY]

Проблем нет никаких