我正在尝试在Delphi Rio中编译以下代码:
unit untObjectHelper;
interface
uses
SysUtils;
type
TObjectHelper = class(TInterfacedObject)
public
class procedure Clone(const objOrigem: TObject; const objDestino: TObject);
end;
implementation
uses
System.Rtti;
{ TObjectHelper }
class procedure TObjectHelper.Clone(const objOrigem,
objDestino: TObject);
begin
if not Assigned(objOrigem) then
Exit;
if not Assigned(objDestino) then
Exit;
if objOrigem.ClassType <> objDestino.ClassType then
Exit;
var contexto := TRttiContext.Create;
try
var tipo := contexto.GetType(objOrigem.ClassType);
var campos := tipo.GetFields();
finally
contexto.Free;
end;
end;
end.
但是发生以下错误:
[dcc32致命错误] untObjectHelper.pas(36):F2084内部错误: NC1921
在线:
var fields: = type.GetFields ();
版本:Embarcadero®Delphi 10.3版本26.0.33219.4899
我没有找到关于此错误的参考,有人可以帮我吗?非常感谢你
答案 0 :(得分:2)
问题在于类型推断,这要感谢Rudy Velthuis的提示
6