很快的删除空格，tab，换行

神女软件定制

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
t	整数型

t ＝ 取启动时间 ()
计次循环首 (100000, )
删全部空 ( #常量1 )
计次循环尾 ()
调试输出 (“删全部空：”, 取启动时间 () － t)
t ＝ 取启动时间 ()
计次循环首 (100000, )
删空格换行TAB ( #常量1 )
计次循环尾 ()
调试输出 (“删空格换行TAB：”, 取启动时间 () － t)

子程序名	返回值类型	公开	备 注
删空格换行TAB	文本型
参数名	类 型	参考	可空	数组	备 注
cs_文本	文本型

变量名	类 型	静态	数组	备 注
bin	字节集
rPos	整数型
wPos	整数型
c	字节型

bin ＝ 到字节集 (cs_文本) ＋ { 0 }
循环判断首 ()
rPos ＝ rPos ＋ 1
c ＝ bin [rPos]
如果真 (c ≠ 32 且 c ≠ 10 且 c ≠ 13 且 c ≠ #Tab键 )
wPos ＝ wPos ＋ 1
bin [wPos] ＝ c

循环判断尾 (c ≠ 0)
返回 (到文本 (bin))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 t, 整数型<br /> <br /> t ＝ 取启动时间 ()<br /> .计次循环首 (100000, )<br />     删全部空 (#常量1)<br /> .计次循环尾 ()<br /> 调试输出 (“删全部空：”, 取启动时间 () － t)<br /> t ＝ 取启动时间 ()<br /> .计次循环首 (100000, )<br />     删空格换行TAB (#常量1)<br /> .计次循环尾 ()<br /> 调试输出 (“删空格换行TAB：”, 取启动时间 () － t)<br /> <br /> .子程序 删空格换行TAB, 文本型<br /> .参数 cs_文本, 文本型<br /> .局部变量 bin, 字节集<br /> .局部变量 rPos, 整数型<br /> .局部变量 wPos, 整数型<br /> .局部变量 c, 字节型<br /> <br /> bin ＝ 到字节集 (cs_文本) ＋ { 0 }<br /> .循环判断首 ()<br />     rPos ＝ rPos ＋ 1<br />     c ＝ bin [rPos]<br />     .如果真 (c ≠ 32 且 c ≠ 10 且 c ≠ 13 且 c ≠ #Tab键)<br />         wPos ＝ wPos ＋ 1<br />         bin [wPos] ＝ c<br />     .如果真结束<br /> <br /> .循环判断尾 (c ≠ 0)<br /> 返回 (到文本 (bin))

优化了下，好像还快点了呢……

承易

好东西 正需要 好用 不错

zuiqi520

999999999999

lmwdz

支持开源！！！！！！！！

makdong2010

支持开源~！感谢分享

蓝河笑月

支持开源~！感谢分享

默念、

谢谢 确实很快

ghost12

支持开源~！感谢分享

六升臣

mk确实不错

神女软件定制

sofs 发表于 2020-8-11 21:20
这样处理效率非常低，异常低！

这是效率最高的。

sofs

这样处理效率非常低，异常低！