Страдалецъ
у меня идет вывод видео на панель и я не знаю как сделать вывод на форму лили image, там где есть канвас
dr. F.I.N.
спасибо за подробное объяснение.
я получил изображение с панели в image. у меня теперь проблема что все работает ровно до момента сворачивания формы, как только ее сворачиваеш ниче не работает
копирую с панели в bmp
Код:
bmp_p.Canvas.copymode := cmSrcCopy;
pDC := GetDC(VideoPanel.Handle);
pCanvas := TCanvas.Create;
pCanvas.Handle := pDC;
BitBlt(bmp_p.Canvas.Handle, 0, 0,320, 240,
pDC, 0, 0, SRCCOPY);
делаю изображение контрастнее:
Код:
bmp2:=tbitmap.Create;
bmp2.Assign(bmp_p);
a:=False;
Contrast(bmp_p,90,a);
bmp2.Free;
и нахожу требуемый цвет:
Код:
for x := 120 to 280 do begin //261
for y := 50 to 150 do begin //221
if inttostr(bmp_p.Canvas.Pixels[x,y])='16777215' then begin //16777215
...
все работает более-менее, но работает, до того пока не свернул приложение