APlayer模块，媒体播放引擎

全媒体文件格式支持 (rmvb/avi/mkv/mov/mpg/mp3/mp4/mpa/wmv/wma/flv/xv/ts/divx/xvid/ogg/ogm等)

.子程序 初始化, 逻辑型, 公开, 程序初始化一次即可
.参数 插件文件路径, 文本型, 可空, 设置插件的文件路径 如果在同一目录直接写插件文件名即可
.局部变量 szFileName, 文本型
.局部变量 hDLL, 整数型
.局部变量 pFunc, 整数型
.局部变量 nRet, 整数型

szFileName ＝ 取空白文本 (255)
DLL路径 ＝ 取运行目录 () ＋ “\APlayer.dll”
GetShortPathName (DLL路径, szFileName, 255)
hDLL ＝ LoadLibrary (szFileName)
pFunc ＝ GetProcAddress (hDLL, “DllRegisterServer”)
nRet ＝ CallWindowProc (pFunc, 0, 0, 0, 0)
FreeLibrary (hDLL)
返回 (player.创建 (“{A9332148-C691-4B9D-91FC-B9C461DBE9DD}”, ))