uses
System,
Variants,
Windows,
SysUtils,
ActiveX,
Classes,
MMSystem,
DirectShow9,
WMF9,
DirectDraw,
DxDiag;