[老帖]用VB实现在桌面图标下播放视频（兼容Vista）

squall0815 · 发表于 2007-2-13 15:20:24

好，我下个学习下。。。呵呵

liusai · 发表于 2007-2-13 15:29:29

下载看看，楼主貌似还没说实现原理哦？？？

sgdjr2003 · 发表于 2007-2-13 18:46:42

不好意思，我之前发的那个有问题。
我直接假设你的屏幕分辨率为1440*900了... 马上修改为用Screen.Width

不过已经超过120分钟，还是算了吧，反正只要能在桌面上播放即可。

原理整理好后发布，也许各位还有更好的方法吧？

sgdjr2003 · 发表于 2007-2-13 18:56:37

我直接发代码！
代码比较乱，属于东拼西凑的那种，因为有些代码如视频播放是从其他地方抄过来的，
难免出现兼容问题，各位自己修改吧。
解压密码" QQ276226543 "

[ 本帖最后由 sgdjr2003 于 2009-6-9 13:00 编辑 ]

ben1222 · 发表于 2007-2-13 20:43:13

赞...把墙纸替换成可以放映的那种颜色...

sgdjr2003 · 发表于 2007-2-13 20:47:40

原帖由 ben1222 于 2007-2-13 Tue PM 20:43 发表
赞...把墙纸替换成可以放映的那种颜色...

没错，这是两个关键点中的其中一个~

另一个就是修改窗体父子关系。
这两个步骤完成后，即可实现效果。

liusai · 发表于 2007-2-13 22:10:52

恩，下载学习下。。。

silent1478 · 发表于 2007-2-14 17:13:49

.......阅读权限11

sgdjr2003 · 发表于 2007-2-14 19:01:56

原帖由 silent1478 于 2007-2-14 Wed PM 17:13 发表
.......阅读权限11

主要是为了防止潜水者。
不过你可以下载前面的效果演示程序，但存有较大的BUG,纯效果演示。

silent1478 · 发表于 2007-2-14 19:16:31

前面的那个演示程序下了，真不错。能播放RMVB真是好，网上下的类似软件不支持RMVB格式

有点不足就是分辨率大了点，看不全影片了，还有路径不能选取，得自己输入有点麻烦。

		自动登录	找回密码
密码			立即注册

VBGood网站全文搜索