我只是想做一个com组件而已啊
新增一个unit, 
uses ADODB;
type 
  product=class(TComObject)
end;然后在 product的成员函数中用到TADOCommand
TADOCommand.Create(Aowner: TComponent)里面的参数该填什么呀
product不是从Tcomponent派生的,不能用self
我也不想从TComponent派生。还有,我想生成一个数组,用varArrayOf(...)找不到varArrayOf这个函数
想copy一个数组,Copy()也不能用
看了一下书,好象没说要什么条件才能用copy呀。