delphi 字符串对比比较

字符串对比:

//--------------------------------------------------------------------------------

var

str1, str2: string;

n: Integer;

begin

str1 := 'ABC 123';

str2 := 'abc 123';

n := str1.CompareTo(str2); // -32

n := str1.Compare(str1, str2); // 1

n := str1.CompareText(str1, str2); // 0; 相同

n := str1.Compare(str1, str2, True); // 0; 不区分大小写

n := str1.CompareOrdinal(str1, str2); // -32

n := str1.Compare(str1, 4, str2, 4, 3); // 0; 只对比后三位

end;

推荐分享