Egy kis hiba van az eredeti demo-ban:
...
bmp:= TBitmap.Create;
...
// camera capture...
img:=cvQueryFrame(video1);
IplImage2Bitmap( img, bmp );
...
// Form1.Image1.Picture.Bitmap:=cvImage2Bitmap_bb(img);
Form1.Image1.Picture.Bitmap.Assign( bmp );
A cvbitmapconversion unitra nincs is szükség. Így már nem eszi a memóriát.