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;

SysUtils 單元下的公用函數目錄