delphi SysUtils.CompareStr、SysUtils.CompareText - 字符串比较

本文整理自网络，侵删。

 SysUtils.CompareStr、SysUtils.CompareText - 字符串比较
CompareStr 区分大小写; CompareText 不区分大小写. 举例:
--------------------------------------------------------------------------------

var
s1,s2: string;
i: Integer;
begin
s1 := 'abc';
s2 := 'adc';
i := CompareStr(s1,s2);
ShowMessage(IntToStr(i)); {-2}

i := CompareText(s1,s2);
ShowMessage(IntToStr(i)); {-2}

s1 := 'abc';
s2 := 'ABC';
i := CompareStr(s1,s2); {CompareStr 区分大小写}
ShowMessage(IntToStr(i)); {32}

i := CompareText(s1,s2); {CompareText 不区分大小写}
ShowMessage(IntToStr(i)); {0}
end;

 

相关阅读 >>

Delphi 判断正在运行的设备是iphone还是ipad

删除Delphi组件tstringlist中的重复项目

Delphi int64：是Delphi中最大的整数，64位有符号整数

Delphi转换长文件名函数 getshortname

Delphi中控制扫描仪

Delphi 动态创建组件，单个创建、单个销毁

Delphi ioutils单元查找文件夹高级功能

Delphi 实现数据库读取图片文件

Delphi 中的包开发

Delphi rest服务器返回图像并显示在浏览器中

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

转载请注明出处：木庄网络博客 » delphi SysUtils.CompareStr、SysUtils.CompareText - 字符串比较