Главная страница
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.026 c
1-1122380177
Alexey_T-O
2005-07-26 16:16
2005.08.14
Курс $


14-1121791963
Newbie
2005-07-19 20:52
2005.08.14
Помогите начинающему - какой Делфи выбрать?


14-1122361714
Хинт
2005-07-26 11:08
2005.08.14
Как передать текст из Delphi в скрипт PHP?


14-1122206843
Sim2
2005-07-24 16:07
2005.08.14
Paid


14-1122293244
zamik
2005-07-25 16:07
2005.08.14
Жарко, душно, работать не хочется.