R
risingsoft
Unregistered / Unconfirmed
GUEST, unregistred user!
在ActiveX(或ActiveForm)方法中多值返回问题,能用var吗?
我做的ActiveForm提供一接口方法
procedure TzkChartControl.varTest(var v: Integer);
begin
v := 10;
end;
在test.htm中javascript中代码如下：
<script language=javascript>
//基本测试
function btnTest_onclick(){
//test
var i=0;
objChart.varTest(i);
window.alert("i="+i);
}
</script>
<body>
<input type=button value="基本测试"
name=btnTest class=input onclick="btnTest_onclick();"
></input>
<OBJECT id="objChart"
height="100%"
width="100%"
classid="clsid:{xxxx-xxxx...xxxx-xxxx}"
VIEWASTEXT>
</body>
但是i总是为0，并不能正确返回10，该怎么实现呢，比如我要同时返回多个变量
procedure TzkChartControl.varTest(var v: Integer;key:WideString);
begin
v := 10;
key := 'key10';
end;
我做的ActiveForm提供一接口方法
procedure TzkChartControl.varTest(var v: Integer);
begin
v := 10;
end;
在test.htm中javascript中代码如下：
<script language=javascript>
//基本测试
function btnTest_onclick(){
//test
var i=0;
objChart.varTest(i);
window.alert("i="+i);
}
</script>
<body>
<input type=button value="基本测试"
name=btnTest class=input onclick="btnTest_onclick();"
></input>
<OBJECT id="objChart"
height="100%"
width="100%"
classid="clsid:{xxxx-xxxx...xxxx-xxxx}"
VIEWASTEXT>
</body>
但是i总是为0，并不能正确返回10，该怎么实现呢，比如我要同时返回多个变量
procedure TzkChartControl.varTest(var v: Integer;key:WideString);
begin
v := 10;
key := 'key10';
end;
]
]