如何在Delphi中将指针类型数组传递给RttiMethods.Invoke

uses
  Rtti, RttiMethods;

procedure InvokeMethodWithPointerArray;
var
  ctx: TRttiContext;
  rttiType: TRttiType;
  method: TRttiMethod;
  params: TArray<TValue>;
  pointerArray: array of Pointer;
begin
  // Step 1: Import RTTI and RttiMethods units

  // Step 2: Create TRttiContext object
  ctx := TRttiContext.Create;

  try
    // Step 3: Get RTTI information for pointer type
    rttiType := ctx.GetType(TypeInfo(Pointer));

    // Step 4: Get the method to invoke
    method := rttiType.GetMethod('MethodName');

    // Step 5: Create TValue array for method parameters
    SetLength(params, 1);

    // Step 6: Convert pointer array to TValue
    SetLength(pointerArray, 3);
    pointerArray[0] := Pointer(123);
    pointerArray[1] := Pointer(456);
    pointerArray[2] := Pointer(789);
    params[0] := TValue.From<Pointer>(pointerArray);

    // Step 7: Invoke the method
    RttiMethods.Invoke(nil, method, params, nil);
  finally
    ctx.Free;
  end;
end;