VB编程实现的视频外挂SRT、SSA、ASS字幕解决方法
VB编程实现的视频外挂SRT、SSA、ASS字幕
最近,终于实现了视频外挂SRT格式的字幕。看下图:
值得庆幸的是Vista以上的系统可以按PrintScreen键抓到视频图片了,XP以下是不行的!
第一张图加载了VSFilter字幕,可以看出DirectVobSub显示的字幕跟VB6显示的字幕颜色不一样,第二行字幕颜色值同样都是&HFFFF00&,一个是黄色,一个是青色,为什么会有这么大的差别呢?在XP下和Win7下也是同样的问题。
前不久,发了一个贴:
关于文字笔划修边的问题,VB老鸟指了一招,这招非常简单实用,比用API速度快,非常高兴。不过,不能用8楼里面的双循环,必须分别用两个单循环,否则CPU占用率会达到100%无法运行。修了边的文字非常漂亮!特别是在白色视频下面,显得更突出!视频上的字幕大小是可以随窗体的大小变化而变化的!
运行速度还可以,CPU占用率还不错!就是内存吃紧时,负责提取字幕的Timer有点卡,不能按时取出相应字幕显示出来,但不影响播放速度。这个问题正考虑用独立线程或者多媒体计时器timeSetEvent解决。
SRT字幕解析代码,博克里面有:
过一段时间,再贴出SSA、ASS字幕解析代码!
我始终相信VB6是可以做出好东西的!
VisualBasic程序开发环境 程序开发 VisualBasic
炮姐的当麻
11 years, 7 months ago