S
seawind0
Unregistered / Unconfirmed
GUEST, unregistred user!
我想做一个接口的某个属性能返回值为另一个接口。
于是,我在NEW|ACTIVEX|ACTIVEX LIBRARY,然后又NEW了一个COM OBJECT,接口名为
Iitems,COCLASS为items;接着在类型库里又添加了一个COCLASS为item,INTERFACE为Iitem,
NEW了一个属性NAME;然后在IITEMS里新建了一个属性ITEM,在读属性中返回值设为IITEM*。
,又新建了一个ADD方法,参数类型为IITEM*,然后我这样调:
VAR
Its:items;
it:item;
BEGIN
ITS:=coitems.create;
it:=coitem.create;//这一行出错了,报告EOLEsyserror with message“类未注册”
it:=its.item;//我想这样,但只出来了GET_ITEM和SET_ITEM(这两个应该屏蔽,怎么出来了啊?),却就是没有ITEM?
its.add(it);//如果前面两行都注释,这样却不出错
showmessage(it.name);//其实单元里根本没有SET_NAME和GET_NAME方法,为什么?
ITS:=NIL;
IT:=NIL;
END;
而如果不新建ITEM这个COCLASS,只新建了Iitem接口,再加入到Iitems类里,好象也不行。
以上问题好困惑啊,我正准备写COM,不知道该怎么办,希望有经验高手能回答。
于是,我在NEW|ACTIVEX|ACTIVEX LIBRARY,然后又NEW了一个COM OBJECT,接口名为
Iitems,COCLASS为items;接着在类型库里又添加了一个COCLASS为item,INTERFACE为Iitem,
NEW了一个属性NAME;然后在IITEMS里新建了一个属性ITEM,在读属性中返回值设为IITEM*。
,又新建了一个ADD方法,参数类型为IITEM*,然后我这样调:
VAR
Its:items;
it:item;
BEGIN
ITS:=coitems.create;
it:=coitem.create;//这一行出错了,报告EOLEsyserror with message“类未注册”
it:=its.item;//我想这样,但只出来了GET_ITEM和SET_ITEM(这两个应该屏蔽,怎么出来了啊?),却就是没有ITEM?
its.add(it);//如果前面两行都注释,这样却不出错
showmessage(it.name);//其实单元里根本没有SET_NAME和GET_NAME方法,为什么?
ITS:=NIL;
IT:=NIL;
END;
而如果不新建ITEM这个COCLASS,只新建了Iitem接口,再加入到Iitems类里,好象也不行。
以上问题好困惑啊,我正准备写COM,不知道该怎么办,希望有经验高手能回答。