Перейти к содержанию
Fire Monkey от А до Я

fabiano Bom dia

Пользователи
  • Постов

    4
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные fabiano Bom dia

  1. I used this code, but when I slide the webbrowser is in front.

    procedure TForm1.MultiView1StartHiding(Sender: TObject);
    begin
      img.free;
      webbrowser1.Visible := true;
      MultiView1.Visible := False;
    end;
    
    procedure TForm1.MultiView1StartShowing(Sender: TObject);
    begin
      img := TImage.Create(self);
      img.Parent := Layout2;
      img.Align := TAlignLayout.AlClient;
      img.Bitmap :=  webbrowser1.MakeScreenshot;
      webbrowser1.Visible := false;

     

×
×
  • Создать...