在设计时存储“记录数组”的最佳方式

我需要在设计时存储一组数据，以便在运行时构造一组组件的内容。

像这样的事情：

type
  TVulnerabilityData = record
    Vulnerability: TVulnerability;
    Name: string;
    Description: string;
    ErrorMessage: string;
  end;

在设计时存储这些数据以便稍后在运行时检索的最佳方法是什么？我将有大约 20 条记录，我知道每条“记录”的所有内容，但我一直不知道存储数据的最佳方式是什么。

我想出的唯一半优雅的想法是在单元初始化时“构造”每条记录，如下所示：

var
  VulnerabilityData: array[Low(TVulnerability)..High(TVulnerability)] of TVulnerabilityData;

....

initialization
  VulnerabilityData[0].Vulnerability := vVulnerability1;
  VulnerabilityData[0].Name := 'Name of Vulnerability1';
  VulnerabilityData[0].Description := 'Description of Vulnerability1';
  VulnerabilityData[0].ErrorMessage := 'Error Message of Vulnerability1';

  VulnerabilityData[1]......
  .....
  VulnerabilityData[20]......

还有比这更好和/或更优雅的解决方案吗？

感谢您的阅读以及您可能提供的任何见解。

您还可以将数组声明为 const 并初始化它...

const
  VulnerabilityData: array[Low(TVulnerability)..High(TVulnerability)] of TVulnerabilityData =
( 
    (Vulnerability : vVulnerability1; Name : Name1; Description : Description1;  ErrorMessage : ErrorMessage1),
    (Vulnerability : vVulnerability2; Name : Name2; Description : Description2;  ErrorMessage : ErrorMessage2),
[...]
    (Vulnerability : vVulnerabilityX; Name : NameX; Description : DescriptionX;  ErrorMessage : ErrorMessageX)
    )
);

我这台计算机上没有 IDE 来仔细检查语法...可能缺少一两个逗号。但我认为这就是你应该这样做的方式。