本文整理自网络，侵删。
函数名称 CompareStr
所在单元 System.SysUtils
函数原型 function CompareStr(const S1, S2: string): Integer;
函数功能 比较两个字符串的大小，返回值为 -1 [ 当 S1<S2 时 ] 或 0 [ 当 S1=S2 时 ] 或 1 [当 S1>S2 时].
比较规则：区分大小写；两个字符串的字符依次从左至右逐一比较，大小取决于字符在ASCII表中的序号，序号大的对应的字符为大。
函数备注 CompareStr 已被弃用。 建议使用 AnsiCompareStr函数，功能和使用方法与 CompareStr类似。
举例如下
var
s1, s2: string;
iResult: Integer;
begin
s1 := 'abc';
s2 := 'bac';
iResult := CompareStr(s1, s2);
case iResult of
- 1: ShowMessage('s1 < s2'); // 本次比较结果在此
0: ShowMessage('s1 = s2');
1: ShowMessage('s1 > s2');
end;
end;
相关阅读 >>
Delphi tlistview(tlistbox+图标显示)
Delphi tms web core 通过url 传递参数
Delphi winapi: getwindowrect、getclientrect - 获取窗口的外部与内部矩形
更多相关阅读请进入《Delphi》频道 >>
