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中获取当前用户sid

Delphi文件无法拖拽功能失效

Delphi中tinifile类 操作ini文件

Delphi tstrings 随机打乱

Delphi 捕捉异常:try..except..end

Delphi中datetimepicker控件同时输入日期和时间

Delphi的unicode与gb2312转转换,汉字unicode转gb2312

Delphi 释放bitmap

Delphi 多次改变 richedit.text部份文本的颜色后，出现所有字体都变色的的解决办法

Delphi 获取时间日期

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

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