Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1228676
  • 博文数量: 788
  • 博客积分: 4000
  • 博客等级: 上校
  • 技术积分: 7005
  • 用 户 组: 普通用户
  • 注册时间: 2008-08-19 15:52
文章存档

2017年(81)

2011年(1)

2009年(369)

2008年(337)

分类:

2008-11-05 09:42:18



delphi   +mapx   (mapx   5.02.19)  
   
  1.如何进行中文标注  
       
    lyr   :=   Map1.Layers.CreateLayer('tempanimate',   EmptyParam,   1,   EmptyParam,   EmptyParam);  
      map1.Layers.AnimationLayer   :=   lyr;  
      lyr.Visible   :=   true;  
      lyr.Editable   :=   True;  
      pt   :=   CoPoint.Create;  
      mstyle   :=   CoStyle.Create;  
   
      mstyle   :=   Map1.DefaultStyle;  
   
      mstyle.PickSymbol;  
   
      adoquery1.First;  
      WHILE   NOT   adoquery1.Eof   DO  
          BEGIN  
              x   :=   ADOQuery1.fieldbyname('X').AsFloat;  
              y   :=   ADOQuery1.fieldbyname('Y').AsFloat;  
              str   :=   ADOQuery1.fieldbyname('Name').AsString;  
              pt.Set_(x,   y);  
              fts   :=   Map1.FeatureFactory.CreateSymbol(pt,   mstyle);  
   
              fts.type_   :=   miFeatureTypeSymbol;  
   
              fts.KeyValue   :=   str;//fts.keyvalue:为汉字时出现异常  
   
              lyr.AddFeature(fts,   EmptyParam);      
              ADOQuery1.Next;  
   
          END;  
      lyr.AutoLabel   :=   true;  
      lyr.Visible   :=   true;  
      lyr.ZoomMax   :=   77;  
      lyr.ZoomMin   :=   0;  
   
  创建的图层不能进行中文标注.  
  2.如何删除图层图元  
      如何删除从数据库在添加的图元,如上(添加)的图元

是mapinfo吗?如果是需要查MAPINFO。

要中文版本的才可以进行中文标注

那么2呢?  
  怎么写?

看来这个地方真的没高手拉~

我用的控件是mapx   5.02.19    
  是在程序中进行标注  
   
  不是MapInfo.Professional.7.0.SCP.中文版  
  怎么查mapinfo

?????????????



[新闻]雅虎将于12月3日关视频直播闭网站Yahoo Live
博客园首页 社区 新闻频道 小组 博问 网摘 闪存
阅读(314) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~