Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#10

Re: Webbrowser Html-code nach dem Laden vor dem Anzeigen änd

  Alt 22. Jun 2006, 20:31
Hier noch ein Puzzle-Teil:

Delphi-Quellcode:
function SaveDocument(doc: IDispatch; const s: TStream): Boolean;
var
  ps: IPersistStreamInit;
  sa: IStream;
begin
  if Succeeded(doc.QueryInterface(IPersistStreamInit, ps)) then
  begin
    sa := TStreamAdapter.Create(s, soReference) as IStream;
    Result := Succeeded(ps.Save(sa, true));
  end;
end;
Wenn du es geschickt einsetzt, dann ist dein Problem gelöst.

marabu
  Mit Zitat antworten Zitat