C
cleanhands
Unregistered / Unconfirmed
GUEST, unregistred user!
我变了两个COM组件：COM1,COM2。我想在COM2中提供一个接口，将COM1的实例传入COM2中调用COM1中的方法 接口的声明为：
function TCom2.Com2ToCom1(const pCom1: IUnknown): HResult;
begin
TCom1(pCom1).Com1Show;//调用COM1的方法
end;
在我保存COM2的程序时，系统提示有数据类型转换错误或警告。
我在程序中分别创建了两个对象COM11,COM21
procedure TForm1.Button1Click(Sender: TObject);
begin
Com21.Com2ToCom1(Com11);
end;
但当运行时程序报错。
不知这种调用方法是否可行、正确？
function TCom2.Com2ToCom1(const pCom1: IUnknown): HResult;
begin
TCom1(pCom1).Com1Show;//调用COM1的方法
end;
在我保存COM2的程序时，系统提示有数据类型转换错误或警告。
我在程序中分别创建了两个对象COM11,COM21
procedure TForm1.Button1Click(Sender: TObject);
begin
Com21.Com2ToCom1(Com11);
end;
但当运行时程序报错。
不知这种调用方法是否可行、正确？