1,183
社区成员
发帖
与我相关
我的任务
分享
function lwGetClassObject(hLib : HMODULE; const CLSID,IID : TGUID; var obj) : HRESULT;
var
lpDllGetClassObject : function(const CLSID, IID: TGUID; var Obj): HResult; stdcall;
pcf : IClassFactory;
begin
Result := E_FAIL;
if (hLib = 0) then
Exit;
lpDllGetClassObject := GetProcAddress(hLib, 'DllGetClassObject');
Result := lpDllGetClassObject(CLSID, IClassFactory, pcf);
if pcf = nil then
Exit;
Result := pcf.CreateInstance(nil, IID, obj);
if Pointer(obj) = nil then
Result := E_FAIL;
pcf := nil;
end;
//use
hr := lwGetClassObject(LoadLibrary('CL264dec.ax'),
CLISD_CL264Decoder,
IID_IBaseFilter,
pCL264Decoder);
//IGraphBuilder.AddFilter(pCL264Decoder, 'CL264 Decoder8');