给一个记录集赋值

请教各位了：给一个新建的记录集赋值，而不是用set赋一个引用？

<P>参考一下吧。        </P>
<P>       recs->AddNew();<BR>        recs->Fields->Item(TVariant("Shape"))->set_Value((TVariant)(IDispatch*)m_point);</P>
<P>          fields->Item(TVariant("Name"))->set_ValueAsString(WideString(m_Name[1]));<BR>          fields->Item(TVariant("Number"))->set_ValueAsString(WideString(m_Number[1]));</P>