获取Delphi中重载类构造函数的地址

Question

我想获取每个重载类构造函数的地址。

TSomeClass = class
public
  constructor Create; overload;
  constructor Create(Value: String); overload;
end;

procedure Problem;
var
  Address1, Address2: Pointer;
begin
  Address1 := @TSomeClass.Create;
  Address2 := @TSomeClass.Create; // I want the address of constructor Create(Value: String) here. 
end;

如何获取构造函数Create（Value：String）的地址？ 任何帮助，将不胜感激。感谢。