Z
ztliuyun
Unregistered / Unconfirmed
GUEST, unregistred user!
Corba的三层结构,希望通过在clientdataset里加入自定义信息来传递参数到服务器.
参数为2个,分别为用户帐户和用户名,类型为string;
具体做法:1.在clientdataset的BeforeApplyUpDatas事件里对参数
OwnerData(类型:OleVariant)赋值.
2.在服务器DataSetProvider的BeforeApplyUpdates事件里从参数 OwnerData
取得相应值.
由于对OleVariant各项操作很不熟悉,所以用一简单例子进行试验.
客户端clientdataset的BeforeApplyUpDatas事件里的代码:
OwnerData:=OleVariant(111);
服务器DataSetProvider的BeforeApplyUpdates事件里的代码:
var
aa:integer;
begin
aa:=integer(OwnerData);
showmessage(inttostr(aa));
end;
运行后,服务器端 aa得到的值确是0,而不是111.
百思不得其解,所以请教各位大虾救急了,怎样正确传递我的2个string类型的参数
另外,是不是corba服务器和DCOM服务器在参数传递方法上有什么差别?为什么有的
dcom传递例子不能正确运行在corba上
参数为2个,分别为用户帐户和用户名,类型为string;
具体做法:1.在clientdataset的BeforeApplyUpDatas事件里对参数
OwnerData(类型:OleVariant)赋值.
2.在服务器DataSetProvider的BeforeApplyUpdates事件里从参数 OwnerData
取得相应值.
由于对OleVariant各项操作很不熟悉,所以用一简单例子进行试验.
客户端clientdataset的BeforeApplyUpDatas事件里的代码:
OwnerData:=OleVariant(111);
服务器DataSetProvider的BeforeApplyUpdates事件里的代码:
var
aa:integer;
begin
aa:=integer(OwnerData);
showmessage(inttostr(aa));
end;
运行后,服务器端 aa得到的值确是0,而不是111.
百思不得其解,所以请教各位大虾救急了,怎样正确传递我的2个string类型的参数
另外,是不是corba服务器和DCOM服务器在参数传递方法上有什么差别?为什么有的
dcom传递例子不能正确运行在corba上