program DShowCap;
uses
Forms,
umain in 'umain.pas' {fmain};
{$R *.RES}
begin
Application.Initialize;
Application.Title := 'DirectShow Demo';
Application.CreateForm(Tfmain, fmain);
Application.Run;
end.