一边画多边形线，一边还需要漫游

<P>目的是要画出一个比屏幕还大的区域，使用的是PolygonSelectTool，<BR>也就是说工具到了屏幕边界，要能够自动漫游（滚动），大家提个思路吧。<BR>如下的程序能够实现自动漫游，但已经画好的虚线点会跟随移动。<BR>有没有办法解决啊？<BR>procedure TForm1.Map1MouseMove(Sender: TObject; Shift: TShiftState; X,<BR>  Y: Integer);<BR>begin<BR>  if (X > (Map1.MapScreenWidth - 10)) then<BR>  begin<BR>    Map1.Pan(0.5, 0);<BR>    Map1.Refresh();<BR>  end<BR>  else<BR>  begin<BR>    if (X < 10) then<BR>    begin<BR>      Map1.Pan(-0.5, 0);<BR>      Map1.Refresh();<BR>    end<BR>    else<BR>    begin<BR>      if (Y > Map1.MapScreenHeight - 10) then<BR>      begin<BR>        Map1.Pan(0, -0.5);<BR>        Map1.Refresh();<BR>      end<BR>      else<BR>      begin<BR>        if (Y < 10) then<BR>        begin<BR>          Map1.Pan(0, 0.5);<BR>          Map1.Refresh();<BR>        end;<BR>      end;<BR>    end;<BR>  end;<BR>end;</P>

是在POLYTOOLUSED加代码实现的绘制区域。

<P>我也很想知道这个问题怎么解决，关注中！</P>