我想编写一个通用的缓存属性访问器,就像以下代码一样,但是当我尝试检查存储变量是否已经包含值时,会出现编译器错误:
我收到的错误是"E2015 操作符不适用于此操作数类型"。
我需要在
还是有其他库函数可以执行这个特定的检查吗?
我正在使用Delphi 2009,如果有影响的话。
附注:以防代码没有清晰地表明我想做什么:在我的情况下,由于各种原因确定实际属性值可能需要一些时间,有时我甚至可能根本不需要它们。但好的一面是这些值是不变的,所以我只想在第一次访问该属性时调用确定实际值的代码,然后将该值存储在类字段中,并在下一次访问该属性时直接返回缓存的值。以下是我希望能够使用该代码的示例:
function TMyClass.GetProp<T>(var ADataValue: T; const ARetriever: TFunc<T>): T;
begin
if ADataValue = Default(T) then // <-- compiler error on this line
ADataValue := ARetriever();
Result := ADataValue;
end;
我收到的错误是"E2015 操作符不适用于此操作数类型"。
我需要在
T
上加一个约束条件才能使它工作吗?帮助文件说Default()
可以接受任何东西,除了泛型类型。在我的情况下,我主要处理像String
、Integer
和TDateTime
这样的简单类型。还是有其他库函数可以执行这个特定的检查吗?
我正在使用Delphi 2009,如果有影响的话。
附注:以防代码没有清晰地表明我想做什么:在我的情况下,由于各种原因确定实际属性值可能需要一些时间,有时我甚至可能根本不需要它们。但好的一面是这些值是不变的,所以我只想在第一次访问该属性时调用确定实际值的代码,然后将该值存储在类字段中,并在下一次访问该属性时直接返回缓存的值。以下是我希望能够使用该代码的示例:
type
TMyClass = class
private
FSomeProp: String;
function GetSomeProp: String;
function GetProp<T>(var ADataValue: T; const ARetriever: TFunc<T>): T;
public
property SomeProp read GetSomeProp;
end;
function GetSomeProp: String;
begin
Result := GetProp<String>(FSomeProp,
function: String
begin
Result := SomeSlowOrExpensiveCalculation;
end);
end;
显然,不止一个属性。