利用API播放AVI

2016-02-19 17:52 26 1 收藏

get新技能是需要付出行动的,即使看得再多也还是要动手试一试。今天图老师小编跟大家分享的是利用API播放AVI,一起来学习了解下吧!

【 tulaoshi.com - 编程语言 】

声明:
  DeclareFunctionmciSendStringLib"winmm.dll"Alias"mciSendStringA"(ByVallpstrCommandAsString,ByVallpstrReturnStringAsString,ByValuReturnLength
  AsLong,ByValhwndCallbackAsLong)AsLong
  代码:
  DimreturnstringAsString
  FileNameAsString
  returnstring=Space(127)
  FileName="C:A1.avi"
  erg=mciSendString("open"&Chr$(34)&FileName&Chr$(34)&"typeavivideoaliasvideo",returnstring,127,0)
  erg=mciSendString("setvideotimeformatms",returnstring,127,0)
  erg=mciSendString("playvideofrom0",returnstring,127,0)
  '记着关闭!
  erg=mciSendString("closevideo",returnstring,127,0)->

来源:http://www.tulaoshi.com/n/20160219/1616261.html

延伸阅读
在某些场合,我们需要确定特定目录下特定文件是否存在。VB自带的DIR函数可以查找符合条件的文件(在VB编程乐园已经有过介绍),但用起来略显复杂。这里介绍一种较为简单的方法。 API函数的SHFileExists的功能,从其名字来看,应该是SearchFileExists,亦即查找存在的文件。用它来检测文件存在与否是很容易的。试看下面的例子。 在标...
在C#编程的时候,由于一个功能需要播放一小段的AVI格式的短片,结果找了半天也没有搞定如何来进行播放。于是本人在网上查呀查呀!找了半天终于找到了一个方法播放文件。 他的方式是首先用下面的命令为媒体播放器控件:msdxm.ocx 生成 MediaPlayer.dll 和 AxMediaPlayer.dll。命令为:aximp c:\winnt\system32\msdxm.ocx 而通常msdxm.ocx...
源代码: PrivateSubCommand1_Click() Dimback back=mciSendString&("CLOSENN",0,0,0) EndSub PrivateSubCommand2_Click() Dimback back=mciSendString&("OPEN" App.Path "TEST.mid" "TYPESEQUENCERALIASNN",0&,0,0) back=mciSendString&("PLAYNNFROM0",0&,0,0) R=mciSendString&...
原则上,只改这一次,下一次开机会还原,但假如需重开机,才会Update Registry中的设定,并重开机。 !-- frame contents -- !-- /frame contents -- 假如要永久设定其设定值,请将 b = ChangeDisplaySettings(DevM, 0) 改成 b = ChangeDisplaySettings(DevM, CDS_UPDATEREGISTRY) 注: ...
标签: Web开发
上次我说了用ASP,PHP,C#分别实现Google的Translate开发一个API ( Tags:Google Translate API ) ,由于很多程序代码由JAVA实现(JSP),我还是利用一点时间做了一个java版本的,本人在JAVA方面还是入门的程度,期间,查了一些资料,虽然程序比较短,但是还是比较淘气的。   和上一话所说的利用JAVA获取URL的内容,这篇的技术实现获取,...

经验教程

731

收藏

60
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部