delphi中如何比较字符串的大小里面内容都是数字

2025-02-23 20:59:30

推荐回答（5个）

回答1：

function IsNumberic(Vaule:String):Boolean; //判断Vaule是不是数字
var
i:integer;
begin
result:=true; //设置返回值为是（真）
Vaule:=trim(Vaule); //去空格
for i:=1 to length(Vaule) do //准备循环
begin
if not Vaule[i] in ['0'..'9'] then //如果Vaule的第i个字不是0-9中的任一个
begin
result:=false; //返回值不是（假）
exit; //退出函数
end;
end;
end;

用这个函数判断即可

回答2：

如果都是数字的话，直接转成浮点型或者整形，然后直接比较即可

回答3：

直接比较
lstrcmp(s1, s2)
　当s1　　当s1=s2时，返回值=0
　　当s1>s2时，返回值>0

需要windows.pas

回答4：

function comparestr(s1, s2:string): boolean;
var
a, b: integer;
begin
a := strtoint(s1);
b := strtoint(s2);
result := (a > b);
end;

回答5：

把字符串里的数字分开存在strings 再进行操作