我正在尝试编写一个帮助器类函数,而无需静态引用该帮助器类:
TMyEnum = (meA,meB,meC);
TMyEnumHelper = record helper for TMyEnum
public
class function InRange(AValue : integer) : Boolean; static;
end;
...
class function TMyEnumHelper.InRange(AValue : Integer) : Boolean;
begin
Result := (
(AValue >= Ord(Low(TMyEnum))) and
(AValue <= Ord(High(TMyEnum)))
);
end;
有没有一种方法可以动态获取帮助类? 我的意思是以下代码:
class function TMyEnumHelper.InRange(AValue : Integer) : Boolean;
begin
Result := (
(AValue >= Ord(Low(HelpedClass))) and
(AValue <= Ord(High(HelpedClass)))
);
end;
我尝试使用Self
,但是Delphi说E2003 Undeclared identifier: 'Self'