windowsmediaplayer随form变化而变化的问题(10分)

Y

yeyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-21

• #1

我在网上找到了一个解决方法,
1、先在窗口里定义一个类型：
TLocOleCtrl = Class (TOleControl);
2、在窗口的OnResize事件里加上：
TLocOleCtrl (WindowsMediaPlayer1).OnPosRectChange (Rect (0, 0, ClientWidth, ClientHeight));
===========================
但一运行时就提示:
Expected ':' but '= ' found
如何解决呢?谢谢

 

Y

yeyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-22

• #2

上去啊..高手指点一下了..

 

E

e-

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-22

• #3

ActiveControl := nil;
ActiveControl := WindowsMediaPlayer1;

 

Y

yeyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-22

• #4

还是不行...
另:你说的这两行代码加在哪个地方?

 

Y

yeyun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-05-13

• #5

再上去...高手指点...

 

E

e-

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-05-23

• #6

ActiveControl := nil;
ActiveControl := WindowsMediaPlayer1;

放到form的OnResize中