TStringlist.sort 默认是大小写不敏感排序，而我要大小写敏感。

[披着虎皮的石头]

procedure TForm1.Button1Click(Sender: TObject);
var St :TStringList;
begin
   St :=TStringList.Create;

  {Ascii编码：
   c 99
   C 67
   W 87
   C和W，是c小。
   c和W，是W小。

   AWSAccessKeyId 和Action，
   大小写不敏感，是Action前面，
   大小写敏感，  是AWSAccessKeyId前面。}

   St.Add('AWSAccessKeyId');
   St.Add('Action');
   St.Sort;

   ShowMessage(St.Strings[0] +' ' +St.Strings[1]);

   //显示为Action AWSAccessKeyId，说明大小写不敏感的。
   //而我要的是大小写敏感的。
end;

[林石公]

TStringList里有个属性,叫CaseSensitive

• 打赏
• 举报

回复 赞