TMediaplayer组件,代码怎么设置视频窗口总在其他窗口的前端?
解决方案 »
- 处理大文本问题,请指教
- 急求技术问题,关于DBgrid!!!!!!!
- QRPreview1.PageNumber:=1; 不懂?
- ADOStoredProc中用execproc执行存储过程后,是否能得到返回的结果记录集?
- 帮忙我应该如何处理这个问题。。。。。。。。。。。。。。。。。。。。。
- 谁有delphi7.0的注册码
- 超宽打印问题,在线等候,解决了分不够再加!!讨论有分!
- QQ游戏平台里面的选择游戏Treeview是如何做的?10分
- 请问:Delphi中如何动态的刷新数据?
- 这句sql语句怎么写???
- 用delphi实现判断当前窗体活动窗体是不是QQ登录窗体怎么写?
- rzpagecontrol页头右键弹出菜单呢?
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, StdCtrls;
type
TtopForm = class(TForm)
procedure CreateParams(var Params: TCreateParams);override;
private
{ Private declarations }
public
{ Public declarations }
end;var
topForm: TtopForm;implementation{$R *.dfm}procedure TtopForm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle or WS_EX_TOPMOST or WS_EX_TOOLWINDOW;
Params.WndParent := 0;
end;end.
按照这个方法必须把Mp1.play后的视频窗口放在TtopForm上才可以;我是想把Mp1.play后的视频窗口直接显示在前端不动,那该怎么做呢?或者怎么样能找到Mp1.play后的视频窗口的handle?
参考Windows Media Player SDK里面的WMPML示例
TMediaPlayer是对WMP SDK的封装
本来是想做一个简单的播放窗口,看来只能整个窗体把视频放上去了,然后让窗体置前;
to jiangsheng:
有时间我研究研究Windows Media Player SDK,整整流媒体啥的,谢谢楼上各位!~