delphi - delphi 如何翻译数组中声明的字符串？

我们在 delphi 中有应用程序，现在我们正在实现语言翻译功能。我们在 core 中添加了代码来翻译在 ResourceString 中声明的字符串。它工作正常，但在 Array 中声明的字符串未翻译。
例子

resourcestring
 Error_Text = 'Invalid Value';

这是工作正常。

Const
 ERROR_TYPE : Array[0..2] of String = ('Invalid Name', 'Invalid Age', 'Invalid Address');

如何将这些数组值添加到资源字符串中？

最佳答案

我认为你不能直接拥有一个 resourcestring 数组。我会尝试一个函数，例如:

resourcestring
  ERROR_TYPE0 = 'Invalid Name';
  ERROR_TYPE1 = 'Invalid Age';
  ERROR_TYPE2 = 'Invalid Address';

type
  TMyIndexType = 0..2;

function ERROR_TYPE(AIndex: TMyIndexType): string;
begin
  case AIndex of
    0: Result := ERROR_TYPE0;
    1: Result := ERROR_TYPE1;
    2: Result := ERROR_TYPE2;
    else
      // appropriate error handling
  end;
end;

关于delphi - delphi 如何翻译数组中声明的字符串？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/52758355/