【正文】 我深深體會到了團結(jié)協(xié)作精神的重要性。這次設(shè)計，使得我認真的研究了一些實用的技術(shù)，不僅豐富了我的各種技術(shù) 知識，還使我得到了一些工程經(jīng)驗。 通過這次設(shè)計，我學到了一些新的技術(shù)。在整個畢業(yè)設(shè)計期間，我們小組成員均以一個實際的工程要求來要求自己。 第 29 頁 共 31 頁 三個多月的畢業(yè)設(shè)計，我從中受益非淺。系統(tǒng)采用了模塊化的面向?qū)ο蟮脑O(shè)計方法和技術(shù)，具有較好的可擴展性。如放大、縮小、漫游、信息標注相應(yīng)的代碼為 (1705) (1706) (1702) (1708) 第六步：雙擊 close 按鈕編寫程序的代碼，終止 Mapinfo： procedure Button2Click（ Sender： Tobject）； begin Mapinfo： =nul； End； 第 28 頁 共 31 頁 詳細設(shè)計 界面設(shè)計 啟動系統(tǒng)在 splash 畫面之后，進入學校總體介紹界面，如圖 14： 圖 14：學?？傮w介紹界面 第五章 結(jié)束語 本校園地理信息系統(tǒng)實現(xiàn)了一個 ***大學的地理導(dǎo)航系統(tǒng)。利用這些命令用戶可以對地圖進行放大、縮小、漫游、選擇等。 第五步：當你通過 OLE 自動起動了 Mapinfo 之后，就可以執(zhí)行 Mapbasic 的命令來完成控制Mapinfo。map from 行政 39。)，打開一張地圖“行政． tab”。 （ 5） 最后，執(zhí)行 Mapbasic 的命令 (39。 Style 2 帶圖標的彈出窗口（標題欄寬度比較寬）。)。+hd+39。 （ 4） 然后調(diào)用一個 Mapinfo 窗口到 Delphi 應(yīng)用程序時，要發(fā)出一個 Set Next Document 語句，跟在創(chuàng)建窗口語句的后面，例如一下程序為 Delphi 客戶程序創(chuàng)建了一個 Mapinfo的子窗口： (39。set application window 39。 （ 3） 在起動了 Mapinfo 以后，用 Mapbasic 命令來設(shè)置應(yīng)用程序窗口，以便在客戶程序中能看到 Mapinfo 對話框和錯誤信息的提示。 這行代碼指定了一個變量 Mapinfo，它代表了作為 OLE 自動化服務(wù)器程序。下面逐一予以解釋： （ 1） 在集成環(huán)境里，運行一個 Mapinfo 程序，調(diào)用 Delphi 的 CreateOleObject（）函數(shù)，指定其返回變量。)。 (39。open table 行政． tab39。)。+hd+39。 (39。set application window 39。 str(,hd)。39。 Var Form1： Tform1； Mapinfo： variant； Hd： string； 第四步：雙擊 open map 按鈕編寫程序的代碼如下： procedure (Sender:TObject)。在單元文件的變量聲明部分將 Mapinfo 置為 variant 類型；將 hd 置為 string 類型。當執(zhí)行函數(shù) CreateOleObject（）時， Windows 檢測被調(diào)用程序是否運行，如果沒有，她將啟動被調(diào)用程序。這個單元包含了如何操作 OLE 自動化對象的主要代碼。 第一步：新建一個工程文件，在 Form1 上放置 Panel、 Button 等控件； Panel 用于顯示地圖。一個程序既可以是服務(wù)器，又可以是客戶機。 OLE 自動化有兩種主要的對象類型： OLE 自 動化服務(wù)器程序（在本文中指 MapInfo）； OLE 自動化客戶幾程序（在本文中指 Delphi）； 被自動化調(diào)用的程序叫做自動化服務(wù)器（ AUTOMATION SERVER）。 OLE 自動化允許在不同應(yīng)用程序之間互相訪問，可以從一種應(yīng)用程序訪問另一種應(yīng)用程序或 DDL。 MIRows 對象集中每一個對象代表表中的每一行， MIFields 對象集中每一個對象代表表中的每一個域。 MIMapGen 對象主要用于 MapInfo 網(wǎng)絡(luò)應(yīng)用程序 MISearchInfo 對象代表查找的結(jié)果。 [8] 對象 對象和對象集 圖 13： OLE 自動化對象模型 MBApplication MBGlobals Application MIMapGen MISearchInfo MIRows MIFields MISelection MIRows MIFields 第 26 頁 共 31 頁 其中 Application 對象代表 MapInfo 的一個實例。 使用 OLE 帶來的好處是，不同應(yīng)用程序展現(xiàn)的對象在同一編程 環(huán)境中都是可見的，展現(xiàn)的對象可以用任何一個支持 OLE 自動化的編程工具或宏語言來訪問，因此系統(tǒng)集成者可以選擇最合適的任務(wù)開發(fā)工具。“屬性”則是不帶有形參的函數(shù)，并能存取或設(shè)置有關(guān)對象當前狀態(tài)的信息。通過使用 OLE 自動化，能夠完成以下的任務(wù)： 1) 創(chuàng)建 OLE 自動化服務(wù)器 2) 創(chuàng)建和操縱 OLE 自動 化對象 3) 創(chuàng)建 OLE 自動化控制器 OLE 自動化服務(wù)器對象是編程的，其可編程能力主要是通過方法和屬性這兩個類的概念及兩種類型的 OLE 自動化對象成員來實現(xiàn)。 在 OLE 自動化這一技術(shù)領(lǐng)域中，由應(yīng)用程序或 OLE 編程工具所展現(xiàn)的對象稱為 OLE 自動化對象，訪問操作并控制該對象的應(yīng)用程序或 OLE 編程工具則稱為 OLE 自動化控制器，展現(xiàn)這些對象的應(yīng)用程序則稱為 OLE 自動化服務(wù)器。但是到了今天， OLE 已演變?yōu)橐环N協(xié)議或規(guī)范，成為軟構(gòu)件集成技術(shù)的基礎(chǔ)。具體做法是采用 OLE 自動化技術(shù)。 在 Delphi 的程序中集成 Mapinfo 的地圖窗口是將 Mapinfo 的地圖窗口調(diào)進 Delphi 開發(fā)的應(yīng)用程序界面中去，擴充程序的功能。 可以利用 Delphi對 ActiveX支持的函數(shù)啟動和控制 MapInfo Professional運行。 控制 反饋消息 回調(diào)消息 控制與數(shù)據(jù)傳輸 DDE回調(diào) ActiveX 控制 MapInfo 處理圖層 2 MapInfo 處理圖層 1 MapInfo 數(shù)據(jù)庫 圖 12： Delphi 與 MapInfo 連接圖 技術(shù)難點是從 Delphi 控制 MapInfo Professional 運行，并取得其服務(wù)，操縱嵌入在 Delphi程序界面上的地圖資料：主要指在 Delphi 程序中通過特定 ActiveX 控制接口，執(zhí)行相應(yīng)接口方法函數(shù)，向 MapInfo Professional 發(fā)出控制命令，取得其服務(wù)，達到操縱嵌入在 Delphi 程序界面上的 MapInfo 地圖資料的目的。 圖 12 為 Delphi 程序與 Mapinfo Professional 兩者在連結(jié)控制過程中的分工與地位，以及ActiveX 與 DDE 所扮演的角色。這些操縱包括圖形放大、縮小、漫游、信息標注、空間查詢、圖層的添加和控制等。 第 22 頁 共 31 頁 圖 8：未處理前的地圖 圖 9：修改表結(jié)構(gòu)對話框 第 23 頁 共 31 頁 圖 10：為地圖加標注 圖 11：緊縮后的表 第 24 頁 共 31 頁 MapInfo 與 Delphi 的無縫連接 在開發(fā)“校園地理信息系統(tǒng)”時，將 MapInfo Professional 和 Delphi 連接起來。 用相同的方法，我們處理其他分層圖。 選擇“表〉維護〉緊縮表”，緊縮地圖和表格數(shù)據(jù)，這樣得到一張簡單清晰的表（如圖 11）。 選擇“表〉維護〉表結(jié)構(gòu)”如圖 9，可以添加、刪除字段。因此首先我們將不需要的注解、線條及框架刪除。 用 MapInfo 處理地圖 用 MapInfo 處理地圖 MapInfo 的主窗口如圖 7 所示，其工具條主要包括常用工具 條、主工具條、繪圖工具條和工具工具條。 我們選擇 AutoCAD R12/LT2 DXF（ *.dxf）格式，以便與 MapInfo 導(dǎo)入此格式。 9． STL 格式 實體對象立體化文件格式，可使用 STLOUT 命令導(dǎo)出此格式。 7． EPS 格式 PostScript 文件格式，可使用 PSOUT 命令導(dǎo)出此格式。 5． DXF 格式 AutoCAD 圖形交換文件格式，可使用 DXFOUT 命令導(dǎo)出此種格式。 3． DWG 格式 AutoCAD 圖形文件格式，可使用 WBLOCK 命令導(dǎo)出 DWG 格式。 在執(zhí)行 Export 命令時，將彈出 Export Data 對話窗口，如圖 5： 圖 5： Export Data 對話框 用戶可在 Export Data 對話窗口中輸入文件名和文件類型， AutoCAD 可導(dǎo)出的文件格式共有如下十種： 1． 3DS 格式 3D Studio 文件格式，可使用 3DSOUT 命令導(dǎo)出此種格式。 用戶可使用 Export命令將 AutoCAD圖形對象轉(zhuǎn)化為其他文件格式加以保存，以便其他應(yīng)用程序調(diào)用，此命令共有如下兩種執(zhí)行方法： 1．在命令行中輸入 export 并按回車鍵 。用戶可以通過圖形分層技術(shù)，根據(jù)自己的需求戶一定的標準對各種空間實體進行分層組合，即將一張地圖分成不同圖層。空間索引時查詢空間實體的一種機制，通過空間索引，就能夠以盡量快的速度查詢到給定坐標范圍內(nèi)的空間實體及其所對應(yīng)的數(shù)據(jù)。任何點、 線、面實體都可以用直角坐標點 x， y 來表示。 綜合地圖