QuickTime ActiveX控件的应用问题(100分)

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-14

• #1

应用ActiveX版的QuickTime进行mov播放器的制作
注册了TQTActiveXPlugin1控件
当应用时出现了一些问题。。。
怎么设定要播放的文件 QTActiveXPlugin1.SetMovieName('D:/3244103_qt_h.mov')
不好使
Form1.QTActiveXPlugin1.SetURL('D:/3244103_qt_h.mov')
倒是好使 但是在一个Procedure中再有其他的控制函数就会出错
比如
Form1.QTActiveXPlugin1.SetControllerVisible(0);
Form1.QTActiveXPlugin1.SetURL('D:/3244103_qt_h.mov');
Form1.QTActiveXPlugin1.Stop;
无论什么顺序都出错。。
（分开放在不同的Button里 等画面出来了 再按就很正常）

估计是QTActiveXPlugin1没有Load完。。。但又怎么判断是否Load完？？？？

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-19

• #2

在load前，先将控件stop，然后用try进行laod这种方法我们应用很久了，一项稳定！

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-19

• #3

还是不对啊。。。。能不能写一下代码啊

If Form1.TntOpenDialog1.Execute then Begin
Form1.QTActiveXPlugin1.Stop;
try
Form1.QTActiveXPlugin1.SetURL(Form1.TntOpenDialog1.FileName);
Finally
end;
End;

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-20

• #4

可以告诉我你的邮箱吗？？

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-20

• #5

你的代码中并没有QTActiveXPlugin1.play之类的语句，你怎么可能播放出视频呢？？

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-20

• #6

acme_genl@hotmail.com
谢谢

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-20

• #7

邮件已经发出，请查收！

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-20

• #8

OLE错误 FFFFFFFF
和原来一样！！
还是不能两个同时出现

难道是我的问题么？？

Win2000 Delphi6 QuickTime6

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-21

• #9

我觉得你的问题有些怪异了，另外你说的两个不能同时出现是什么意思？？

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-21

• #10

Form1.QTActiveXPlugin1.setMovieName('D:/3244103_qt_h.mov')
报错
只能用Form1.QTActiveXPlugin1.SetURL('D:/3244103_qt_h.mov');

并且如果Form1.QTActiveXPlugin1.SetURL('D:/3244103_qt_h.mov');所在的Procedure中
只有QTActiveXPlugin1一行语句的话就没问题。。
比如
OnButton1Click()
Begin
Form1.QTActiveXPlugin1.SetURL('D:/3244103_qt_h.mov');
End;
OnButton2Click()
Begin
Form1.QTActiveXPlugin1.play;
End;

就好使。。
如果是
OnButton1Click
Begin
Form1.QTActiveXPlugin1.SetURL('D:/3244103_qt_h.mov');
Form1.QTActiveXPlugin1.play;
End;

就出错。。。。。
而且任意两个都出错。。。。

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-22

• #11

你再试一下，在setURL后用QTActiveXPlugin1.Refresh试试，应该可行，你的问题却是有些奇怪！

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-23

• #12

不好使啊。。。[]

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-25

• #13

你真的测试过？

用了QTActiveXPlugin1.SetURL，就已经播放了，你再次用QTActiveXPlugin1.Play肯定就会出错，你这样再试试，你都把我给弄胡涂了！！

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-25

• #14

下面的代码，已经测试过了，你试试看！
Button1Click(Sender: TObject);
begin
if opendialog1.Execute
then
begin
QTActiveXPlugin1.SetURL(opendialog1.FileName);
qtactivexplugin1.Refresh;
end;
end;

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-25

• #15

哦 看来你没明白我的意思。。。

我的意思是设定路径后 自动Stop住。。。
然后通过Play的按钮来播放。。。。。

是不是我的QuickTime有问题啊？？

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-26

• #16

我知道你的意思了，你的意思是不是要让QuickTime画面显示出来，但是不马上播放。

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-26

• #17

对啊。。你有QQ么 22838443

 

C

cnzhw007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-28

• #18

to:Genl
我的QQ是：45365460！

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-12-07

• #19

接受答案了.