🚀 go-pugleaf

Rajmund Wrotek napisał(a):


> Walczę z problemem otwierania plików ze strumienia w obiekcie webbrowser.
> Mam bazę danych gdzie trzymam w polu blob pliki html, pdf, rtf.
> Chciałbym otworzyć i wyświetlić wskazany przeze mnie plik w obiekcie 
> webbrowser i tu pojawia sięproblem.
> Z tego co się doczytałem webbrowser umożliwia wszystko z wyjątkiem 
> wyświetlania czegoś ze strumienia.
> 
> Uprzejmie prosze (jeżeli to możliwe) o jakiś przykład czy i jak tego 
> dokonać.

Polecalem kompoment na grupie poswieconej tylko delphi, tutaj dalej bede 
przy swoim :)

Embedded Web Browser
http://bsalsa.com/downloads.html

Naprawde polecam, dodam ze to nie jest platny komponent.

A to przyklad zapisu i odczytu ktory sotuje w swojej aplikacji:

.......................
Zapis:

var
   lStream :TMemoryStream;
begin
  try
   lStream:=TMemoryStream.Create;
   EmbeddedWB1.SaveToStream(lStream);
   IBDataSet1.Insert;
   IBDataSet1.FieldByName('id_X').AsInteger:=8888;
   TBlobField(IBDataSet1.FieldByName('HTML')).LoadFromStream(lStream);
   IBDataSet1.Post;
   IBDataSet1.CommitRetaining;
  finally
   FreeAndNil(lStream);
  end;
end;

.......................
Odczyt:

  var
   lStream :TMemoryStream;
begin
  try
   lStream:=TMemoryStream.Create;
   TBlobField(IBDataSet1.FieldByName('HTML')).SaveToStream(lStream);
   lStream.Position:=0;
   EmbeddedWB1.WorkOffline;
   EmbeddedWB1.ClearTypedUrls;
   if not EmbeddedWB1.DocumentLoaded then 
EmbeddedWB1.Navigate('about:blank');
   EmbeddedWB1.LoadFromStream(lStream);
  finally
   FreeAndNil(lStream);
  end;
end;

-- 
PozDR.