使用Delphi开发的视频捕获程序