TWebbrowser / TMultiview

[Darlo]

Hi,

hier das Beispiel zu meinem Ansatz.

Delphi-Quellcode:

procedure TForm1.MultiView1StartHiding(Sender: TObject);
begin
  img.free;
  webbrowser1.Visible := true;
end;

procedure TForm1.MultiView1StartShowing(Sender: TObject);
begin
  img := TImage.Create(self);
  img.Parent := laContent;
  img.Align := TAlignLayout.AlClient;
  img.Bitmap :=  webbrowser1.MakeScreenshot;
  webbrowser1.Visible := false;
end;