Получить кадр с web камеры используя DirectShow

@snowleo · Регистрация: 17.06.2014

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

Здравствуйте. Есть код, который выводит изображение с веб камеры в Image1. Нужно модифицировать его, чтобы по нажатию кнопки сделать снимок, т.е. получить кадр из потока.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
void __fastcall TForm4::Button1Click(TObject *Sender)
{
    HRESULT hr;
 
 
 
 
    IGraphBuilder *pGraph = NULL; //менеджер графа фильтров
    ICaptureGraphBuilder2 *pBuild = NULL; //граф фильтра аудио\видео захвата
 
    IBaseFilter *pCapture = NULL; //видеофильтр
 
    ICreateDevEnum *pDevEnum = NULL;
    IEnumMoniker* pEnum = NULL;
    IMoniker* pMoniker = NULL;
 
    IMediaControl * pMediaControl(NULL);
    IMediaEventEx  * pEvent(NULL);
 
    //Инициализируем библиотеку COM
    hr = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
    if(SUCCEEDED(hr))
    {
        //Создание графа-фильтров - Create the Capture Graph Builder
        hr = CoCreateInstance(CLSID_CaptureGraphBuilder2, NULL, CLSCTX_INPROC_SERVER, IID_ICaptureGraphBuilder2, (void**)&pBuild );
        if (SUCCEEDED(hr))
        {
            //Создание менеджера графа фильтров - Create the Filter Graph Manager
            hr = CoCreateInstance(CLSID_FilterGraph, 0, CLSCTX_INPROC_SERVER, IID_IGraphBuilder, (void**)&pGraph);
            if (SUCCEEDED(hr))
            {
                //Initialize the Capture Graph Builder
                pBuild->SetFiltergraph(pGraph);
 
 
                // Find system device enumerator to find a video capture device.
                hr = CoCreateInstance(CLSID_SystemDeviceEnum, 0, CLSCTX_INPROC_SERVER, IID_ICreateDevEnum, (LPVOID*)&pDevEnum);
 
                if(SUCCEEDED(hr))
                {
 
                    //создает счетчик для определенной категории устройств
                    hr = pDevEnum->CreateClassEnumerator(CLSID_VideoInputDeviceCategory, &pEnum, 0);
 
                    if(SUCCEEDED(hr))
                    {
                        if( pEnum->Next(1, &pMoniker,0) == S_OK )
                        {
                            hr = pMoniker->BindToObject(0, 0, IID_IBaseFilter, (void **)&pCapture);
 
                            //hr = pGraph->AddFilter(pCapture, L"CaptureFilter");
                            //pGraph->RenderFile(L"D:\\Wildlife.wmv", NULL); //чтение файла - работает
 
                            if(SUCCEEDED(hr))
                            {
                                pGraph->AddFilter(pCapture, L"Capture Filter");
                                hr = pBuild->RenderStream(&PIN_CATEGORY_PREVIEW, &MEDIATYPE_Video, pCapture, NULL, NULL);  //3,4,5 Параметры - фильтры, которые объединены в граф
 
                                pDevEnum->Release();
                                pEnum->Release();
                                pMoniker->Release();
 
                                // Specify the owner window.
                                IVideoWindow *pVidWin = NULL;
                                OAHWND hWnd;
 
                                pGraph->QueryInterface(IID_IVideoWindow, (void **)&pVidWin);
 
                                pVidWin->put_Owner((OAHWND) Image1->Handle);
                                pVidWin->put_WindowStyle( WS_CHILD | WS_CLIPSIBLINGS );
 
                                pVidWin->put_Left(0);
                                pVidWin->put_Top(0);
                                pVidWin->put_Width(260);
                                pVidWin->put_Height(180);
                                //pVidWin->put_Width(800);
                                //pVidWin->put_Height(600);
 
                                // Set the owner window to receive event notices.
                                pGraph->QueryInterface(IID_IMediaEventEx, (void **)&pEvent);
                                pEvent->SetNotifyWindow((OAHWND)hWnd, 0, 0);
 
                                // Run the graph.
                                pGraph->QueryInterface(IID_IMediaControl, (void **)&pMediaControl);
                                pMediaControl->Run();
 
 
                            }
                            else
                                pBuild->Release();
 
                        }
                    }
                }
            }
        }
    }
}

Как это сделать не могу понять.

@uglyPinokkio · 13.07.2014, 06:44

http://msdn.microsoft.com/en-u... 85%29.aspx

@snowleo · 13.07.2014, 12:49 **[ТС]**

В какой библиотеке находится ISampleGrabber? c++builder xe3 ругается на него.

@Avazart · 13.07.2014, 12:53

Header Qedit.h
Library Strmiids.lib

http://msdn.microsoft.com/en-u... 85%29.aspx

@snowleo · 14.07.2014, 00:46 **[ТС]**

При добавлении #include <qedit.h> билдер ругается на #include "d3d.h" в файле d3drmobj.h. Ели заменить инклюд на #include "d3d9.h" то начинает ругаться на имена типов в этом файле. Как можно это исправить?

@Avazart · 14.07.2014, 00:47

Не по теме:

Сменить IDE ?

@snowleo · 15.07.2014, 23:40 **[ТС]**

В общем, сдеал, чтобы все нормально компилировалось и вроде как снимало кадр. Но полученный bmp файл не читаем виндовым вьевером. Однако, если отрыть файл в фотошопе, то видно картинку, похожую на снятый кадр, но только сильно зашумленную. Прилагаю скрин фотошопа и весь проект. Подскажите, где косяк.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit4.h"
#include <windef.h>
#include "windows.h"
#include "dshow.h"
#include <qedit.h>
 
 
 
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 
TForm4 *Form4;
//ds переменные
///////////////////////////////////////////////////////////////////////////////
    HRESULT hr;
 
    IGraphBuilder *pGraph = NULL; //менеджер графа фильтров
    ICaptureGraphBuilder2 *pBuild = NULL; //граф фильтра аудио\видео захвата
 
    IBaseFilter *pCapture = NULL; //видеофильтр
 
    ICreateDevEnum *pDevEnum = NULL;
    IEnumMoniker* pEnum = NULL;
    IMoniker* pMoniker = NULL;
 
    IMediaControl * pMediaControl(NULL);
    IMediaEventEx  * pEvent(NULL);
//grabber переменные
    IBaseFilter *pGrabberF = NULL;
    ISampleGrabber *pGrabber = NULL;
    AM_MEDIA_TYPE mt;
    BYTE *pBuffer = NULL;
///////////////////////////////////////////////////////////////////////////////
 
AnsiString path;
bool showLog = false;
//---------------------------------------------------------------------------
__fastcall TForm4::TForm4(TComponent* Owner)
    : TForm(Owner)
{
}
 
// Writes a bitmap file
//  pszFileName:  Output file name.
//  pBMI:         Bitmap format information (including pallete).
//  cbBMI:        Size of the BITMAPINFOHEADER, including palette, if present.
//  pData:        Pointer to the bitmap bits.
//  cbData        Size of the bitmap, in bytes.
 
HRESULT WriteBitmap(PCWSTR pszFileName, BITMAPINFOHEADER *pBMI, size_t cbBMI,
    BYTE *pData, size_t cbData)
{
    HANDLE hFile = CreateFile(pszFileName, GENERIC_WRITE, 0, NULL,
        CREATE_ALWAYS, 0, NULL);
    if (hFile == NULL)
    {
        return HRESULT_FROM_WIN32(GetLastError());
    }
 
    BITMAPFILEHEADER bmf = { };
 
    bmf.bfType = 'MB';
    bmf.bfSize = cbBMI+ cbData + sizeof(bmf);
    bmf.bfOffBits = sizeof(bmf) + cbBMI;
 
    DWORD cbWritten = 0;
    BOOL result = WriteFile(hFile, &bmf, sizeof(bmf), &cbWritten, NULL);
    if (result)
    {
        result = WriteFile(hFile, pBMI, cbBMI, &cbWritten, NULL);
    }
    if (result)
    {
        result = WriteFile(hFile, pData, cbData, &cbWritten, NULL);
    }
 
    HRESULT hr = result ? S_OK : HRESULT_FROM_WIN32(GetLastError());
 
    CloseHandle(hFile);
 
    return hr;
}
 
//---------------------------------------------------------------------------
void __fastcall TForm4::Button1Click(TObject *Sender)
{
    Memo1->Lines->Add("Выбран источник изображения - веб камера");
 
    Panel1->Visible = true;
    Button2->Enabled = false;
 
 
    ZeroMemory(&mt, sizeof(mt));
    mt.formattype = FORMAT_VideoInfo;
    mt.majortype = MEDIATYPE_Video;
    mt.subtype = MEDIASUBTYPE_RGB24;
 
    //Инициализируем библиотеку COM
    hr = CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
    if(SUCCEEDED(hr))
    {
        //Создание графа-фильтров - Create the Capture Graph Builder
        hr = CoCreateInstance(CLSID_CaptureGraphBuilder2, NULL, CLSCTX_INPROC_SERVER, IID_ICaptureGraphBuilder2, (void**)&pBuild );
        if (SUCCEEDED(hr))
        {
            //Создание менеджера графа фильтров - Create the Filter Graph Manager
            hr = CoCreateInstance(CLSID_FilterGraph, 0, CLSCTX_INPROC_SERVER, IID_IGraphBuilder, (void**)&pGraph);
            if (SUCCEEDED(hr))
            {
                //Initialize the Capture Graph Builder
                pBuild->SetFiltergraph(pGraph);
 
 
                // Find system device enumerator to find a video capture device.
                hr = CoCreateInstance(CLSID_SystemDeviceEnum, 0, CLSCTX_INPROC_SERVER, IID_ICreateDevEnum, (LPVOID*)&pDevEnum);
                hr = CoCreateInstance(CLSID_SampleGrabber, NULL, CLSCTX_INPROC_SERVER,IID_PPV_ARGS(&pGrabberF));
                if(SUCCEEDED(hr))
                {
 
                    //создает счетчик для определенной категории устройств
                    hr = pDevEnum->CreateClassEnumerator(CLSID_VideoInputDeviceCategory, &pEnum, 0);
 
                    if(SUCCEEDED(hr))
                    {
                        if( pEnum->Next(1, &pMoniker,0) == S_OK )
                        {
                            hr = pMoniker->BindToObject(0, 0, IID_IBaseFilter, (void **)&pCapture);
 
                            //hr = pGraph->AddFilter(pCapture, L"CaptureFilter");
                            //pGraph->RenderFile(L"D:\\Wildlife.wmv", NULL); //чтение файла - работает
 
                            if(SUCCEEDED(hr))
                            {
                                pGraph->AddFilter(pCapture, L"Capture Filter");
                                hr = pGrabberF->QueryInterface(IID_PPV_ARGS(&pGrabber));
                                hr = pGraph->AddFilter(pGrabberF, L"Sample Grabber");
 
                                hr = pBuild->RenderStream(&PIN_CATEGORY_PREVIEW, &MEDIATYPE_Video, pCapture, NULL, NULL);  //3,4,5 Параметры - фильтры, которые объединены в граф
                                hr = pBuild->RenderStream(NULL, NULL, pCapture, NULL, pGrabberF);
                                hr = pGrabber->SetMediaType(&mt);
 
                                pDevEnum->Release();
                                pEnum->Release();
                                pMoniker->Release();
 
                                // Specify the owner window.
                                IVideoWindow *pVidWin = NULL;
                                OAHWND hWnd;// = Panel1->Handle;
 
                                pGraph->QueryInterface(IID_IVideoWindow, (void **)&pVidWin);
 
                                pVidWin->put_Owner((OAHWND)Panel1->Handle);
                                pVidWin->put_WindowStyle( WS_CHILD | WS_CLIPSIBLINGS );
 
                                pVidWin->put_Left(0);
                                pVidWin->put_Top(0);
                                pVidWin->put_Width(260);
                                pVidWin->put_Height(180);
                                //pVidWin->put_Width(800);
                                //pVidWin->put_Height(600);
 
                                // Set the owner window to receive event notices.
                                pGraph->QueryInterface(IID_IMediaEventEx, (void **)&pEvent);
                                pEvent->SetNotifyWindow((OAHWND)hWnd, 0, 0);
 
                                //hr = pGrabber->SetOneShot(true);
                                hr = pGrabber->SetBufferSamples(true);
 
                                // Run the graph.
                                pGraph->QueryInterface(IID_IMediaControl, (void **)&pMediaControl);
                                pMediaControl->Run();
 
                                Memo1->Lines->Add("Запуск веб камеры");
                            }
                            else
                                pBuild->Release();
 
 
 
                        }
                    }
                }
            }
        }
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm4::Button2Click(TObject *Sender)
{
    Memo1->Lines->Add("Выбран источник изображения - из файла");
    OpenDialog1->Filter = "Изображения(*.bmp)|*.bmp|Все файлы(*.*)|*.*";
    OpenDialog1->Execute();
    path = OpenDialog1->FileName;
    if (path != "")
    {
        Image1->Picture->LoadFromFile(path);
        Memo1->Lines->Add("Загруженно изображение: " + ExtractFileName(path));
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm4::FormShow(TObject *Sender)
{
    Image1->Picture->LoadFromFile("default.bmp");
    Memo1->Clear();
    Memo1->Lines->Add("Программа запущена");
    Memo1->Visible = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm4::Button3Click(TObject *Sender)
{
    if (showLog)
    {
        Memo1->Visible = false;
        Button3->Caption = "Показать";
 
        showLog = !showLog;
    }
    else
    {
        Memo1->Visible = true;
        Button3->Caption = "Cкрыть";
        showLog = !showLog;
    }
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm4::Button4Click(TObject *Sender)
{
    // Find the required buffer size.
    long cbBuffer;
    hr = pGrabber->GetCurrentBuffer(&cbBuffer, NULL);
    pBuffer = (BYTE*)CoTaskMemAlloc(cbBuffer);
    hr = pGrabber->GetCurrentBuffer(&cbBuffer, (long*)pBuffer);
    hr = pGrabber->GetConnectedMediaType(&mt);
    // Examine the format block.
    if ((mt.formattype == FORMAT_VideoInfo) &&
        (mt.cbFormat >= sizeof(VIDEOINFOHEADER)) &&
        (mt.pbFormat != NULL))
    {
        VIDEOINFOHEADER *pVih = (VIDEOINFOHEADER*)mt.pbFormat;
 
        hr = WriteBitmap(L"1.bmp", &pVih->bmiHeader,
            mt.cbFormat - SIZE_PREHEADER, pBuffer, cbBuffer);
            int e = SIZE_PREHEADER;
        for (int x = 0; x < pVih->bmiHeader.biHeight; x++)
        {
            for (int y = 0; y < pVih->bmiHeader.biWidth; y++)
            {
                Form4->Image1->Picture->Bitmap->Canvas->Pixels[x][y] = pBuffer[e];
                e++;
            }
        }
    }
    else
    {
        // Invalid format.
        hr = VFW_E_INVALIDMEDIATYPE;
    }
}
//---------------------------------------------------------------------------

@snowleo · 16.07.2014, 04:13 **[ТС]**

После раскопок оказалось, что файл сохраняется не в rgb24, а в формате YVYU (упакованный 4:2:2). Подскажите, как заставить его сохранять все-таки в rgb24, а то я уже перекодировщик начал писать.

@uglyPinokkio · 16.07.2014, 06:12

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

После раскопок оказалось, что файл сохраняется не в rgb24, а в формате YVYU

http://msdn.microsoft.com/ru-r... 85%29.aspx

02.11.2014, 22:41

Парни пишу программу для захвата кадра с 2-х камер. Проблемы возникли тоже с D3D.h . не могли бы выручить подсказав или уже решенный пример показать . Премного благодарен буду

@znseday · 19.12.2015, 18:54

snowleo, если Вы еще сюда заходите, поясните, пожалуйста, как была решена проблема с отсутствующим d3d.h?
Создал отдельную тему:
ISampleGrabber <qedit.h> и отсутствующий <d3d.h>

@bodya_men · 20.12.2015, 15:28

znseday, нехорошо некропостить

@znseday · 20.12.2015, 16:32

bodya_men,

Не по теме:

А флудить лучше?

@bodya_men · 20.12.2015, 21:39

znseday,

Не по теме:

некропостить хуже)

@Dima Zhelonkin · 10.03.2019, 10:36

snowleo, Добрый день! получилось решить проблему с искаженной картинкой?

Новые блоги и статьи Все статьи Все блоги /
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определенном условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .

@uglyPinokkio 327 / 230 / 55 Регистрация: 30.05.2014 Сообщений: 682
	13.07.2014, 06:44
	http://msdn.microsoft.com/en-u... 85%29.aspx 0

@snowleo 14 / 0 / 1 Регистрация: 17.06.2014 Сообщений: 15
	13.07.2014, 12:49 [ТС]
	В какой библиотеке находится ISampleGrabber? c++builder xe3 ругается на него. 0

@Avazart 8489 / 6156 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	13.07.2014, 12:53
	Header Qedit.h Library Strmiids.lib http://msdn.microsoft.com/en-u... 85%29.aspx 0

@snowleo 14 / 0 / 1 Регистрация: 17.06.2014 Сообщений: 15
	14.07.2014, 00:46 [ТС]
	При добавлении #include <qedit.h> билдер ругается на #include "d3d.h" в файле d3drmobj.h. Ели заменить инклюд на #include "d3d9.h" то начинает ругаться на имена типов в этом файле. Как можно это исправить? 0

@Avazart
	14.07.2014, 00:47
	Не по теме: Сменить IDE ? 0

@snowleo 14 / 0 / 1 Регистрация: 17.06.2014 Сообщений: 15
	16.07.2014, 04:13 [ТС]
	После раскопок оказалось, что файл сохраняется не в rgb24, а в формате YVYU (упакованный 4:2:2). Подскажите, как заставить его сохранять все-таки в rgb24, а то я уже перекодировщик начал писать. 0

smailik4432
	02.11.2014, 22:41
	Парни пишу программу для захвата кадра с 2-х камер. Проблемы возникли тоже с D3D.h . не могли бы выручить подсказав или уже решенный пример показать . Премного благодарен буду

@znseday 18 / 18 / 7 Регистрация: 20.03.2012 Сообщений: 585
	19.12.2015, 18:54
	snowleo, если Вы еще сюда заходите, поясните, пожалуйста, как была решена проблема с отсутствующим d3d.h? Создал отдельную тему: ISampleGrabber <qedit.h> и отсутствующий <d3d.h> 0

@bodya_men Нарушитель 54 / 55 / 8 Регистрация: 01.07.2014 Сообщений: 1,021
	20.12.2015, 15:28
	znseday, нехорошо некропостить 0

@znseday 18 / 18 / 7 Регистрация: 20.03.2012 Сообщений: 585
	20.12.2015, 16:32
	bodya_men, Не по теме: А флудить лучше? 0

Опции темы

@bodya_men Нарушитель 54 / 55 / 8 Регистрация: 01.07.2014 Сообщений: 1,021
	20.12.2015, 21:39
	znseday, Не по теме: некропостить хуже) 0

@Dima Zhelonkin 0 / 0 / 0 Регистрация: 06.07.2016 Сообщений: 11
	10.03.2019, 10:36
	snowleo, Добрый день! получилось решить проблему с искаженной картинкой? 0