取字符串长度 

//取字符串长度
function Len(const value: string): integer;
begin
  if Value='' then
     result:= 0 
  else
    result:= PInteger(Integer(Value)-4)^;
end;

 

posted @ 2021-01-18 20:48  Thenext  阅读(97)  评论(0)  编辑  收藏  举报