detector := IEVisionLib.createPeopleDetector(); foundRects := detector.detect( ImageEnView1.IEBitmap.GetIEVisionImage() ); for i := 0 to foundRects.size()-1 do with foundRects.getRect(i) do begin ImageEnView1.IEBitmap.Canvas.Brush.Style := bsClear; ImageEnView1.IEBitmap.Canvas.Pen.Color := clRed; ImageEnView1.IEBitmap.Canvas.Rectangle(x, y, x+width, y+height); end; ImageEnView1.Update();