delphi - TStringList名称-值对的特殊字符限制？

Question

我有一个TStringList，其中装有数千个“名称/值”对。
其中之一是
004001000002000=Timbre2 Volume 0~127 4995

我通过使用字符串'004001000002000'调用IndexOfName来找到特定的索引。我希望ValueFromIndex返回字符串'Timbre2 Volume 0〜127 4995'

相反，当我使用ValueFromIndex访问此值时，它将返回字符串：

~127 4995

是什么原因造成的？ Tilde是一种特殊字符，会导致字符串被截断吗？我可以将它设置为其他吗？

Answer 1

我无法在TButton.OnClick事件中使用以下代码重现该问题（Delphi 2007和Delphi 7-Delphi 2007测试中的屏幕截图）：

procedure TForm2.Button2Click(Sender: TObject);
var
  SL: TStringList;
  i: Integer;
begin
  SL := TStringList.Create;
  try
    SL.Add('004001000002000=Timbre2 Volume 0~127 4995');
    SL.Add('ABCDEF=Testing 1 2 3');
    i := SL.IndexOfName('004001000002000');
    if i > -1 then
      ShowMessage(SL.ValueFromIndex[i])
    else
      ShowMessage('IndexOfName returned -1');
  finally
    SL.Free;
  end;
end;

这将正确显示预期的对话框：



我还使用更简单的方法进行了测试：

    ShowMessage(SL.Values['004001000002000']);

这显示了相同的 ShowMessage对话框。