OTA设置Delphi项目Keys选项

Question

如何设置 Delphi 项目选项 FileDescription？ 当我尝试

ProjectOptions.Values['Keys'].SetOptionsValue('FileDescription', Title);

（标题是一个字符串）
我得到了无效的变体操作

Answer 1

在ToolsApi 单元中读取IOTAProjectOptions 声明上方的cmets。 试试这样的：

var
  Options: TStrings;
begin
  Options := TStrings(Integer(ProjectOptions.Values['Keys']));
  if Assigned(Options) then
    Options.Values['FileDescription'] := Title;
end;