superhjw
路人甲
路人甲
  • 注册日期2004-09-08
  • 发帖数5
  • QQ
  • 铜币121枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:1507回复:1

非得帮主来,高手来指导>>用miDataSetADO自动生成图元的问题!!!

楼主#
更多 发布于:2004-09-17 14:01
<P>  ds := Map.Datasets.Add(miDataSetADO,//数据集类型,这是miDataSetADO,即ADO专用的
                        pQuery.Recordset,//使用这个方法获得ADO中的_Recordset类型
                        pDataSetName,//数据集名称
                        GeoField,//传入的是Xunit表中的字段ID的名称
                        EmptyParam,
                        oBLayer,//BindLayer
                        EmptyParam,
  EmptyParam);</P>
<P>用以上语句后自动生成了五角星的符号。但是我用如下语句改变其样式总是无效,用Feature.picksombol,依旧无法改变其五角星的符号。请问我要怎么改变?</P>
<P>//以下代码对miadodataset的miBindLayerTypeXY绑定方式生成的Sombol修改无效,晕啊晕,</P>
<P>帮主一定来看看!</P>
<P>  for i:=1 to searchLayer.AllFeatures.count-3 do
  begin
    with searchLayer.AllFeatures.Style do
    begin
      SymbolCharacter := 118;
      SymbolFontShadow := true;
      SymbolFontBackColor :=micolorgreen;
      SymbolFontHalo :=True;
      //修改符号字体样式
      try
        MyFont := TFont.Create;
        OleFontToFont(SymbolFont, MyFont);
        MyFont.Name:='MapInfo Transportation';
        MyFont.Size := 14;
      finally
        MyFont.Free;
      end;
    end;
    searchLayer.AllFeatures.Update(True,emptyParam);
  end;</P>
喜欢0 评分0
dmyb7233
路人甲
路人甲
  • 注册日期2004-10-06
  • 发帖数34
  • QQ
  • 铜币181枚
  • 威望0点
  • 贡献值0点
  • 银元0个
1楼#
发布于:2004-10-06 03:07
层处理编辑状态不,Overstyle设为True了吗
举报 回复(0) 喜欢(0)     评分
游客

返回顶部