Jump to content


Photo

Скопировать в BMP,JPEG содержимое UniURLFrame


  • Please log in to reply
11 replies to this topic

#1 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 28 June 2018 - 12:30 PM

Можно ли скопировать в BMP,JPEG содержимое UniURLFrame?


  • 0

#2 Delphi Developer

Delphi Developer

    Advanced Member

  • Moderators
  • 5168 posts

Posted 28 June 2018 - 12:47 PM

Добрый день,

 

Возможно Вам поможет этот демо пример ?:

 

\FMSoft\Framework\uniGUI\Demos\Desktop\HTML2Image


  • 0

#3 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 28 June 2018 - 12:49 PM

Спасибо!


  • 0

#4 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 28 June 2018 - 01:08 PM

Но это не технологично( Exe!   А к Canvas страницы можно как то долезть?

 

Можно ли адаптировать:

 

 

var
  bm: TBitmap;
  ViewObject: IViewObject;
  SRect: TRect;
  JPEG:TJPEGImage;
begin
   if Browser.Document <> nil then
   try
      Browser.Document.QueryInterface( IViewObject, ViewObject );
      if ViewObject <> nil then
      try
         bm := TBitmap.Create;
         bm.Width := Browser.Width;
         bm.Height := Browser.Height;
         SRect := Rect( 0, 0, bm.Width, bm.Height );
         ViewObject.Draw( DVASPECT_CONTENT, 1, nil, nil, Browser.Handle,
                          bm.Canvas.Handle, @SRect, nil, nil, 0 );
 
         //===========
         JPEG:=TJPEGImage.Create;
         JPEG.Assign(bm);
         JPEG.SaveToFile( Path );
         JPEG.Free;
         //===========
         finally
         bm.Free;
         ViewObject._Release;
      end;
   except
   end;

  • 0

#5 Delphi Developer

Delphi Developer

    Advanced Member

  • Moderators
  • 5168 posts

Posted 28 June 2018 - 01:10 PM

Если не трудно Вам, сделайте простой тестовый случай


  • 0

#6 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 03 July 2018 - 10:11 AM

Добрый день! Сделал


  • 0

#7 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 03 July 2018 - 10:12 AM

Вот файл

Attached Files


  • 0

#8 Delphi Developer

Delphi Developer

    Advanced Member

  • Moderators
  • 5168 posts

Posted 03 July 2018 - 02:00 PM

Здравствуйте,

Мы проанализируем
  • 0

#9 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 03 July 2018 - 02:43 PM

Спасибо!


  • 0

#10 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 04 July 2018 - 10:44 AM

Получается?


  • 0

#11 Stas

Stas

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 188 posts
  • LocationKiev Ukraine

Posted 08 July 2018 - 02:07 AM

И не получится, то что Вы выслали, это работа  с TwebBrowser, разные принципы.

Потому используйте вариант из

FMSoft\Framework\uniGUI\Demos\Desktop\HTML2Image

 

Помимо этого на

wkhtmltopdf.org

Есть dll, которая делает тоже самое (пробовал pdf, получилось)

Использовать dll в проекте достаточно кошерно.


  • 0

#12 Serg

Serg

    Advanced Member

  • uniGUI Subscriber
  • PipPipPipPip
  • 142 posts
  • LocationMoscow

Posted 09 July 2018 - 06:23 AM

Спасибо
  • 0




0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users