火山PCffmpeg模块+例子

z1223473749

君安光电科技 发表于 2022-6-30 11:26
命令行的要"封装"吗?一句"运行( )"不就包罗万象了?

运行命令是不能满足的

下面这个可以满足命令的需求

1. <火山程序 类型 = "通常" 版本 = 1 />
   
2. 
   
3. 类 FFMPEG_类 <公开>
   
4. {
   
5.     变量 返回全部文本 <公开 类型 = 文本型>
   
6.     变量 集_CMD <公开 类型 = CMD命令执行类 注释 = "ffmpeg\\\\bin\\\">
   
7. 
   
8.     方法 执行_FFMPEG <公开>
   
9.     参数 参_命令 <类型 = 文本型>
   
10.     {
    
11.         集_CMD.执行CMD2 (参_命令, 假)
    
12.     }
    
13. 
    
14.     方法 CMD命令执行类_回显数据事件 <接收事件 类型 = 整数>
    
15.     参数 来源对象 <类型 = CMD命令执行类 注释 = "提供事件产生的具体来源对象">
    
16.     参数 标记值 <类型 = 整数 注释 = "用户调用"挂接事件"命令时所提供的"标记值"参数值,非此方式挂接事件则本参数值固定为0.">
    
17.     参数 收到的字节集 <类型 = 字节集类>
    
18.     {
    
19.         变量 局_回显数据 <类型 = 文本型>
    
20.         变量 局_任务状态 <类型 = 文本型>
    
21. 
    
22.         如果 (来源对象 == 集_CMD)
    
23.         {
    
24.             局_回显数据 = 多字节到文本 (收到的字节集)
    
25.             如果 (寻找文本 (局_回显数据, "global headers:0kB", , ) != -1)
    
26.             {
    
27.                 局_任务状态 = "任务完成"
    
28.             }
    
29.             否则 (寻找文本 (局_回显数据, "Input/output error") != -1)
    
30.             {
    
31.                 局_任务状态 = "输入错误"
    
32.             }
    
33.             否则 (寻找文本 (局_回显数据, "global headers:0kB") != -1)
    
34.             {
    
35.                 局_任务状态 = " 任务完成"
    
36.             }
    
37.             否则 (寻找文本 (局_回显数据, "No such file or directory") != -1)
    
38.             {
    
39.                 局_任务状态 = "文件不存在"
    
40.             }
    
41.             否则 (寻找文本 (局_回显数据, "At least one output file must be specified") != -1)
    
42.             {
    
43.                 局_任务状态 = "任务完成"
    
44.             }
    
45.             否则
    
46.             {
    
47.                 局_任务状态 = "正常运行"
    
48.             }
    
49.             返回全部文本 = 返回全部文本 + 局_回显数据 + "\r\n"
    
50.         }
    
51.         返回 (0)
    
52. 
    
53.     }
    
54. }
    

复制代码