- 博客(0)
- 资源 (17)
- 收藏
- 关注
从Stream内存流中播放MP3
正常使用WindowsMediaPlayer控件的URL属性可以很方便播放音视频,但是这种方式的URL必须是一个本地文件,但是有些特殊应用中,对音视频文件加密保护,且要求只能播放,但不能拷贝,即使拷贝了也是无法播放的文件(因为文件被加密处理了),同时要求播放过程中不能在本地生成临时文件。
这个问题对没有经验的开发者而言会很容易被难倒,因为要完全开发一个播放器去集成到应用中显得很不现实,而WindowsMediaPlayer又不提供从内存流播放的方法,在网上搜索资料又很少涉及这方面的,其实有一个很简单的方法去解决这个问题,那就是利用URL这个属性最原始的定义,URL是一个地址路径,不仅支持本地路径,也支持HTTP路径,因此可以实现一个简易的HTTP服务器来供WindowsMediaPlayer加载即可。
WindowsMediaPlayer这个ActiveX控件,需要工菜单中依次点击component--Import ActiveX Control,然后选择Windows Media Player,再点击Instll进行安装,之后Delphi的组件面板上ActiveX页多了一个TWindowsMediaPlayer控件。
2018-05-29
MMTools控件的demo例子,包含从TMemoryStream内存流,资源中播放MP3
MMTools控件的demo例子,包含从TMemoryStream内存流,资源中加载mp3。具体例子在\mpeg\memstream中
2018-05-28
msacm.pas头文件,用于支持HACMDRIVERID类型
msacm.pas头文件,用于支持HACMDRIVERID类型
注意是在delphi上用的。Delphi实现MP3 互相转换 WAV时需要用上这个。
2018-05-28
类似QQ分组效果delphi实现,以QQ2011为目标
本软件无任何功能,只是模仿实现了QQ效果,采用delphi7编写。欢迎与我联系。联系QQ群:40308283(不是QQ号)。
不需要下载分,如果您发现有不足之处,请进群提意见。谢谢。
2012-01-04
获取和控制Firefox火狐非IE核心浏览器的URL网址
是用delphi7编写的,专门针对火狐Firefox浏览器。部分源码如下:
procedure TForm1.Button1Click(Sender: TObject);
var a,b:string;
begin
//火狐浏览器在最小化或被其它窗口挡住,仍然可以获取成功。
if GetFirefoxURL(a,b) then //判断是否获取成功。这里只处理火狐,
begin//只要火狐浏览器开启就肯定能获取成功,不成功一般是没开启所导致。
LabeledEdit1.Text:=a;
LabeledEdit2.Text:=b;
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
//简单的判断如果网址低于4位则认为是不正确的网页。您可以加入其它判断方法。最简单的网址应该是:g.cn
if length(trim(LabeledEdit2.Text))<4 then exit;
Set_URL(LabeledEdit2.Text); //在火狐上开启新网页。火狐在最小化时仍然可以开启。
end;
2010-11-05
获取Firefox火狐和所有IE核心浏览器当前访问的URL地址
程序支持下述9种常见浏览器:
默认IE 360浏览器 腾讯TT 傲游 Avant Browser 世界之窗 GB绿色浏览器 MY IE 极速浏览器
另外还支持Firefox火狐浏览器URL的获取。支持效果极佳。
如果您还需要支持其它浏览器,请联系加我的QQ群:40308283
说明一点,软件是用delphi 7 开发的。绿色软件。
最新版本下载地址:http://www.mwymwy.com/GetURL.rar
2009-12-11
控制Firefox火狐浏览器登录126信箱
控制Firefox火狐浏览器登录126信箱的绿色软件。
采用delphi开发,如果需要控制其它浏览器登录,请加我的QQ群37204383。
获取Firefox火狐浏览器当前访问的URL地址,目前我正在写,写出来后也将上传分享。
2009-12-09
动态加载EXE和DLL
程序中加载了一个DLL文件,但生成的EXE在脱离了DLL文件后仍然可以
单独使用,这是动态加载DLL技术。即:调用资源中的DLL。
此技术的好处:EXE可以使用DLL中的函数,但不会额外增加一
个DLL文件,在使用DLL文件的时候不需要先把DLL释放到硬盘。
在动态加载的这个DLL中定义了一个函数MRun,该函数可以动态执行一
个EXE,即:调用资源中的EXE文件或TMemoryStream中被载入的EXE流。
此技术的好处:直接把资源中的EXE加载到内存中执行,使用程序自
身嵌入的EXE文件的时候不需要先把EXE释放到硬盘上就可以直接执行。
对保密EXE文件很有用。例如:我编写的程序是A.exe,它在运行后需要
使用B.exe,而B.exe是别人编写的我没有源码,但我必须又要在我的程
序中用B.exe,这时我就把它包含到我的A.exe中,这个非常容易做到,
但是,程序A.exe在使用程序B.exe的时候按照常理必须先把B.exe释放
到硬盘上才可以用WinExec或ShellExecute等函数调用它,但你在释放
到硬盘上的时候容易被别人直接复制走,而你只想让别人用你的A.exe不
想让别人直接用B.exe(因为B.exe是别人写的等原因),此时如何保密
B.exe呢?这时只要用到上面所说的MRun函数就可以了,程序A.exe在执
行B.exe的时候不需要释放到硬盘上就可以直接执行B.exe啦,是不是很爽?
说一下MRun的调用方式: MRun(流,参数,进程id);
调用成功返回True,失败返回False,三个参数解释如下:
第一个参数:一个载入了EXE的资源流或者内存流等流类型。
第二个参数:传递调用EXE的参数。如果EXE调用不需要参数,可设置为空串。
第三个参数:如果调用成功,则返回被调用的EXE对应的进程ID。
细节性问题,请直接双击Project1.dpr文件进入演示代码,了解更多。演示代
码中动态加载了MemRun.dll文件,动态调用了5555044.exe文件,如果你想更换
动态调用的EXE文件,只需要用其它EXE覆盖5555044.exe文件并双击Clear.bat
文件后,在Delphi中按F9重新编译运行即可。
2008-10-23
淘宝自动登录,控制IE自动登录淘宝网页
控制IE自动登录淘宝网页
如果想控制其它浏览器,可以联系我,我帮你完善。
目前我只对以IE为核心的浏览器可以实现控制登录,非IE核心(如火狐)浏览器不行。
2008-10-23
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人