function TBCAsyncOutputPin.NonDelegatingQueryInterface(const IID: TGUID;
out Obj): HResult;
begin
//Result := Inherited NonDelegatingQueryInterface(IID, Obj);
//IID_IStreamBuilder
if IsEqualGUID(IID, IID_IAsyncReader) then
begin
FQueriedForAsyncReader := True;
if GetInterface(IID_IAsyncReader, Obj) then
Result := S_OK
else
Result := E_FAIL;
end
else
Result := Inherited NonDelegatingQueryInterface(IID, Obj);
end;
今天试出来,在delphi里,这个函数里的IID=IID_IAsyncReader
而在VC的demo里,IID=IID_IStreamBuilder
难道就是这里的问题?