Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как сделать в реалтайме обработку видео(DSPack)? [D5, D6, WinXP]

Dufe © (2004-11-29 13:49:00)
Необходимо сделать обработку в реальном времени видефайла и вывод на экран результата. Я делаю это с помощью DSPack'a.
procedure TForm1.SampleGrabberBuffer(sender: TObject; SampleTime: Double;pBuffer: Pointer; BufferLen: Integer);
begin
Bit.Canvas.Lock;
try
if SampleGrabber.GetBitmap(Bit,pBuffer, BufferLen) then
begin
ColorTransform(Bit);
end;
finally
Bit.Canvas.Unlock;
Image2.Canvas.Lock;
Image2.Canvas.StretchDraw(rec,Bit);
Image2.Canvas.Unlock;
end;
end;
При перезагрузке процессора возникает ошибка."Canvas does not allow drawing" . Остановка происходит в разных местах!
Как сделать, чтобы если не успевают проделаться все процедуры не брался следующий кадр? Или это что-то другое?

Анонимщик (2004-12-02 15:15:00) [1]
И тебе не стыдно такое спрашивать?

Dufe (2004-11-30 13:12:00) [2]
Так я уже пробовал. Ничего хорошего не происходит. Мне бы лучше пропустить пару кадров в случае неуспевания.

programania (2004-11-29 21:16:00) [3]
>Как сделать, чтобы если не успевают проделаться все процедуры не брался следующий кадр?

попробуйте поставить в начало что-то типа:
if runSampleGrabber then exit;
runSampleGrabber:=true;
и в конец
runSampleGrabber:=false;

Однако, ничего хорошего все равно не выйдет:
если не успевают проделаться все процедуры
значит загрузка CPU 100% все будет тормозить
и зависеть от CPU и конкретного фильма
и главный тормоз это StretchDraw
к тому же качество от него заметно ухудшается.

Однако, если выкинуть StretchDraw и показывать
в натуральный размер, то P3 хватит и на обработку
типа яркость, контрастность.
А вместо StretchDraw наверно можно написать
что-то свое более быстрое, если заранее расчитать
все коэфициенты для всех пикселов.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »