作者/收集者:mio03 开发环境:MapBasic 代码: include "mapbasic.def" dim x,y as float if windowinfo(FrontWindow(),win_info_type)=win_mapper then x=commandinfo(1) y=commandinfo(2) note "x:" +str$(x)+",y:"+str$(y) set map center (x,y) End If
作者/收集者:mio03
开发环境:MapBasic
代码:
include "mapbasic.def" dim x,y as float if windowinfo(FrontWindow(),win_info_type)=win_mapper then x=commandinfo(1) y=commandinfo(2) note "x:" +str$(x)+",y:"+str$(y) set map center (x,y) End If