项目

一般

简介

DelTextList » 历史记录 » 版本 1

machenhe, 2022-04-25 15:33

1 1 machenhe
_*%{color:green}delTextList%*_
2
从指定文件中删除一行字符串
3
4
标签:命令定义|delTextList
5
6
*格式*
7
|命令名		|参数1	 |参数2	      |
8
|delTextLis	|文件路径|待删除字符串|
9
10
*说明*
11
* 参数1: 待处理字符串的文件路径
12
路径需要基于..\Mir200\Envir
13
%{color:lightGrey}举例
14
设定路径为
15
\testlist.txt
16
完整路径
17
..\Mir200\Envir\testlist.txt%
18
19
* 参数2: 待删除字符串
20
21
* 如没有找到与指定字符串匹配的行,则不执行
22
23
-
24
-
25
26
*%{color:deepskyblue}特戒引擎脚本示例:%*
27
28
bq. 预制数据文件
29
..\Mir200\Envir\数据文件\测试数据文件.txt
30
文件内容如下
31
测试数据1
32
测试数据2
33
测试数据3
34
测试数据4
35
测试数据5
36
37
38
bq. [@main]
39
#if
40
#act
41
mov s$file \数据文件\测试数据文件.txt
42
 
43
#if
44
checkTextList <$str(s$file)> 测试数据1
45
#act
46
getStringPos <$str(s$file)> 测试数据1
47
inc n0 1
48
sendMsg 6 特戒提示,"测试数据1"在第<$str(n0)>行
49
print 特戒提示,"测试数据1"在第<$str(n0)>行
50
&nbsp;
51
*%{color:green}delTextList%* <$str(s$file)> 测试数据1
52
sendMsg 6 特戒提示,尝试删除"测试数据1"
53
print 特戒提示,尝试删除"测试数据1"
54
&nbsp; 
55
#elseAct
56
sendMsg 6 特戒提示,文件中没有对应字符
57
print 特戒提示,文件中没有对应字符
58
break
59
&nbsp;
60
#if
61
not checkTextList <$str(s$file)> 测试数据1
62
#act
63
sendMsg 6 特戒提示,字符串删除成功
64
print 特戒提示,字符串删除成功