|
|
发表于 2006-7-28 18:39:00
|
显示全部楼层
Re:打造真彩色传奇
请问一下你那魔法特效是怎么做的
是加入AVI文件的方法么
有点问题想请教你,
那能看一下下面的代码:
procedure TAsphyreDevice.CreateDirectshow;
var
filterConfig:IVMRFilterConfig9;
VMRWindowlessControl:IVMRWindowlessControl;
begin
try
FilterGraph:=CreateComobject(CLSID_FilterGraph) as IGraphBuilder;//创建FilterGraph
VideoRender:=createcomobject(CLSID_VideoMixingRenderer9) as IBaseFilter;//创建VideoMixingRenderer9
Filtergraph.AddFilter(VideoRender,'VideoRender');//将VideoMixingRenderer9加入到Filtergraph中
VideoRender.QueryInterface(IID_IVMRFilterConfig9,FilterConfig);//获得IVMRFILTERCONFIG9接口
FilterConfig.SetRenderingMode(VMR9Mode_Windowless);//设置窗口模式为WINDOWLESS
VideoRender.QueryInterface(IID_IVMRWindowLessControl,VMRWindowlessControl);//得不到IVMRWINDOWLESSCONTROL接口
if MediaPlayWindowHandle=0 THEN
begin
Messagebox(0,'Clip Window Can''t be 0','出错',MB_ICONERROR or MB_OK);
freedirectshow;
exit;
end;
VMRWindowlessControl.SetVideoClippingWindow(MediaPlayWindowHandle); //有问题!没有能得到IVMRWindowlessControl
finally
VMRWindowlessControl:=NIL;
FilterConfig:=nil;
end;
end;
|
|