^上面的重复标记注释是错误的.

如何从Delphi 2010程序中调用.NET库(不是注册的COM对象)的参数化方法？

具体来说,我想访问Saxon API,如文档here.具体来说,我可以创建一个XsltCompiler并读取BaseURI属性,但不能设置它.

我使用Win32 COM Server Objects(mscoree.dll和mscorlib.dll)和Late Binding已经取得了一些成功.这是由于Project-Jedi TJclClrHost组件的示例.我可以加载.NET程序集,创建.NET对象并读取简单的字符串属性或函数,而无需参数.我的问题是如何传递参数？

这个问题的例证是如何设置从Saxon .NET程序集加载的XsltCompiler的Base URI. BaseUri的API记录为here,其中显着的部分是…

public Uri BaseUri {get; set; }

使用反射,我确定setter函数的名称是’set_BaseUri’.

可以从mscorlib.dll导入的类型库中使用Late Binding / Reflection来调用此方法.相关方法如下.

_Type = interface(IDispatch)
  ['{BCA8B44D-AAD6-3A86-8AB7-03349F4F2DA2}']
....
  function InvokeMember(const name: WideString; invokeAttr: BindingFlags; const Binder: _Binder; 
                      Target: OleVariant; args: PSafeArray; modifiers: PSafeArray; 
                      const culture: _CultureInfo; namedParameters: PSafeArray): OleVariant; safecall;
...
end;

到目前为止我已经尝试过

在我的德尔福2010课程中,我写了..

FType.InvokeMember( 'set_BaseUri',BindingFlags_Public or BindingFlags_Instance or BindingFlags_InvokeMethod or
  BindingFlags_SetField or BindingFlags_SetProperty,nil,FInstance,args,modifiers,nil);

哪里：
FType类型为_Type.
args和修饰符都是一个长度为1的PSafeArray.修饰符应该是一个布尔数组,表示参数是通过引用传递还是通过值.在我们的例子中,这是一个值为False(通过值)的布尔值的数组. args应该是实际参数值的数组.

我已经尝试过各种数组元素类型,但是我不断收到错误’指定的数组不是预期的类型’.

这是我的代码,将args safeArray设置为某些字符串.

var
  args: PSafeArray;
  argsbound: TSafeArrayBound;
  PassByRef: boolean;
  Idx: integer;
  OValue: OleVariant;
begin
Idx := 0;
argsbound.cElements := 1;
argsbound.lLbound   := 0;
args := SafeArrayCreate( VT_VARIANT,1,argsbound);
OValue := 'www.abc.net.au';
SafeArrayPutElement( args,Idx,OValue);
...

我所研究的途径,但不是解决方案

> Hosting CLR in Delphi with/without JCL – example
> http://www.blong.com/Conferences/BorConUK2002/Interop2/COMNetInterop.htm

这不是重复的

ChrisF错误地将其标记为duplicate.引用的问题和答案仅指开发人员控制和写入.Net程序集的情况.如所述,尝试被调用的程序集是第三方(Saxon).这个问题已经令人满意地回答了,但不应该是重复的.