第五篇 MapBasic开发环境.pptVIP

辽工大测绘学院 李兰勇 ——第五章 MapBasic开发环境 辽工大测绘学院 李兰勇 窗口设计 MapBasic应用程序能够控制所有的MapInfo窗 口，包括标准窗口、地图窗口、浏览窗口、布局窗 口、专题图窗口、信息窗口。 要打开窗口可使用下面的语句：Map、Browse、 Graph、Layout、Create Redistricter。 要打开其他类型的窗口（如帮助、统计窗口） 可使用Open Windows语句。 用Set Windows语句设置窗口属性（如大小、位 置）。 按钮盒（工具条）设计 MapInfo的工具条包括标准工具条、绘图工具条和主工具条。可通过MapBasic程序来添加、删除、隐藏工具条，也可由用户创建工具按钮。 创建用户界面 MapBasic程序可控制下列用户界面元素 用户界面是应用程序的重要组成部分，MapBasic提供了制作MapInfo用户界面所需的全部工具，可创建一个自定义的用户界面。 菜单 对话框 窗口 按钮盒 事件 在一个图形用户界面环境中，用户通过键盘和鼠标控制要发生的事情，即用户通过鼠标和其它动作产生了事件。 事件处理过程 当用户引发一个事件时，软件必须作出相应的响应，MapBasic应用程序通过一个过程来处理这个事件。 当MapBasic应用程序创建了一个用户菜单，并且用户选择了一个菜单项，MapBasic应用程序就通过调用一个过程来处理该事件。 用户菜单设计 用Create Menu语句或Alter Menu语句定义一个菜单结构 为菜单项指定一个处理程序结构（自定义、标准） 步骤 创建菜单 菜单项调用标准MapInfo命令，所有菜单代码的定义列表在Menu.def定义文件中。 改变已有的菜单 Include “Menu.def” Create Menu “File” As “New” Calling M_FILE_NEW, “Open”+Chr$(9)+”Ctrl+O/W^O” Calling M_FILE_OPEN, “(-”, “(Close” Calling M_FILE_CLOSE, “(Save”+Chr$(9)+”Ctrl+S/W^S” Calling M_FILE_SAVE, “(-”, “(Print” Calling M_FILE_PRINT, “(-”, “Exit” Calling M_FILE_EXIT 向菜单栏增加新的菜单 Declare Sub Main Declare Sub EndMapInfo Sub Main Create Menu TextBox As Create TextBoxes... Calling EndMapInfo, Close TextBox Calling EndMapInfo, About TextBox... Calling EndMapInfo Alter Menu Bar Add TextBox End Sub Sub EndMapInfo End MapInfo End Sub 每个菜单项也可用Calling子句调用一个过程，当用户选择其中一个菜单项时，MapBasic自动调用相应的过程。 新建的菜单必须通过Alter Menu Bar Add…加到菜单栏上才可见。 About TextBox... Calling EndMapInfo Alter Menu Bar Add TextBox End Sub Sub EndMapInfo End MapInfo End Sub 每个菜单项也可用Calling子句调用一个过程，当用户选择其中一个菜单项时，MapBasic自动调用相应的过程。 新建的菜单必须通过Alter Menu Bar Add…加到菜单栏上才可见。 添加菜单项 Alter Menu “File” Add “Save As” Calling save_as 向已存在的菜单增加菜单项 Declare sub save_as Alter Menu ID 1 Add Save As Calling save_as sub save_as Note 添加菜单项 save_as End Sub 将Alter Menu Bar Ad