yaohongbo_play
路人甲
路人甲
  • 注册日期2003-10-16
  • 发帖数39
  • QQ85043308
  • 铜币182枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:1444回复:1

mo在Delphi中的_Parts是什么?

楼主#
更多 发布于:2003-10-20 18:31
我以前的创建Polygon的方法是:
      poly:=EndTrackPolygon;
      if not VarIsNull(poly) then
      begin
        Poly_LS:=CoPolygon.Create;
        Poly_LS.Parts.Add(poly.Parts.Item(0));
        m_polys.Add(poly);
        ClearTrackShape;
        Map1.TrackingLayer.Refresh(True,Map1.Extent);
      end;
这段代码生成的图形不能够保存到SDE图层中,出现Update Failed错误。于是改成了如下代码:
      poly:=EndTrackPolygon;
      if not VarIsNull(poly) then
      begin
        Poly_LS:=CoPolygon.Create;
        Poly_LS.Parts.Add(poly.Parts.Item(0));
       //增加部分//
        try
          Poly_LS._Parts:=poly._Parts;
          StatusBar1.Panels[0].Text:='警告:Poly_LS._Parts赋值成功!';
        except
          StatusBar1.Panels[0].Text:='警告:Poly_LS._Parts赋值异常!';
        end;
        //增加结束//
        m_polys.Add(poly);
        ClearTrackShape;
        Map1.TrackingLayer.Refresh(True,Map1.Extent);
      end;
这回生成的图形保存到SDE图层中可以。
但是每次增加图形,执行到Poly_LS._Parts:=poly._Parts;时都出现异常。这样看来有没有增加的那段代码都无所谓,但实际的运行效果是,不增加那段代码,保存不上。这到底是怎么一回事呢,真实奇怪???!!!!
喜欢0 评分0
cafecat
路人甲
路人甲
  • 注册日期2003-07-29
  • 发帖数375
  • QQ
  • 铜币894枚
  • 威望0点
  • 贡献值0点
  • 银元0个
1楼#
发布于:2003-10-20 19:36
把parts先赋值给points对象,然后再用polygon的parts对象的add方法添加
我说的是vb里面的方法,但delphi里是类似的
http://3s2go.blogspot.com/
举报 回复(0) 喜欢(0)     评分
游客

返回顶部