很久没开源了
开个 自己模块的函数
上个简单效率对比
|
LeftbyChar | 文本型 | | |
Data | 文本型 | | | | Num | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | pData | 整数型 | | | pIndex | 整数型 | | | tp | 文本型 | | | i | 整数型 | | |
pData = 取变量数据地址 (Data )pIndex = pData 判断循环首 (指针到文本 (pIndex ) ≠ “”)计次循环首 (Num - 1, i )pIndex = CharNext (pIndex )计次循环尾 ()判断 (Num ≤ 0 )tp = “”tp = 取文本左边 (指针到文本 (pData ), CharNext (pIndex ) - pData )跳出循环 ()判断循环尾 ()返回 (tp )|
RightbyChar | 文本型 | | |
Data | 文本型 | | | | Num | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | pBegin | 整数型 | | | pData | 整数型 | | | pIndex | 整数型 | | | tp | 文本型 | | | i | 整数型 | | |
pBegin = 取变量数据地址 (Data )pData = 取变量数据地址 (Data ) + 取文本长度 (Data )pIndex = pData 判断循环首 (pIndex ≥ pBegin )计次循环首 (Num, i )pIndex = CharPrev (pBegin, pIndex )计次循环尾 ()判断 (Num ≤ 0 )tp = “”tp = 取文本右边 (指针到文本 (pBegin ), pData - pIndex )跳出循环 ()判断循环尾 ()返回 (tp )
用到的API
|