以前我这样做都是可以现在怎么不行了????
有一控件的方法在输出参数返回值:
在类型库中是这样:
[
id(0x00000004)
]
HRESULT _stdcall test([out] VARIANT * testout );
函数是这样:procedure TTransControlCtrl.test(out testout: OleVariant);
begin
testout := '1234';
end;在网页上是这样:
function button1_onclick() {
var str;
TransControlCtrl1.test(str);
alert(str);
}
为什么老是说undefinded????
有一控件的方法在输出参数返回值:
在类型库中是这样:
[
id(0x00000004)
]
HRESULT _stdcall test([out] VARIANT * testout );
函数是这样:procedure TTransControlCtrl.test(out testout: OleVariant);
begin
testout := '1234';
end;在网页上是这样:
function button1_onclick() {
var str;
TransControlCtrl1.test(str);
alert(str);
}
为什么老是说undefinded????
解决方案 »
- P2P穿关不成功
- delphi 多线程 界面 卡住的问题 ,求高手 帮助!
- 关于指针的优化和指针的地址偏移问题
- StrToFloat轉換後的數據比較問題,非常奇怪,請高手指點!急~~~~
- 如何获得启动参数,高手才进来
- 100分求解。关于在jsp中调用ActiveX接口函数的问题,救命!!!
- 是否backup database databasename to disk='c:\' with NOINIT就是增量备份?
- 求教:BCB 用Ole打开word的异常
- 急啊?求解啊?
- 邪门的更新资源-UpdateResource
- ★★在dbgrid中如何让为零的值不显示?★★
- 请问fastreport如何画斜线啊?急哦
undefinded哪个?
发现在网页上用vbscript可以的
sub button_onclick
dim str
TransControlCtrl1.test(str)
msgbox(str)
end sub
这是可以传出值的。