求ACTIVEX向JS传递参数的办法

Question

我是用DELPHI做的ACTIVEX 在activex中添加带参数的方法，在JS中调用，但发现数据传递不过来
JS中是这样写的<script language="javascript" type="text/javascript">
function Button1_onclick() {
var ret ; 
var a 
ret = "com1"; 
ret = reader.open(ret,a);
alert(a);
}
</script>delphi中procedure TReader.open(var comNo: OleVariant; out a: OleVariant);
begin
   a:=123;end;

Answer 1

输入参数不要用var, 输出参数别用olevariant, 试试BSTR
或者直接返回bstr
function TReader.open(const comNo: widestring):widestring;
begin
  result:=123;
end;