【正文】 學校，食堂分布圖將引導用戶就餐；一張其他生活設施分布圖將是剛剛入學的新同學一個良好的向導，你可以輕松的找到學校的浴室、開水房、銀行、超市、收發(fā)室、書店、小賣部、文印室、校醫(yī)院、招待所等與大家的生活息息相關的生活設施；分布于學校周圍的是教師宿舍。學校的電纜線和網絡線也是很重要的，我們也分別制作了地圖供參考。 數(shù)據庫設計 MapInfo 的空間數(shù)據結構如圖 3 所示 [10]?？臻g實體是地理圖形的抽象模型，主要包括點、線、面三種類型。點可以表示成一組坐標（ x1，y1； x2， y2… xn， yn）。 從縱向分析， MapInfo 的空間數(shù)據結構是一種分層存放的結構。 轉換與連接 轉換地圖 AutoCAD 在本次設計中主要用于處理地圖，我們得到的是使用 AutoCAD 制作 的浙江工業(yè)大學控制網及圖幅分幅圖，如圖 4： 圖 4：原始圖 在圖上可見線條縱橫交錯，不易分辨，該圖分為 0、 DL、 T100、 T900、地形、 第 19 頁 共 31 頁 電纜、電信、舊上水、舊下水、上水、下水、圖框、網絡、污水等若干個 Layer，我們的任務就是將繪制在 AutoCAD 中的地圖導入 MapInfo。 2．選擇 File 菜單的 Export 選擇項。 2． MP 格式 設置無關的位圖文件格式，可使用 BMPOUT 命令導出此種格式。 4． DWF 格式 AutoCAD 圖形 Web 格式，可使用 DWFOUT 命令導出此種格式。 6． DXX 格式 DXF 屬性抽取文件格式，用于將 DXF 屬性保存到一個文件中，可使用ATTEXT 命令導出此格式。 8． SAT 格式 ACIS 實體對象文件格式，可使用 ACISOUT 命令導出此種格式。 第 20 頁 共 31 頁 10． WMF 格式 Windows 文件格式，可使用 WMFOUT 命令導出此格式。 打開 MapInfo，點擊“表 — 轉入”可以看到“ DXF 轉入信息”對話框，如圖6： 圖 6： DXF 轉入信息對話框 勾選“創(chuàng)建分離的表”，則將把 AutoCAD 中的分層圖逐一導入 MapInfo 并分別以 *.tab 的形式保存下來，以便于下一步處理地圖。 以下正文的文字大小也應是小四號，請大家參考時注意 第 21 頁 共 31 頁 1 8 主菜單 繪圖工具條 主工具條 常用工具條 地圖窗口 工具工具條 瀏覽窗口 狀態(tài)欄 圖 7： MapInfo 主窗口 利用以上的工具，我們處理地圖： 打開“地形． Tab” 如圖 8，上面的每一個點、每一條線、每一塊區(qū)域甚至注解都是一條紀錄，初始時有 18977 條紀錄，我們的目標是將地圖簡化為一塊區(qū)域對應一條紀錄的表。 制作“行政． Tab”時，我們刪除行政樓以外的建筑，將行政樓的線條轉化為區(qū)域即選擇“對象”〉“轉化為區(qū)域”，用合適的顏色填充，必要的時候需要重畫線條，行政樓外的草坪也畫出進行裝飾。在到瀏覽器界面中，添加信息（如圖 10），這樣可以到地圖界面中點擊信息工具察看信息，點擊標注工 具對地圖進行標注。記錄也變?yōu)閮H有 15 條了。并制作一張底層圖作為分層圖的底層。在 Delphi中嵌入 MapInfo 校園圖形的資料，成為其界面的一部分，由 Delphi 開發(fā)校園地理信息系統(tǒng)軟件，提供用戶控制和操作界面，用桌面圖形系統(tǒng)開發(fā)平臺 MapInfo Professional 操縱和處理校園圖形資料。將 Delphi 和 MapInfo Professional 結合，取 Barland Delphi 軟件開發(fā)平臺的高效率、高可靠性、先進的組件技術、完全支持 ActiveX 和 DDE 技術等優(yōu)勢，可開發(fā)出高質量的圖形信息管理系統(tǒng)。圖中包含三個虛框，左上一個為 ActiveX（ OLE）自動化；右上一個為 Delphi 程序與 MapInfo Professional 之間的控制連接；下方一個為 MapInfo Professional 體系 [3]。問題是如何控制 MapInfo Professional 運行、如何取得ActiveX 接口方法、如何跟 Delphi 程序界面上的地圖資料聯(lián)系起來，達到操縱該地圖的目的。這時 Delphi程序是 ActiveX（ OLE）客戶應用程序，控制 MapInfo Professional 的運行；在后臺運行的MapInfo Professional 是 ActiveX（ OLE）自 動化服務器，為 Delphi 程序提供服務。把地圖窗口應用于其他程序中，這種程序開發(fā)方法，用戶操作 ActiveX 對象 Delphi 程序中心控制（ ActiveX客戶機） Windows 消息 MapInfo 控制 器 （ ActiveX 服務器） Windows 消息 資料 2 資料 3 資料 1 第 25 頁 共 31 頁 是一種程序集成的方法。 OLE（ Object Linking and Embedding）是 Microsoft 公司為解決 Window 下應用程序間的通信問題而提出的。 OLE 自動化（ OLE Automation）技術是 新增加技術，它使用戶通過編程在一個應用程序中控制另一個應用程序的對象，從而實現(xiàn)了應用程序級別的可重用。 OLE 自動化服務器展現(xiàn)的自動化對象使通過編程方法操縱應用程序成為可能。其中“方法”可以是帶有許多參數(shù)的函數(shù)，它定義了一個對象所能達到并能完成的行為，同時可以獲取或設置數(shù)據。實際上， OLE 自動化技術就是使任何對象展示出一組可以由其他代碼激活的方法和屬性，而自動化提供了對象描述中參數(shù)和屬性的名稱和類型的方法。 Mapinfo 提供的 OLE 自動化對象模型如圖 13 所示。在 MBApplication 集和 MBGlobals 集中，每一個對象分別代表一個正在運行的 MapBasic 應用程序和一個正在運行的 MapBasic 應用程序中定義的全局變量。 MISelection 對象代表 MapInfo 表。 其中 MapInfo 的實例對象主要提供如下一些 常用方法： 1) Do（ string）：向 MapInfo 發(fā)送命令字符串（ MapBasic 語句）， MapInfo 將執(zhí)行這些命令； 2) Eval（ string）：應用程序通過此方法可獲得 MapInfo 的執(zhí)行結果； 3) RunCommand（ string）：解釋并執(zhí)行 MapBasic 語句，與 Do 類似。特別是可以訪問這些程序對象的方法與屬性，而并非原始數(shù)據；可以不用關心程序語言是如何做到這點的?？蛻舫绦蚪凶鲎詣踊刂破鳎?AUTOMATION CONTROLLER）或自動化客戶機（ AUTOMATION CLIENT）。 通過這種方法把地圖窗口集成進 Delphi 程序時，用戶可以看到一個真實的地理圖形，并非一個簡單的靜止圖形。 第二步：將單元 obj 列于 unit1 的 uses 字句中，這樣一來我所開發(fā)的程序就可以使用這個單元中的有關過程及函數(shù)了。例如： CreateOleObject（）函數(shù)可以在 Delphi 主要運行的同時，在內存里啟動另外一種程序。 第三步：程序中廣泛的應用變量，只是為了更方便的操縱 OLE 自動化對象。 Mapinfo 代表自動化對象， hd 代表放置 Mapinfo 地圖窗口的部件句柄。 begin mapinfo:=createoleobject(39。)。 (39。+hd)。set next document parent 39。style 139。 第 27 頁 共 31 頁 (39。)。map from 行政 39。 end； 這些代碼用于打開一個地圖窗口。例如：如果命名該變量為 Mapinfo，下面的語句將裝載 Mapinfo 應用程序： Mapinfo： =CreateOleObject（ ’’） 。 （ 2） str（ , hd）用 Delphi 的 str（）函數(shù)將 Thandle 型數(shù)據 轉化為字符型數(shù)據 hd。 (39。+hd)。set next document parent 39。style 139。 Set Next Document 語句“掛接”一個 Mapinfo 窗口，在這個語句里，必須指定 Delphi控件的句柄值（ hd），以便下一步所創(chuàng)建的 Mapinfo 窗口將能在這個控件上顯示，如：Map、 Graph、 Browse 等窗口；這個語句中能夠還包含著一個類型部分（ Style 子句）： Style 1 無邊框的窗口（不帶標題欄、且被放在指定的控件內）。 Style 3 不帶圖標的彈出窗口（標題欄寬度比較窄）。open table 行政． tab39。并執(zhí)行 (39。)；在 Panel 上顯示地圖。 Do（）、 Runmenumand（）語句可以運行一個 Mapbasic 的菜單命令，它包含一個參數(shù) ，用于指定不同的菜單命令。具體內容請參考 Mapbasic 的幫助文件。用戶可以根據不同的需要瀏覽到校園的分層圖以及相應的位置信息和詳細信息。 由于時間和條件的限制，本系統(tǒng)還有許多方面的工作未能完善：首先，系統(tǒng)還有待于實現(xiàn)更 多的功能，如最優(yōu)路徑的選擇、與學校數(shù)據庫的連接等；其次，應更充分的利用網絡技術，將本系統(tǒng)應用于網上，成為我校的一份完備的介紹材料。通過這次設計，我懂得了一些實際的工程經驗。精心策劃，認真設計，細心調試，爭取以最快的速度取得最好的效果。在以往的學習中，又是學習只停留在一知半解、知其然而不知其所以然的水平。 整個畢業(yè)設計期間，我和魯英兩人緊密合作，在不懂得地方大家相互探討、相互研究、相互幫助，使得我們的設計項目得以順利進行。 參考文獻 [1] Delphi 5 實務經典，林金霖編著，中國鐵道出版社， 2021 年 8 月第一版 [2] AutoCAD R14 繪圖軟件使用手冊，雷邵辰編著，大連理工大學出版社， 1998 年 10 月第一版 [3] 龔偉超，盛翊智，劉海洋，王文龍，一種基于 ActiveX 和 DDE 實現(xiàn) MapInfo 與 Delphi無縫連接的方法，計算機應用研究， 2021 年第 10 期 [4] 李響，易虹， OLE AUTOMATION 技術及地圖窗口的快速實現(xiàn)方法，電腦學習， 1999年第 4 期 [5] MapInfo 6． 0 應用開發(fā)指南，三味工作室編著，人民郵電出版社， 2021 年 1 月第一版 [6] MapInfo 5．Ｘ使用指南，康訊科技，王瑞民編著，中國鐵道出版社， 2021 年 5 月第一版 第 30 頁 共 31 頁 [7] Delphi 5 基礎與提高，新智工作室編著，電子工業(yè)出版社， 2021 年 3 月第一版 [8] 何晶，陳西宏，呂輝，利用 OLE 自動化技術實現(xiàn) MapInfo 與 VC++的集成，計算機應用研究， 2021 年第 10 期 [9] 王小江，王一平，方創(chuàng)輝，利用 MapInfo 地圖窗口開發(fā) Delphi 應用程序，現(xiàn)代電子技術，1999 年第 2 期 [10] 張凡，呂漢興，使用 MapX 組件實現(xiàn)地理圖形與數(shù)據庫的結合，計算機應用研究， 2021年第 10 期 （感謝網友 ”king”提供本文 ,本站整理 供大家參考）