delphi StrLenWide 汇编统计字符串长度


本文整理自网络,侵删。

 
function StrLenWide(const Str: PWideChar): Cardinal;
asm
  {Check the first byte}
  cmp word ptr [eax], 0
  je @ZeroLength
  {Get the negative of the string start in edx}
  mov edx, eax
  neg edx
@ScanLoop:
  mov cx, [eax]
  add eax, 2
  test cx, cx
  jnz @ScanLoop
  lea eax, [eax + edx - 2]
  shr eax, 1
  ret
@ZeroLength:
  xor eax, eax
end;

相关阅读 >>

Delphi xe5 android 调用手机震动(通过jobject测试是否支持震动)

Delphi 解决android 9上无法使用http协议

Delphi adoquery1 update更新数据

Delphi 中字符串比较函数对比

Delphi 消息实现窗口最小化,最大化,关闭(Delphi)

Delphi中实现dbgrid列宽度自动调整

Delphi word转pdf两种方法

Delphi 操作键盘按下和释放操作

secsperday:一天共有多少秒

Delphi gdi+ 文本输出

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...