delphi - 使用关联字符串(键/值)的最简单方法是什么？

Question

我有很多以某种方式相关的常量，在某些时候我需要将它们配对，如下所示:

const
  key1 = '1';
  key2 = '2';
  key3 = '3';

  value1 = 'a';
  value2 = 'b';
  value3 = 'c';

我想避免这样做:

if MyValue = key1 then Result := value1;

我知道如何使用字符串列表来做到这一点:

MyStringList.Add(key1 + '=' + value1);
Result := MyStringList.Values[key1];

但是，有没有更简单的方法来做到这一点？

Answer 1

是的，可以通过这种方式完成赋值，避免手动字符串连接:

MyStringList.Values[Key1] := Value1;