当我的应用程序安装完毕后,我需要在注册表中写入当前日期.为此我已经在[code]部分创建了函数并试图从[registry]部分调用它,但它不起作用.如何从[registry]部分调用我的函数来获取它返回的值？

[Registry]
Root: HKLM; Subkey: SOFTWARE\MyAppName; ValueType: string; ValueName: date; ValueData: **{code:DateTime}**; Flags: createvalueifdoesntexist; Tasks: ; Languages: 
[Code]
function DateTime() : String;
begin
  result := GetDateTimeString('dd/mm/yyyy hh:nn:ss','-',':');
end;

function DateTime(param: string) : String;