第三章MapX地圖化及其工具2/4/202313.1MapX中地理數據地圖化方式MapInfo文件格式與數據組織MapInfo數據索引機制MapX的地圖圖層和圖元2/4/20232MapInfo文件格式與數據組織空間數據和屬性數據分開存儲的。屬性數據以數據庫的形式存儲為一張表，空間數據以MapInfo自己定義的格式保存在文件中。兩者之間通過一定的索引機制聯系起來。MapInfo按照圖層來管理地理數據，每個圖層包括4個基本文件：屬性數據表結構文件(.Tab)、屬性數據文件(.Dat)、交叉索引文件(.Id)和空間數據文件(.Map)。如果對屬性數據進行索引，還需要索引文件(.Ind)。此外，MapInfo還包括其他幾種輔助的文件類型。2/4/20233MapX的文件格式2/4/20234MapInfo文件格式對于MapX，索引文件.Ind存在，允許用Find對象來查找地圖對象。工作空間文件（.wor）MapInfo交換格式文件：文本文件，將地圖空間數據與屬性數據用文字的方式表達出來。包含兩類文件，其中.Mif主要包括空間數據，.Mid描述了屬性信息。2/4/20235MapInfo數據索引機制從屬性信息查詢空間信息從空間信息查詢屬性信息（見前圖）2/4/202363.2地圖標準工具MapX提供了標準的地圖工具，可以很容易地利用常用的標準工具開發出方便易用的地理信息系統，而不必針對每一種地圖操作都完全靠開發者自己編程，開發效率大大提高。2/4/202373.2地圖標準工具Map1.CurrentTool=miZoomInToolMap1是MapX的對象名，miZoomInTool是常量。在指定位置使用用戶工具。

CurrentTool設置為當前工具。取值為ToolConstants值。默認值為miArrowTool。(可選參數見書48頁)2/4/20238標準工具的分類導航工具(Zoom-In,Zoom-Out,Pan,Center)（程序演示）標注工具：一系列選擇工具（程序演示）

Annotations(symbolsandtext)創建工具（用來創建地圖圖元）2/4/20239地圖編輯工具在地圖中創建新的圖元，或者修改已有的圖元MapX提供了AddPoint

AddLine

AddPolyline

AddRegion

以及SymbolText2/4/202310地圖編輯工具在地圖中添加新的圖元：DimlyrInsertionAsMapXLib.LayerSetlyrInsertion=Map1.Layers("Uscities")‘將該圖層設為可編輯，以便添加lyrInsertion.Editable=True‘將China設為InsertionLayer圖層SetMap1.Layers.InsertionLayer=lyrInsertionMap1.CurrentTool=miAddPointTool2/4/202311地圖編輯工具在地圖中編輯圖元:(先使用選擇工具，選擇某一圖元，然后編輯)layer.Editable=TrueMap1.CurrentTool=miAddPointTool2/4/2023123.4用戶自定義工具創建自定義工具有3個步驟：創建自定義工具編寫自定義工具的處理過程在應用程序界面上使用自定義工具2/4/202313創建自定義工具Map.CreateCustomTool

ToolNumber,Type,Cursor,[ShiftCursor],[CtrlCursor]ToolNumber

用于在此后引用它的工具的數量。此值必須是介于1和999之間的整數。Type 描述工具行為的類型。取值為ToolTypeConstants

的值。Cursor 當前使用工具的光標形狀。ShiftCursor

表示應該在按住SHIFT鍵時出現的光標CtrlCursor

表示應該在按住CTRL鍵時出現的光標2/4/2023143.4用戶自定義工具編寫自定義工具的處理過程：工具的行為代碼會在兩個不同的時刻執行：在工具的使用過程中或者使用工具之后。對應不同事件。以測距為例：工具使用過程中，MouseDown需要記錄起點坐標，MouseMove需要顯示當前距離。使用工具后，ToolUsed或者PolyToolUsed中處理。2/4/202315使用自定義工具使用工具：需要設置MapX對象CurrentTool的值。PrivateSubForm_Load()

Map1.CreateCustomTool99,miToolTypePoint,miCrossCursorEndSubPrivateSubCommand1_Click()

Map1.CurrentTool=99EndSub2/4/202316使用自定義工具使用工具：需要設置MapX對象CurrentTool的值。PrivateSubForm_Load()

Map1.CreateCustomTool99,miToolTypePoint,miCrossCursorEndSubPrivateSubCommand1_Click()

Map1.CurrentTool=99EndSub2/4/2023