Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / EdgeBrowser скриншот страницы / 4 сообщений из 4, страница 1 из 1
03.01.2021, 15:18
    #40033182
Tech N9ne
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
EdgeBrowser скриншот страницы
Добрый день, помогите пожалуйста.
Delphi 10.4.1,
Windows 10 x64 весия 1909
TMS компоненты под delphi 10.4


Скачал компоненты TMS, там есть TAdvWebbrowser - это Edge Browser
компонент рабочий, открывает сайты и тд...
Но мне захотелось сделать скриншот текущей страницы.

В pdf файле, который идет с компонентами написано:
Capture Screenshot
Capturing a screenshot of the current view of the TAdvWebBrowser is as easy as calling
AdvWebBrowser1.CaptureScreenshot. The asynchronous event OnCaptureScreenshot is being called
as soon as the screenshot is ready. The OnCaptureScreenShot event has a parameter AScreenShot of
the TAdvBitmap type.


открываю любой сайт, и делаю
advwebbrowser1.capturescreenshot;
всё компилится но ничего не происходит.. Может и происходит, но скриншот я так и не нашёл)

Так же если через инспектор объектов -> эвенты, создать обработчий собыйтий "OnCaptureScreenShot"
Код: pascal
1.
2.
3.
4.
procedure TForm1.AdvWebBrowser1CaptureScreenShot(Sender: TObject; AScreenShot: TAdvBitmap);
begin

end;


ругается на
Undeclared identifier: 'TAdvBitmap'
'TAdvBitmap' is not a type identifier

Что то делаю не так?
...
Рейтинг: 0 / 0
03.01.2021, 17:30
    #40033207
DarkMaster
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
EdgeBrowser скриншот страницы
Tech N9ne,

В Uses ... чего-то не хватает?
...
Рейтинг: 0 / 0
03.01.2021, 22:39
    #40033303
Tech N9ne
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
EdgeBrowser скриншот страницы
DarkMaster
Tech N9ne,

В Uses ... чего-то не хватает?

видимо.. но я не знаю что..
в гугле по поиску TAdvBitmap находит только тот самый pdf файл.
...
Рейтинг: 0 / 0
03.01.2021, 22:55
    #40033308
Tech N9ne
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
EdgeBrowser скриншот страницы
нашёл проект в гугле где используется TadvBitmap..
скачал его, скопировал всё из Uses себе в программу)
всё заработало)
начал частями удалять, проверяя что нужно этому advbitmap`y
оказывается AdvTypes в uses
тема закрыта)
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / EdgeBrowser скриншот страницы / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]