棘手问题,高手能否解决?希望这300分能有人得到(关于mediaplayer)帮我提前也给分 (300分)

  • 主题发起人 主题发起人 wdl
  • 开始时间 开始时间
W

wdl

Unregistered / Unconfirmed
GUEST, unregistred user!
1 导入mediaplayer9.0的控件(装了mediaplayer9后在system32目录瞎的wmp.dll)
2 放在窗体上
3 对齐属性选alclient
4 运行
5 你会发现当你改变窗体大小的时候midiaplayer控件的显示区域并没随之扩大或者缩小
但是当你在它没覆盖的区域点鼠标右键的时候弹出的确实是mediaplayer的菜单。
6 你是否和我一样没办法涅?


 
procedure TForm1.FormResize(Sender: TObject);
begin

Form1.WindowsMediaPlayer1.SetFocus;
end;


 
楼上的方法我试验的结果是----无效。[:(]
楼上试过么?如果这样可以是否还有些属性要设置?

继续等待答案
 
试试看??
procedure TForm1.FormResize(Sender: TObject);
begin

WindowsMediaPlayer1.DoObjectVerb(-1);
end;
 
啊。。。不好意思。。。我没注意到。。
放在Form1.Resize里是不好使。。。。
但放在Button里Resize后手动单击就好使。。。使我误以为放在Form1.resize里也好使///
呵呵。。。
 
谢谢app2001!有效!
也感谢Genl

两位要分尽管说^_^
 
多人接受答案了。
 
嘿,谢谢
 

Similar threads

后退
顶部