免费试用VOD SDK For RealMagic，外加送份(0分)

请勿回贴，有需要直接联系 evod@soft.com.cn
VOD SDK For RealMagic，基于底层驱动构建的开发包，是目前卡拉OK系统的开发的主流。
已封装成功能完备的DELPHI类，也可根据需要自行定制开发包接口。
在确认身份真实性和购买意向的前提下可先发完全版源程序后付款
价格：500RMB
以下请参考，类Public成员列表
public
FileName:LPTSTR;
{媒体文件名}
SeekStepWORD;
{快进、快退步进量、默认200}
AutoPlay:BOOLEAN;
{自动播放}
DriverInfo:TVODDriverInfoStruct;
{驱动信息}
VideoHwnd:HWND;
{VGA输出窗口句柄}
LengthWORD;
{文件长度}
AudioStreamCount:BYTE;
{声音流数量}
VideoStreamCount:BYTE;
{视频流数量}
property AudioMode:TVODAudioMode
read bAudioMode
write SetAudioMode
default VOD_AUDIOMODE_SURROUND;
{公用属性，设置声音输出格式}
property AudioVolume:BYTE
read BAudioVolume
write SetAudioVolume
default 50;
{公用属性，设置或取得当前的音量，MIN=0，MAX=100}
property AudioVolumeLeft:BYTE
read bAudioVolumeLeft
write SetAudioVolumeLeft
default 50;
{公用属性，设置或取得当前左声道音量，MIN=0，MAX=100}
property AudioVolumeRight:BYTE
read bAudioVolumeRight
write SetAudioVolumeRight
default 50;
{公用属性，设置或取得当前右声道音量，MIN=0，MAX=100}
property AudioSwitch:TVODAudioSwitch
read bAudioSwitch
write SetAudioSwitch
default VOD_AUDIOSWITCH_ON;
{公用属性，设置或取得声音开关}
property AudioSource:TVODAudioSource
read bAudioSource
write SetAudioSource
default VOD_AUDIOSOURCE_STEREO;
{公用属性，设置声道源}
property AudioStream:Byte
read bAudioStream
write SetAudioStream
default 0;
{公用属性，设置声音流}
property AudioTreble:BYTE
read bAudioTreble
write SetAudioTreble
default 100;
{公用属性，设置声音高音音效，可能无效}
property AudioBass:BYTE
read bAudioBass
write SetAudioBass
default 100;
{公用属性，设置声音低音音效，可能无效}
property VideoMode:TVODVideoMode
read bVideoMode
write SetVideoMode
default VOD_VIDEOMODE_PAL;
{公用属性，设置或取得当前的显示输出模式}
property VideoGamma:Word
read wVideoGamma
write SetVideoGamma
default 800;
{公用属性，设置或取得当前的GAMMA值，MIN=200，MAX=1400}
property VideoSwitch:TVODVideoSwitch
read bVideoSwitch
write SetVideoSwitch
default VOD_VIDEOSWITCH_ON;
{公用属性，设置或取得视频开关}
property VideoBrightness:WORD
read wVideoBrightness
write SetVideoBrightness
default 500;
{公用属性，设置或取得视频亮度}
property VideoSaturation:WORD
read wVideoSaturation
write SetVideoSaturation
default 500;
{公用属性，设置或取得视频饱和度}
property VideoContrast:WORD
read wVideoContrast
write SetVideoContrast
default 500;
{公用属性，设置或取得视频对比度}
property OnError:TErrorEvent
read FOnError
write FOnError;
{错误事件}
constructor Create;
destructor Destroy;override;
procedure Free;
function GetError:Longword;
{取得最后发生的错误号}
procedure Play;
{播放}
procedure Close;
{关闭}
procedure Stop;
{停止}
procedure Open;
{打开}
procedure Pause;
{暂停}
procedure SeekForward;
{快进}
procedure SeekBack;
{快退}
procedure SeekTo(PostionWORD);
{快速定位}
procedure SeekToStart;
{快速定位到头}
procedure SeekToend;
{快速定位到尾}
procedure SetVGASize(Width:WORD;Height:WORD);
{设定VGA显示尺寸}
procedure SetVGAPostion(PointX:WORD;PointY:WORD);
{设定VGA显示位置}
function GetPostionWORD;
{当前播放点}
function GetStateWORD;
{取得当前播放状态}
{==================Other===============}
function GetFlag(dwFlagPortWORD)WORD;
{取得Flag的值}
procedure SetFlag(dwFlagPortWORD;dwFlagValueWORD);
{设置Flag的值}

功能接口演示程序
http://www.antdown.com/soft/VODTester.exe

呵，有卖给了没有？
这样的生意在中国好象不好做啊。
http://www.delphibbs.com/delphibbs/dispq.asp?lid=958559

http://www.delphibbs.com/delphibbs/dispq.asp?lid=938354
有点象说你哦.需要帮忙吗?

你的Email错误，请和我联系jump8@163.com

能否实现 VOB 电影文件的字幕选择？