是否可以从 IActiveScript 调用具有可变数量参数的 Delphi 方法？

是的，可以从 IActiveScript 调用具有可变数量参数的 Delphi 方法。IActiveScript 是一个用于在脚本引擎中执行脚本的接口，它允许宿主程序与脚本引擎进行交互。在 Delphi 中，可以使用 IActiveScript 接口来调用具有可变数量参数的方法。

以下是一个简单的示例，展示了如何在 Delphi 中使用 IActiveScript 调用具有可变数量参数的方法：

uses ActiveX, ComObj;

function InvokeMethodWithVarArgs(const script: string; const methodName: string; const args: array of Variant): Variant;
var
  scriptControl: IActiveScript;
  scriptEngine: IUnknown;
  scriptError: IActiveScriptError;
  scriptDispatch: IDispatch;
  scriptProcedure: IDispatch;
  scriptParams: TDispParams;
  scriptResult: Variant;
  dispId: Integer;
  i: Integer;
begin
  // 创建脚本引擎
  scriptControl := CreateOleObject('ScriptControl') as IActiveScript;
  scriptControl.Language := 'JScript';

  // 加载脚本
  scriptControl.AddCode(script);

  // 获取脚本的 IDispatch 接口
  scriptControl.GetScriptDispatch('', scriptDispatch);

  // 获取方法的 IDispatch 接口
  OleCheck(scriptDispatch.GetIDsOfNames(IID_NULL, methodName, 1, LOCALE_USER_DEFAULT, @dispId));
  OleCheck(scriptDispatch.Invoke(dispId, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_METHOD, scriptParams, @scriptResult, nil, nil));

  // 设置参数
  scriptParams.cArgs := Length(args);
  scriptParams.rgvarg := @args[0];

  // 调用方法
  OleCheck(scriptDispatch.Invoke(dispId, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_METHOD, scriptParams, @scriptResult, nil, nil));

  Result := scriptResult;
end;

在上面的示例中，我们使用了 IActiveScript 接口来创建脚本引擎，并加载了一个脚本。然后，我们使用 GetIDsOfNames 方法获取方法的 IDispatch 接口，并使用 Invoke 方法调用方法。最后，我们将可变数量的参数传递给方法，并返回结果。

需要注意的是，在调用具有可变数量参数的方法时，需要确保传递的参数数量与方法所需的参数数量相匹配。如果参数数量不匹配，将会引发异常。此外，在使用 IActiveScript 时，需要注意安全问题，以避免潜在的安全漏洞。