🚀 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 komponent 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 stosuje 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.