如何在delphi中播放MOV文件？(100分)

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #21

好的 等我把那个号收藏的问题都转过来的
>>专家分也挺高的.....
哪里高啊 无语

 

Q

qince

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #22

富翁称号 总积分 本轮得分 专家分 本轮排名 总排名
Genl 370 61 1825 95 1328

我觉得挺高的了
您努力发展，肯定可以1825》18250》.....[]

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #23

谢谢。。[]

 

A

amli

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #24

//試一下這種方法
//uses MMSystem
procedure TForm1.Button1Click(Sender: TObject);
var
OpenParm: TMCI_Open_Parms;
PlayParm: TMCI_Play_Parms;
begin

FillChar(OpenParm, SizeOf(TMCI_Open_Parms), 0);
FillChar(PlayParm, SizeOf(TMCI_Play_Parms), 0);
OpenParm.dwCallback := 0;
OpenParm.lpstrDeviceType := 'MMMovie';
OpenParm.lpstrElementName := 'F:/sthvcd/file.mov';
mciSendCommand(0, mci_Open, mci_Wait or mci_Notify or MCI_OPEN_ELEMENT, Longint(@OpenParm));
mciSendCommand( OpenParm.wDeviceID, mci_Play, mci_Open_Type, Longint(@PlayParm))
end;

 

G

Genl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #25

to amli:
高手 这段代码能放 这也就是说 Delphi自带的那个MediaPlayer也能放
印象里好像不应该好使啊？？
我放的时候没有声音 其他人呢？
什么道理 解释一下

 

X

x123456

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #26

不好意思，我试了还是不行。是不是我的quicktime有问题？

 

A

amli

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #27

可能這個mov是MPEG4壓縮的吧,你的Media Player是低版的,我是下載了一個Windows Media Player 9.0的,都ok了.

 

X

x123456

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-04

• #28

下载Windows Media Player 9.0后仍不行。
我的机子原来就可以播放mpeg4格式文件的。

 

X

x123456

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-03

• #29

没人能再指点一下吗？

 

Q

qince

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-03

• #30

你找一个MOV对应的Filter，安装后，用DSPACK就可以播放和控制了

 

冰

冰峰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-03

• #31

以前我用VB添加Quicttime控件编过这样的播放器
可以播放Quicttime的.MOV文件
相信delphi通过添加activeX控件一定也可以实现