[共享]使用简单的视图管理器类下载，前一视图

<P>{-----------------------------------------------------------------------------<BR>Unit Name: TMapViewManagerClass<BR>Author:    duchangyu  杜长宇 <a href="mailtchangyudu@163.com" target="_blank" >changyudu@163.com</A>  msn:duchangyu@hotmail.com<BR>Purpose:  MapX 视图管理器，可以实现前一视图功能<BR>History:   2006-07-25</P>
<P>   ＝＝＝＝＝＝＝＝＝地图视图管理器＝＝＝＝＝＝＝＝</P>
<P>开发环境： delphi7+mapX 5.02.38<BR>            windows XP Sp2</P>
<P>用法：<BR>   1、主程序中uses TMapViewManagerClass；<BR>   2、主程序中定义全局变量 mapViewMgr : TMapViewManager;<BR>   3、在主程序窗体中formCreate事件中初始化，创建对象,并传递当前mapx对象map1：<BR>        mapViewMgr := TMapViewManager.Create(map1);<BR>   4、在地图范围发生变化的事件中，保存视图，例如mapToolUsed事件中：<BR>   case ToolNum  of<BR>      miZoomInTool : begin<BR>        mapViewMgr.SaveMapView(map1.Bounds);<BR>      end;<BR>      miZoomOutTool : begin<BR>        mapViewMgr.SaveMapView(map1.Bounds);<BR>      end;<BR>   end;<BR>   5、”前一视图“事件处理函数中：<BR>    procedure TForm1.ToolButton11Click(Sender: TObject);<BR>    begin<BR>      mapViewMgr.PreviousView;<BR>    end;</P>
<P>许可：<BR>    您可以自由的使用本代码进行学习或非商业、商业应用，<BR>    你可以自由更改本代码以便更适合你的应用，但请保留原作者版权信息；<BR>    如果你对本代码作过修改优化，请添加详细注释后重新发布到网上，并发给原作者一份拷贝，以利于大家共同进步；<BR></P>
<P>-----------------------------------------------------------------------------}</P>
<P>PS:   看上面的说明你应该很清楚了，如果你想要下载看看，就麻烦你回复一下，别嫌麻烦。</P>
<P>因为我也想知道有多少人下载了，也算有点成就感  ^_^</P>
<P>下载地址：</P>
<P><a href="http://www.gisforum.net/bbs/UploadFile/2006-7/2006725915610546.rar" target="_blank" >http://www.gisforum.net/bbs/UploadFile/2006-7/2006725915610546.rar</A></P>