Запись выделенной области экрана в видеофайл

@Argus19 · Регистрация: 24.09.2017

Студворк — интернет-сервис помощи студентам

Неожиданно появилась задача записать выделенную область экрана монитора в видеофайл. Вот с этого сайта:
https://falstad.com/circuit/
Понимаю, что выделить область мышью не проблема. Просто не понимаю, как записать это в видеофайл со стандартным fps+25.

@HackerVlad · 03.12.2024, 18:21

Тим70, я скорее всего просто ставил пакет кодеков разных, у меня он стоит в двух папках аж:
"c:\Program Files\BlueStacks_nxt\ffmpeg.exe"
"c:\Program Files\ImageMagick-7.1.1-Q16-HDRI\ffmpeg.exe"
и к моего удивлению запускается ffmpeg.exe из любой папки, видимо ещё и пропатчили папку одну из этих двух точно

Добавлено через 4 минуты
Аааа понял, некоторые программы хранят у себя в своей папке свой ffmpeg.exe

Добавлено через 4 минуты
В общем, у меня в системе, оказалась пропатчена папка C:\Program Files\ImageMagick-7.1.1-Q16-HDRI это просто случайно повезло, что я устанавливал эту программу. Поэтому и работала ваша запись экрана.

Добавлено через 52 секунды
А так в принципе на голой винде, только что установленной, вряд ли это будет работать
Как вариант такскать с собой в папке ffmpeg.exe как это делают некоторые программы, как я это выяснил случайно

Добавлено через 12 минут

Сообщение от Тим70

Причем ffmpeg надо качать конкретно под систему компьютера

Не знаю, я нашёл у себя на компьютере много разных версий ffmpeg.exe и все они разных версий и разных размеров вообще от мала до велика)

@Тим70 · 03.12.2024, 18:49

HackerVlad, У меня под рукой две вин 7, 32 и 64.На них не было ffmpeg,хотя системы не пиратскии.Для обоих пришлось качать свои версии,иначе не работали, а вот папки системные оказались одинаковые C:\Windows\System32\ffmpeg.exe

@HackerVlad · 03.12.2024, 19:05

Сообщение от Тим70

C:\Windows\System32\ffmpeg.exe

У меня там вообще никогда небыло ffmpeg в системной папке.

Добавлено через 37 секунд

Сообщение от Тим70

хотя системы не пиратскии

В пиратском дистрибутиве наоборот больше шансов что добавят этот кодек, чем в чистой винде...

@Тим70 · 03.12.2024, 19:12

HackerVlad, Писал когдато такой конвертор на ffmpeg,в архиве exe файл.

@Argus19 · 04.12.2024, 09:07 **[ТС]**

Сообщение от Тим70

Вот пример записи

У меня виснут программы при попытке воспроизвести ваш файл.
Я попробовал перекодировку видео в разные форматы. Всё работает.

Сообщение от Тим70

Вот пример записи

У меня виснут программы при попытке воспроизвести файл.

Сообщение от The trick

Есть AviFileOpen и т.п. функции для записи в avi. Забирать изображение можно стандартным BitBlt. Более сложный вариант это DirectShow. Забирать можно через DirectX. Это более сложный способ, но у него куча преимуществ типа разных форматов и аппаратного ускорения.

ffmpeg сам в себе содержит целую кучу всего. Я сделал, как советуют тут:
https://write.corbpie.com/ffmp... d-formats/
и получил списочек (см. вложение)

@Argus19 · 04.12.2024, 10:47 **[ТС]**

Сообщение от MallSerg

ffmpeg -f gdigrab -framerate 30 -offset_x 10 -offset_y 20 -video_size 640x480 -show_region 1 -i desktop output.mkv

Сработало только вот так:

ffmpeg -f gdigrab -t 15 -framerate 30 -offset_x 10 -offset_y 20 -video_size 640x480 -show_region 1 -i desktop -f avi C:\output.mp4

Не могу понять, если я принудительно ставлю формат .mp4 и расширение выходного файла такое же, то получается что-то, что не воспроизводится. Если ставлю .avi, но формат выходного файла .mp4, то всё работает.

@Тим70 · 04.12.2024, 11:36

Argus19, Для ffmpeg много статей в интернете.
Тут
Тут
Тут
Тут
Посмотрите,я всю полезную информацию брал с них.

@MallSerg · 04.12.2024, 17:21

Сообщение от Argus19

Не могу понять, ....

Все ответы есть в официальной документации https://ffmpeg.org/documentation.html
Главное хоть приблизительно понимать что ты хочешь сделать
Если я правильно понял то ты хочешь с источника (https://ffmpeg.org/ffmpeg-devices.html) получить поток видео и закодировать его в видеофайл требуемого формата (https://ffmpeg.org/ffmpeg-codecs.html).

@Argus19 · 04.12.2024, 19:28 **[ТС]**

Сообщение от MallSerg

ты хочешь с источника

С экрана монитора.
На Win7 всё шикарно работает и с хорошим качеством. На Win10 не так красиво.

@The trick · 04.12.2024, 21:16

Argus19, нужно DPI манифест делать. Вообще давно бы глянул на AVI функции и сделал свой кастомный вариант. Либо через DirectShow, там нужно пару фильтров всего PushSource для захвата экрана и фильтр для записи в файл (зависит от формата)

@Argus19 · 05.12.2024, 09:24 **[ТС]**

Сообщение от The trick

Вообще давно бы глянул на AVI функции

Я даже не могу выделить область экрана для записи. Координаты курсора определяются легко с помощью GetCursorPos. Чтобы зафиксировать координаты, хотелось использовать клик мыши. С этим проблема. Я могу определить hwnd окна программы, находящейся под курсором с помощью WindowFromPoint и даже прочитать название окна с помощью GetWindowText, а получить события мыши для этого окна с помощью GetMessage, или PeekMessage с ключами WM_MOUSEFIRST, WM_MOUSELAST, и даже без них, не получается. Значит, события находятся в разных потоках, т.к. при запуске из IDE, всё работает.
AVI функции и макросы работают с потоками, что усложняет их использование в VB.
Вот и получается, что проблемы уже на уровне примитивов. Можно, конечно, использовать клавиатуру, но это видится не удобным.

@The trick · 05.12.2024, 09:28

Argus19, запускаешь таймер и в таймере проверяешь.GetAsyncKeyState. Либо хук на мышь.

@HackerVlad · 05.12.2024, 12:16

Сообщение от Argus19

Я даже не могу выделить область экрана для записи.

Самый первый пример который скидывал testuser2 там же это есть. Полупрозрачная форма-область для выделения области экрана. Блин что тут сложного вообще.

@Argus19 · 05.12.2024, 16:33 **[ТС]**

The trick, Взял ваш модуль:
https://www.cyberforum.ru/blog... g1943.html
удалил хук на клавиатуру. Процесс пошёл

Добавлено через 39 минут
Как передать букву в ту же командную консоль?
Shell вызывает другую консоль.

Добавлено через 1 час 56 минут
Получилось.

Visual Basic
1
2
ConsolehWnd = FindWindow("ConsoleWindowClass", "Администратор: C:\Windows\SYSTEM32\cmd.exe")
PostMessage ConsolehWnd, WM_CHAR, Asc("q"), 0&

Почему-то, если использовать функцию:

Visual Basic
1
SendMessage ConsolehWnd, WM_CHAR, Asc("q"), 0&

записывает в консоль букву "q" очень много раз вместо одного

@testuser2 · 06.12.2024, 01:50

Argus19, посмотрите сдесь Работа с консолью из VB6

@Argus19 · 06.12.2024, 08:38 **[ТС]**

Сообщение от testuser2

посмотрите сдесь

Там создание консоли. WriteConsole пуляет только в ту консоль, которая создана. А PostMessage куда угодно по hwnd.
Мне проще использовать Shell.

@Argus19 · 06.12.2024, 13:40 **[ТС]**

Во вложении набросок программки.
В текстовое поле вставить полный путь к файлу ffmpeg.exe, нажать кнопку: "область захвата"
Отметить мышью верхний левый угол захватываемого изображения экрана монитора, потом правый нижний и нажать кнопку "старт", когда посчитаем, что хватит писать, нажать кнопку "стоп" и потом - "выход".

Новые блоги и статьи Все статьи Все блоги /
Оказывается, Unreal Engine позволяет качество на порядки выше, чем было в Lineedge Etyuhibosecyu 05.07.2026 Жаль, конечно, что я не узнал об этом, пока Lineedge существовала, а то бы Noname2331 написал, что волки превращаются в пиксельную кашу, а я бы его попросил скачать какую-нибудь бриллиантовую или Pro. . .	Doom для терминала без стрельбы и монстров. 3D Raycasting на ascii. dcc0 05.07.2026 Попросил нейронную сеть deepai. org написать рейкастинг 3D с библиотекой ncurses для Linux. Чтобы можно было ходить на стрелочки. Чтобы стены были отрисованы символами. Справилась. Первый вариант. . .	Установка статуса документа по условию Maks 05.07.2026 Алгоритм из решения ниже реализован на нетиповом документе "НарядПутевка" разработанного в КА2. Задача: в табличной части "Материалы" документа при записи автоматически устанавливать статус. . .	Сезонность и суточность закисления почв anaschu 04.07.2026 200 часов это все равно моловато. Есть ситуации, но нестандартные, когда смена происходит за 5 лет. Но обычно это 50 лет и более. Наверное, закисление почвы происходит сезонно в средней. . .
В чем ценность человеческого опыта в глобальном смысле? kumehtar 03.07.2026 Возможно, ценность человека не в том, что он однажды достигает мудрости, а в том, что он становится носителем карты пути. Он знает не только истину, но и последовательность внутренних изменений,. . .	интеграция AnyLogic с самописным REST API и переход на Odoo anaschu 03.07.2026 Успешная интеграция AnyLogic с самописным REST API и переход на промышленную Odoo WMS Сегодня проделал огромный путь от простой симуляции физических процессов до построения полноценной. . .	Поиск всех путей на ориентированном графе. Linux dcc0 02.07.2026 Переработка старого кода из моей статьи. Через несколько переработок от PHP кода к C89 (надеюсь, 89). Но довольно запутанно получилось. Код для Linux. Но если убрать time и то, что с ним. . .	Сам себя обучал rest api anaschu 02.07.2026 Педагогический лайфхак: Почему чистый REST API для ученика намного круче, чем готовые библиотеки Когда мы отказались от капризного JAR-файла AnyLogic и переписали код на стандартный HttpClient,. . .

@Argus19 1446 / 463 / 78 Регистрация: 24.09.2017 Сообщений: 2,542 Записей в блоге: 24

	Запись выделенной области экрана в видеофайл 30.11.2024, 21:45. Показов 3740. Ответов 56 Метки vb 6.0 (Все метки) Неожиданно появилась задача записать выделенную область экрана монитора в видеофайл. Вот с этого сайта: https://falstad.com/circuit/ Понимаю, что выделить область мышью не проблема. Просто не понимаю, как записать это в видеофайл со стандартным fps+25. 0

@Тим70 Любитель 1047 / 757 / 161 Регистрация: 27.01.2019 Сообщений: 1,531
	03.12.2024, 18:49
	HackerVlad, У меня под рукой две вин 7, 32 и 64.На них не было ffmpeg,хотя системы не пиратскии.Для обоих пришлось качать свои версии,иначе не работали, а вот папки системные оказались одинаковые C:\Windows\System32\ffmpeg.exe 0

@Тим70 Любитель 1047 / 757 / 161 Регистрация: 27.01.2019 Сообщений: 1,531
	04.12.2024, 11:36
	Argus19, Для ffmpeg много статей в интернете. Тут Тут Тут Тут Посмотрите,я всю полезную информацию брал с них. 3

@The trick Модератор 10060 / 3905 / 885 Регистрация: 22.02.2013 Сообщений: 5,854 Записей в блоге: 79
	04.12.2024, 21:16
	Argus19, нужно DPI манифест делать. Вообще давно бы глянул на AVI функции и сделал свой кастомный вариант. Либо через DirectShow, там нужно пару фильтров всего PushSource для захвата экрана и фильтр для записи в файл (зависит от формата) 1

@The trick Модератор 10060 / 3905 / 885 Регистрация: 22.02.2013 Сообщений: 5,854 Записей в блоге: 79
	05.12.2024, 09:28
	Argus19, запускаешь таймер и в таймере проверяешь.GetAsyncKeyState. Либо хук на мышь. 1

@testuser2 1402 / 860 / 93 Регистрация: 08.02.2017 Сообщений: 3,672 Записей в блоге: 2
	06.12.2024, 01:50
	Argus19, посмотрите сдесь Работа с консолью из VB6 1