.版本 2
.子程序 取_位图句柄, 整数型, 公开, 取图标句柄,成功返回图标句柄,失败返回0
.参数 参_图标, 字节集, , 欲添加为菜单图标的资源
.局部变量 局_对象, 对象, 静态, "0"
.局部变量 局_句柄, 整数型
.局部变量 局_成员数, 整数型
局_成员数 = 取数组成员数 (局_对象) + 1
重定义数组 (局_对象, 真, 局_成员数)
.如果真 (局_对象 [局_成员数].创建图片对象 (参_图标))
返回 (局_对象 [局_成员数].读数值属性 (“handle”, ))
.如果真结束
返回 (0)
.版本 2
aplayer = CreateAPlayer (_启动窗口.取窗口句柄 (), 0, 0, _启动窗口.取用户区宽度 (), _启动窗口.取用户区高度 () - 50, 0, 0, 到整数 (&OnOpenSuccess), 0, 0, 0, 到整数 (&OnDownloadCodec), 到整数 (&OnEvent))
SetCustomLogo (aplayer, 取_位图句柄 (#图片1))