创建新地图.mb

mapinfo源程序示例 mapinfo源程序示例

SUB XDT
Create Menu "地图[&M]" As
   "图层控制" Calling M_MAP_LAYER_CONTROL,
   "前一视图" Calling 806,
   "选项" Calling 703
   'alter menu bar add "地图"
END SUB