Wie *schnell* auf Properties anhand eines String-Bezeichners zugreifen?

[jaenicke]

Am schnellsten wäre, wenn du ein Dictionary mit dem Feldnamen und dem Pointer auf den jeweiligen Getter erstellst. Dazu noch ein bisschen Casting und eine Prise Generics, dann sollte so etwas in der Art möglich sein:

Code:

type
  TGenericGetter<T> = function: T of object;

FFields: TDictionary<string, Pointer>;

function TFieldAccess.Get<T>(const AObject: TObject; AFieldName: string; out AData: T): Boolean;
var
  FieldAddress: Pointer;
  Getter: TGenericGetter<T>;
  GetterMethod: TMethod;
begin
  Result := FFields.TryGet(AFieldName, FieldAddress);
  if Result then
  begin
    GetterMethod.Data := AObject;
    GetterMethod.Code := FieldAddress;
    AData := TGenericGetter<T>(GetterMethod);
  end;
end;