| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 文件_取MP3播放时间 | 文本型 | Mp3文件的全曲时间,仅支持MP3文件,如果文件不存在，将返回空 | |||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 文件名 | 文本型 | 类型 | 整数型 | 0；总长度 1；分 秒 2；秒 | |||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 局部_缓冲文本 | 文本型 | |||||
| 局部_整理路径 | 文本型 | |||||
| 局部_长度_秒 | 整数型 | |||||
| 局部_长度_分 | 整数型 | |||||
| 局部_时长 | 文本型 | |||||
局部_整理路径 ＝ 取空白文本 (256)
GetShortPathNameA (文件名, 局部_整理路径, 取文本长度 (局部_整理路径))
mciSendStringA (“open ” ＋ #引号 ＋ 局部_整理路径 ＋ #引号 ＋ “ Alias movie notify”, 局部_缓冲文本, 取文本长度 (局部_缓冲文本), 0) ' Alias movie parent %u Style %u notify
局部_缓冲文本 ＝ 取空白文本 (128)
mciSendStringA (“status movie length”, 局部_缓冲文本, 取文本长度 (局部_缓冲文本), 0)
局部_长度_秒 ＝ 到数值 (局部_缓冲文本) ÷ 1000
局部_长度_分 ＝ 到整数 (局部_长度_秒 ÷ 60)
局部_时长 ＝ 文本_自动补零 (到文本 (局部_长度_分), 2) ＋ “:” ＋ 文本_自动补零 (到文本 (局部_长度_秒 － 到数值 (局部_长度_分 × 60)), 2)
mciSendStringA (“close all”, 字符 (0), 0, #NULL )
判断 (类型 ＝ 1)
返回 (局部_时长)
判断 (类型 ＝ 2)
返回 (到文本 (到整数 (局部_长度_秒)))
返回 (局部_缓冲文本)
词条作者信息 使用例程