Delphi写的简单的摄像捕捉功能，包括开始捕获，停止捕获，保存图像，开始录像，停止录像。-Delphi to write a simple image capture function, including the beginning of capture, stop the capture, save the image, start the video, stop the video.