如何從實例類獲取屬性名稱

Question

我需要從對象類獲取屬性名稱作為字符串。 在德爾福有可能嗎？

我需要將屬性傳遞作為方法的參數，並將屬性名稱作為字符串。 我不想使用屬性名稱作為參數，因為當在類中更改屬性名稱時，編譯器不會捕獲錯誤。

type
  TMyClass = class
  private
    fField: some_type;
  public
    property Field:some_type read fField;
  end;

function GetPropertyName(arg: ??):string
begin
  Result := arg.PropertyName; // here I need get property name form transfer type
end;

var
  obj: TMyClass;
  name: string;
begin
  name := GetPropertyName(obj.Field);  
end;

為了澄清，正如評論中所討論的，我正在尋找與C＃ nameof函數直接等效的函數。

Answer 1

從注釋中可以清楚地看出，您正在尋找與C＃ nameof函數等效的Delphi。

Delphi中不存在這樣的等效項，並且該語言不具備您自己創建它的便利。 相反，您將需要在代碼中將該方法命名為字符串文字。