请问用过directx的怎么全屏播放媒体呢？(100分)

不是用控件的。
用directx 8。0 for delphi，com方式
接口imediacontrol有如下方法：
function Run: HResult; stdcall;
function Pause: HResult; stdcall;
function Stop: HResult; stdcall;
function GetState(msTimeout: DWORD; out pfs: TFilter_State): HResult; stdcall;
function RenderFile(strFilename: WideString): HResult; stdcall;
function AddSourceFilter(strFilename: WideString; out ppUnk: IDispatch): HResult; stdcall;
function get_FilterCollection(out ppUnk: IDispatch): HResult; stdcall;
function get_RegFilterCollection(out ppUnk: IDispatch): HResult; stdcall;
function StopWhenReady: HResult; stdcall;

我应该怎么办呢？
我见过别人用vc封装的directx的播放器，可以全屏的

用IVideoWindow接口的put_FullScreenMode方法

direct show,没研究[]

leechange兄所言极是，
但还有个问题请教，全屏后现在只能用alt－f4回到普通模式，但有时候
这时播放窗口的内容就停止了，声音还在继续播放，为什么？
还有，全屏模式下窗口没有办法显示，有办法在这种情况下显示调节窗口呢？