去掉整数前面多余的0

最新推荐文章于 2024-05-17 16:26:49 发布

转载最新推荐文章于 2024-05-17 16:26:49 发布 · 935 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/semth/p/10677187.html

文章标签：

#php #lua #python

var
str, lstmpdata, temp: string;
begin
// str := '00030.0';
// str := '00.2';
lstmpdata := '<0020.0';
if (Copy(lstmpdata,1,1)='>' )Or (Copy(lstmpdata,1,1)='<') then
begin
temp:= Copy(lstmpdata,1,1) ;
lstmpdata:= Copy(lstmpdata,2,length(lstmpdata)-1) ;
ShowMessage(lstmpdata);
ShowMessage(Copy(lstmpdata, 1, 1));
ShowMessage(Copy(lstmpdata, 2, 1));
end;

while (Copy(lstmpdata, 1, 1) = '0') and (Copy(lstmpdata, 2, 1) <> '.') do
begin
lstmpdata := copy(lstmpdata, 2, length(lstmpdata) - 1);
end;
lstmpdata:=temp+lstmpdata ;
ShowMessage(lstmpdata);
end;

转载于:https://www.cnblogs.com/semth/p/10677187.html