为什么设置linecolor不能修改线图元的颜色呢？

我的程序代码如下，可是执行之后图元颜色没有任何改变，请问这是为什么？我用的delphi7＋mapx5.02.19
procedure Tf_main.Button1Click(Sender: TObject);
var
 lyr:cmapxlayer;
 ftr:cmapxfeature;
begin
   lyr:=m_dt.Layers.Item['line'];
   lyr.Editable:=true;
   lyr.OverrideStyle:=true;
   ftr:=lyr.AllFeatures.Item[1];
   ftr.Style.LineColor:=miColorGreen;
   ftr.Update(true,emptyparam);
   lyr.Refresh;
end;

你把lyr.OverrideStyle:=true; 这句去掉看看！

<P>没有用，一开始就没有这一句，我以为是缺这句导致就加上了，可是还是不行</P>

你可以通过调用Style.PickLine 看看