整理优化编码_URL解码功能

jr21066

御风软件 发表于 2018-8-28 20:57
用到了快速文本对象，好像是另外的支持库，精易模块，应该不会采纳的。

因为模块只使用核心库和API,就算 ...

谢谢.果然还是有要求的.
我再找找那个更适合一些.

御风软件

用到了快速文本对象，好像是另外的支持库，精易模块，应该不会采纳的。

因为模块只使用核心库和API,就算采纳，肯定也得换个别的，比如他内置的那个通过打开内存文件的“快速文本”对象

不过，如果你有更好的不依赖支持库的快速文本，可以修改下，那还是不错的。那样子，说不定，不用修改，直接采纳了

jr21066

莫名的又删除了好多代码.感觉可以这么简单了.

  

DLL命令名	返回值类型	公开	备 注
StrToIntExA	逻辑型
DLL库文件名:
shlwapi.dll
在DLL库中对应命令名:
StrToIntExA
参数名	类 型	传址	数组	备 注
pszString	文本型
dwFlags	整数型
piRet	整数型

子程序名	返回值类型	公开	备 注
编码_URL解码_API	文本型
参数名	类 型	参考	可空	数组	备 注
局_参数一	文本型

变量名	类 型	静态	数组	备 注
局_源文本	快速文本对象
局_结果	快速文本对象
局_偏移	整数型

局_源文本.置文本 (局_参数一)
局_偏移 ＝ 1
判断循环首 (局_偏移 ＜ 局_源文本.取长度 ())
如果真 (局_源文本.取文本 (局_偏移, 1) ＝ “%”)
局_结果.添加 (字符 (十六到十_ (局_源文本.取文本 (局_偏移 ＋ 1, 2))))
局_偏移 ＝ 局_偏移 ＋ 2
局_偏移 ＝ 局_偏移 ＋ 1
判断循环尾 ()
返回 (局_结果.取文本 (, ))

子程序名	返回值类型	公开	备 注
十六到十_	整数型
参数名	类 型	参考	可空	数组	备 注
十六进制	文本型

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

如果真 (StrToIntExA (“0x” ＋ 十六进制, 1, TXT))
返回 (TXT)
返回 (0)

i支持库列表	支持库注释
commobj	通用对象支持库

.版本 2<br /> <br /> .DLL命令 StrToIntExA, 逻辑型, "shlwapi.dll", "StrToIntExA"<br />     .参数 pszString, 文本型<br />     .参数 dwFlags, 整数型<br />     .参数 piRet, 整数型, 传址<br /> .版本 2<br /> .支持库 commobj<br /> <br /> .子程序 编码_URL解码_API, 文本型<br /> .参数 局_参数一, 文本型<br /> .局部变量 局_源文本, 快速文本对象<br /> .局部变量 局_结果, 快速文本对象<br /> .局部变量 局_偏移, 整数型<br /> <br /> 局_源文本.置文本 (局_参数一)<br /> 局_偏移 ＝ 1<br /> .判断循环首 (局_偏移 ＜ 局_源文本.取长度 ())<br />     .如果真 (局_源文本.取文本 (局_偏移, 1) ＝ “%”)<br />         局_结果.添加 (字符 (十六到十_ (局_源文本.取文本 (局_偏移 ＋ 1, 2))))<br />         局_偏移 ＝ 局_偏移 ＋ 2<br />     .如果真结束<br />     局_偏移 ＝ 局_偏移 ＋ 1<br /> .判断循环尾 ()<br /> 返回 (局_结果.取文本 (, ))<br /> <br /> .子程序 十六到十_, 整数型<br /> .参数 十六进制, 文本型<br /> .局部变量 TXT, 整数型<br /> <br /> .如果真 (StrToIntExA (“0x” ＋ 十六进制, 1, TXT))<br />     返回 (TXT)<br /> .如果真结束<br /> 返回 (0)

jr21066

cf2006a 发表于 2018-8-28 17:26
[e=0].版本 2

.子程序 十六到十, 长整数型

经测试.还是API的速度快一些.

cf2006a

  

子程序名	返回值类型	公开	备 注
十六到十	长整数型
参数名	类 型	参考	可空	数组	备 注
_参数1	文本型

置入代码 ({ 81, 83, 86, 87, 51, 192, 51, 210, 51, 201, 51, 219, 139, 117, 8, 139, 54, 133, 246, 116, 76, 144, 131, 249, 16, 116, 70, 138, 30, 128, 251, 48, 114, 63, 128, 251, 57, 119, 5, 128, 235, 48, 235, 28, 128, 251, 65, 114, 48, 128, 251, 70, 119, 5, 128, 235, 55, 235, 13, 128, 251, 97, 114, 33, 128, 251, 102, 119, 28, 128, 235, 87, 131, 249, 8, 114, 10, 139, 248, 193, 239, 28, 193, 226, 4, 9, 250, 193, 224, 4, 9, 216, 65, 70, 235, 182, 144, 95, 94, 91, 89, 139, 229, 93, 194, 4, 0 })
返回 (0)

.版本 2<br /> <br /> .子程序 十六到十, 长整数型<br /> .参数 _参数1, 文本型<br /> <br /> 置入代码 ({ 81, 83, 86, 87, 51, 192, 51, 210, 51, 201, 51, 219, 139, 117, 8, 139, 54, 133, 246, 116, 76, 144, 131, 249, 16, 116, 70, 138, 30, 128, 251, 48, 114, 63, 128, 251, 57, 119, 5, 128, 235, 48, 235, 28, 128, 251, 65, 114, 48, 128, 251, 70, 119, 5, 128, 235, 55, 235, 13, 128, 251, 97, 114, 33, 128, 251, 102, 119, 28, 128, 235, 87, 131, 249, 8, 114, 10, 139, 248, 193, 239, 28, 193, 226, 4, 9, 250, 193, 224, 4, 9, 216, 65, 70, 235, 182, 144, 95, 94, 91, 89, 139, 229, 93, 194, 4, 0 })<br /> 返回 (0)

本孤癖

牛逼 正好需要