My project source with delphi directshow wrapping component "dsPack"