Delphi simple catch face by camera

Please see screenshot.
I need a simple Delphi XE2 app that will show a camera, and on the camera it will show the silhouette.
The user will be able to insert his head inside, and then it will cut the face in the shape of the silhouette into a new graphic file (png/ jpg)

Thanks.