VOD卡拉OK点播系统?(100分)

我也想要
谢谢了!!
 
小天给我一份好么?
 
Emailto:linmu@21cn.edu.cn
谢谢!
 
对不起,能否给我发一份,谢谢!!

darrentd@hotmail.com
 
请问如何广播视频?!
不如说MPEG
谁能提示一下!!!!
 
支持全屏幕,每秒25-30帧流畅的DVD、VCD、DivX、ASF的播放。
支持MPEG-1/VCD、DAT、MPG、MOV、AVI等多种视频格式。
支持MP3、MP2、MPA、WAV、AIF等多种音频格式。
支持MPEG-2/DVD 视频文件(后缀名VOB)。
支持MPEG-4/DivX视频文件,以MPEG-1的容量速率,接近DVD的质量。
支持ASF系列格式视音频文件。

这是一个VOD的介绍!!
有人做过嘛!!
提示一下嘛!!

视频的实时播放怎么实现啊!!!!
 
我也想要,而且想知道原理,非常详细的原理
bbboy@cool.com.cn
 
忙了半天
还是用C做吧
:(
 
我也想要,而且想知道原理,非常详细的原理
leon80@263.net
 
用DVD解压卡+MCI编程

我试验了REALMAGIC的,已经成功

procedure TForm1.Button1Click(Sender: TObject);
var filename:string;
begin

if opendialog1.Execute then

filename:=omcisendstring(pchar('open '+filename+' alias mcifmp16 style child parent '+inttostr(panel1.handle)+' wait'),nil,0,handle);
mcisendstring(pchar('put mcifmp16 window at 0'+' '+inttostr(panel1.top-10)+' '+inttostr(panel1.width)+' '+inttostr(panel1.height)+' wait'),nil,0,handle);pendialog1.FileName;


end;


procedure TForm1.playButtonClick(Sender: TObject);
begin

mcisendstring(pchar('play mcifmp16 from 0 notify'),nil,0,handle);
end;


。。。。
 
用Optibase MovieMaker200将DVD编码为MPEG-2,然后可以就可以用CISCO IP/TV作点播了
 
pbuild:能否详细介绍一下吗?
 
简单的MCI编程

用mcisendstring()或者mcisendcommand()
在DELPHI帮助文件中能找到相关的资料
最简单是用MEDIAPLAYER实现
安装了DVD解压卡驱动后就可以播放了,
播放默认是输入到电视机上,所以在电脑上可能会没有画面,转换如下:
通过MCI命令切换输出:

MCI_DGV_RM_PARMS mcidvd;

mcidvd.dwCommand = 0x9;
mcidvd.dwFlag = 0x41b;
mcidvd.dwValue = 0 for output to TV, 1 for output to VGA;
dwResult = mciSendCommand(wDeviceID, 0x900, 0x700002,
(DWORD)(LPMCI_DGV_RM_PARMS)&mcidvd);
 
to pbuild:
对于用解压卡,我也做过。但出现一个问题,程序打开video_ts.ifo播放DVD时控制
语言有效(如卡拉OK碟片中的原唱与伴唱转换),而程序直接打开*.vob文件播放时就不
能控制语言了。不知大侠有何高招,敬请赐教。

to all:
有谁接到过VOD卡拉OK点播系统(DVD片源)方面的资料,能否发一份给我。
 
to :wz_hzb
我是直接打开*.VOB播放的,先设置语言,然后播放,我是在前面的文章中找到的,没发现异常
 
如果在播放过程中改变语言,你试过没有?
你是用MCI编程还是用神龙卡的SDK编程,有相关的资料吗?能否发一份给我。
具体语句如何写?能否给大伙来两句。

谢谢!
 
我就是在播放中改变语言的
用MCI编程,我看了神龙的SDK,和MCI是对应的,
...
mcisendstring(pchar('setaudio tt stream to '+inttostr(i),nil,0,handle);
mcisendstring(pchar('play tt notify'),nil,0,handle);

i:1--8
tt是打开名
mcisendstring(pchar('open '+filename+' alias tt style child parent '+inttostr(panel1.handle)+' wait'),nil,0,handle);


 
最好基于rvsp协议
 
这只是一个播放文件的东西,问题是怎么点播......
 
caowei问的有理,我原本想法是把所有被点播的文件名放到数组里,然后再逐个依次播放,
但问题是程序如何知道正在被播放的VOB文件何时结束,何时播放下一个VOB文件?谁人知?

to PBuild:
前面有关播放VOB及语言控制方面的问题,能不能将你的程序发一份给我看一下,非常感谢!
 

Similar threads

D
回复
0
查看
787
DelphiTeacher的专栏
D
D
回复
0
查看
741
DelphiTeacher的专栏
D
D
回复
0
查看
729
DelphiTeacher的专栏
D
S
回复
0
查看
644
SUNSTONE的Delphi笔记
S
S
回复
0
查看
654
SUNSTONE的Delphi笔记
S
顶部