阅读:1388回复:0
恳请帮忙
<P>各位大侠,我是一个MapX的新手,请多多帮忙。我想对图元的属性进行赋值,但是我的代码只能将最后一个字段的数据保存进去,前面的都丢失了。想用ftr.update报错,好像不能用,给为高手帮忙改下看问题出在哪里。</P>
<P>代码如下:</P> <P>Pnt = New MapXLib.Point<BR> Pnt.Set(rs.Fields.Item(2).Value, rs.Fields.Item(3).Value)<BR> Ftr = FeaFac.CreateSymbol(Pnt, newStyle) '创建符号</P> <P> ' For nfldno = 1 To pFlds.Count<BR> ' Lyr.KeyField = pFlds.Item(nfldno).Name<BR> 'Input #2, temp <BR> ' Ftr.KeyValue = temp<BR> ' Next nfldno<BR> ' Lyr.AddFeature(Ftr)</P> <P> '添加属性值 <BR> Dim dst As MapXLib.Dataset<BR> dst = Lyr.DataSets.Item(1)<BR> Dim j As Integer<BR> Dim Flds As MapXLib.Fields<BR> Flds = dst.Fields<BR> For j = 1 To Flds.Count<BR> Lyr.KeyField = Flds.Item(j).Name ''读取字段名称<BR> 'MessageBox.Show(Flds.Item(j).Name ; ":" ; Ftr.KeyValue)<BR> Ftr.KeyValue = j<BR> 'Ftr.Update(True)<BR> Next</P> <P> ''添加<BR> Lyr.AddFeature(Ftr)</P> |
|