L
liuge
Unregistered / Unconfirmed
GUEST, unregistred user!
SvrManager ,SrvCmd , SvrValue是VC++写的COM对象,看下面的代码:
Var SvrManager ,SrvCmd , SvrValue:Varaint;
begin
SvrManager:=CreateOleObject('APPServerIF.AppServerManager'); //创建SvrManager
SrvCmd:=SvrManager.CreateMethodCall; //创建SrvCmd
SvrValue := SvrManager.CreateValue; //创建SvrManager
SvrValue.SetLong(21); //调用SvrValue的一个方法,成功
SrvCmd.SetParameter('abc',SvrValue); //调用SrvCmd的SetParameter方法,失败!!!
end;
运行到SrvCmd.SetParamete时,报"不正确的变量类型"错误.
SetParameter的第二个参数要求一个IDispatch, 我希望把SvrValue传进SetParameter
处理. 但VC++写的接口方法中只要有IDispatch的类型,我在Delphi中调用就不成功.
Var SvrManager ,SrvCmd , SvrValue:Varaint;
begin
SvrManager:=CreateOleObject('APPServerIF.AppServerManager'); //创建SvrManager
SrvCmd:=SvrManager.CreateMethodCall; //创建SrvCmd
SvrValue := SvrManager.CreateValue; //创建SvrManager
SvrValue.SetLong(21); //调用SvrValue的一个方法,成功
SrvCmd.SetParameter('abc',SvrValue); //调用SrvCmd的SetParameter方法,失败!!!
end;
运行到SrvCmd.SetParamete时,报"不正确的变量类型"错误.
SetParameter的第二个参数要求一个IDispatch, 我希望把SvrValue传进SetParameter
处理. 但VC++写的接口方法中只要有IDispatch的类型,我在Delphi中调用就不成功.