调用笔记本摄像头,图像没有显示
drawdibdraw(hd,bitmap.canvas.handle,0,0,bmpinfo.bmiheader.biwidth div 2 ,bmpinfo.bmiheader.biheight div 2,@bmpinfo.bmiheader,lpvhdr^.lpdata,0,0,bmpinfo.bmiheader.biwidth div 2,bmpinfo.bmiheader.biheight div 2,0);
 

解决方案 »

  1.   

    谢谢楼上
    可我换成HWNDC4,就可以在panel2显示了
    drawdibdraw(hd,hwndc4,0,0,bmpinfo.bmiheader.biwidth div 2 ,bmpinfo.bmiheader.biheight div 2,@bmpinfo.bmiheader,lpvhdr^.lpdata,0,0,bmpinfo.bmiheader.biwidth div 2,bmpinfo.bmiheader.biheight div 2,0);
    procedure TForm1.Button5Click(Sender: TObject);
    begin
    hwndc4:=getdc(panel2);
    end;新的问题又来了,运行几分钟显示内存不足“out of memory”。是要释放吗,不知道怎么写