我需要在注册表中写入我的应用安装时的当前日期。为此我已经在[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;
答案 0 :(得分:7)
您必须使用字符串参数
声明该函数function DateTime(param: string) : String;
即使它没有在函数内部使用。
{code:调用允许一个字符串参数。如果省略它(就像你一样),则使用空字符串。