图元闪烁出问题

斑竹，我在搞图元闪烁时，在改变图元大小时，无法改变它的大小，这是为什么？请指教
procedure Tpicture.tsizeTimer(Sender: TObject);
var
   j,x:integer;
begin
     ttime:=ttime+1;
     x:= gs.ftr.Style.SymbolBitmapSize;
     for j:=1 to 1000 do
     begin
      if  j mod 100 =50 then
       begin
          gs.ftr.Style.SymbolBitmapSize:= 50;
          gs.ftr.Style.SymbolFontBackColor:=micolorblack;
       end
      else if  j mod 100 = 0 then
       begin
         gs.ftr.Style.SymbolBitmapSize:= x;
         gs.ftr.Style.SymbolFontBackColor:=micolorblack;
       end;
      gs.ftr.Update(EmptyParam,EmptyParam);
     end;
end;

报什么错误！
有错误提示信息吗？

ftr是symbol类型的吗？
fs是symbol类型的吗？

我的没有报错！所以才郁闷！

怎么还没有人来帮我解决问题？5555555

楼主，这个有错！
gs.ftr.Style.SymbolBitmapSize:= 50;
最大为48，50超过范围了！

这下可好了，终于找到毛病了。我的图元总算可以变化了。谢谢大虾！