|
http://bbs.justep.com/forum.php? ... ghlight=LastIndexOf
和这个帖子中同样的问题。
if length(temp)<=35 then
begin
str1 := temp.Substring(0,length(temp));
temp:='';
end else
begin
if temp.Substring(0,35).LastIndexOf(',')>0 then str1:=temp.Substring(0,str1.LastIndexOf(',')+1) else
if temp.Substring(0,35).LastIndexOf(' ')>0 then str1:=temp.Substring(0,str1.LastIndexOf(' ')+1) else str1:=temp.Substring(0,35);
temp:= temp.Substring(length(str1)-1,length(temp)-length(str1));
end;
同样报地址错误;版本3.0.6.2800 |
|