关于OLE编程(100分)

  • 主题发起人 主题发起人 superhippo
  • 开始时间 开始时间
S

superhippo

Unregistered / Unconfirmed
GUEST, unregistred user!
在BCB6中的代码
Variant v = Variant::CreateObject("SomeServer.Server");
v.OleProcedure("SomeProce",Param...);

与之对应的Delphi代码该如何写?
 
var
v: Variant;
bgein
v := CreateOleObject('SomeServer.Server');
v.SomeProce(Param, ...);
end;
 
这么写我与知道,但问题是在这么一段程序中
BCB
void execoleserver(AnsiString Server,AnsiString Proc)
{
Variant v = Variant::CreateObject(Server);
v.OleProcedure(Proc);
}

而在Delphi中该如何来写呢?
 
procdeure execoleserver(Server,Proc:String)
var
v:Variant;
begin
v:=CreateObject(Server);
v.OleProcedure(Proc);
end;
 
但问题是
在Delphi中没有v.OleProcedure()可用
 
后退
顶部