如何翻译delphi中在Array中声明的字符串？

发布时间：2020-12-15 09:26:31 所属栏目：大数据来源：网络整理

导读：我们在delphi中有应用程序,现在我们正在实现语言翻译功能.我们在core中添加了代码来翻译在ResourceString中声明的字符串.它工作正常,但在Array中声明的字符串未翻译. 例 resourcestring Error_Text = 'Invalid Value'; 这工作正常. Const ERROR_TYPE : Array

我们在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数组.我会尝试一个函数,例如：

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;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!