Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.14;
Скачать: CL | DM;

Вниз

Фотки с камеры по таймеру...   Найти похожие ветки 

 
PhotoManiac   (2005-04-08 09:25) [0]

привет!
тут начальство задачу подсунуло срочную, а я в этом не бум-бум. надо с web-камеры, подключенной к USB получать фотографии текущего изображения примерно раз в секунду.
что для этого использовать, подскажите, пож?


 
Anatoly Podgoretsky ©   (2005-04-08 09:40) [1]

А ващ принтер в состоянии печать одну фотографию в секунду


 
PhotoManiac   (2005-04-08 09:42) [2]

:)
я их не буду печатать, мне их сложить на винте надо.


 
WondeRu ©   (2005-04-08 09:52) [3]

TTimer + DSPACK + SampleGrabber.GetBitmap


 
PhotoManiac   (2005-04-08 11:11) [4]

ага, спасибо, работает!
код

 with FilterGraph as ICaptureGraphBuilder2 do
   RenderStream(@PIN_CATEGORY_PREVIEW, nil, Filter as IBaseFilter, SampleGrabber as IBaseFilter, VideoWindow as IbaseFilter);

рендерит видео поток и отбражает его в VideoWindow. а можно ли обойтись без VideoWindow вообще?


 
WondeRu ©   (2005-04-08 12:45) [5]

PhotoManiac   (08.04.05 11:11) [4]

создавай ручками SampleGrabber

 FFilterGraph := TFilterGraph.Create(nil);
 FFilterGraph.LogFile := "c:\dxlog.txt";
 FFilter := TFilter.Create(nil);
 FSampleGrabber := TSampleGrabber.Create(nil);
 FSampleGrabber.OnBuffer := OnSampleGrabberBuffer;

и тд и тп


 
dimon__   (2005-04-08 14:14) [6]

А можно мне подкинуть код, отвечающий за поимку стат. изображения(TsampleGrabber)-видео захватывается, а изображение вообще не грабится!!


 
Анонимщик1   (2005-04-08 14:40) [7]

А что такое "стат. изображение"?
"Видео захватывается, а изображение вообще не граббится" - это что такое, как это, - захватывается или не захватывается?


 
dimon__   (2005-04-08 14:46) [8]

Ну видео(с камеры) в VIdeoWindow крутится, а при Tsamplegrabber.Getbitmap(Image1.picture.bitmap); на битмапе ничего не появляется. Ошибка в коде Getbitmap там, где он пытается
BitmapHandle := CreateDIBSection(0, PBitmapInfo(BIHeaderPtr)^,
                                        DIB_RGB_COLORS, DIBPtr, 0, 0);
.
Что делать?


 
Анонимщик1   (2005-04-08 15:15) [9]

Выяснить, почему функция не может отработать.



Страницы: 1 вся ветка

Текущий архив: 2005.08.14;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.053 c
3-1120299745
ali_tash
2005-07-02 14:22
2005.08.14
Как остановить InterBase Sever


1-1122364321
msguns
2005-07-26 11:52
2005.08.14
Убрать иконку из кэпшина формы


1-1122274489
Viktop
2005-07-25 10:54
2005.08.14
Перемещение формы за Panel


8-1113065140
Comrade
2005-04-09 20:45
2005.08.14
Эквалайзер Звука


14-1121925748
Ega23
2005-07-21 10:02
2005.08.14
С днем рождения! 21 июля