支持長(zhǎng)沙市應(yīng)急物流配送的MapInfo開發(fā)

1、支持長(zhǎng)沙市應(yīng)急物流配送的 MapInfo 開發(fā)： In this paper ， an object-oriented programming language Visual Basic development tool ， using MapInfo software ， integration MapXcontrols to achieve a support Changsha MapInfo emergency logistics and distribution systems ， use of improved ant colony algorithm for path optimi

2、zation ，using MATLABsoftware to verify the validity of the and feasibility.地理信息系統(tǒng)（GIS）是一個(gè)以地理數(shù)據(jù)庫(kù)為基礎(chǔ)，在計(jì)算 機(jī)的硬、軟件系統(tǒng)支持下， 對(duì)整個(gè)或部分地球表層 （包括大氣層） 空間中的有關(guān)地理分布數(shù)據(jù)進(jìn)行采集、 儲(chǔ)存、管理、 運(yùn)算、分析、 顯示和描述， 并采用地理模型分析方法， 實(shí)時(shí)提供多種空間和動(dòng) 態(tài)的地理數(shù)據(jù)， 為地理研究和地理決策服務(wù)而建立起來(lái)的計(jì)算機(jī) 技術(shù)系統(tǒng)。 20 世紀(jì) 90 年代以來(lái)，地理信息系統(tǒng)在全球得到了空 前迅速的發(fā)展， 廣泛應(yīng)用于各個(gè)領(lǐng)域， 產(chǎn)生了巨大的經(jīng)濟(jì)效益和 社會(huì)效益。地理

3、信息系統(tǒng)的集成二次開發(fā)是指利用專業(yè)的GIS工具軟件，如 ArcView、MapInfo 等實(shí)現(xiàn)地理信息系統(tǒng)的基本功能，以 通用軟件開發(fā)工具， 尤其是可視化開發(fā)工具， 如 Delphi 、Visual C+、Visual Basic 、Power Builder 等為開發(fā)平臺(tái)，進(jìn)行二者 的集成開發(fā)。集成二次開發(fā)目前主要有兩種方式：一種是OLE/DDE采用OLEAutomation技術(shù)或利用DDE技術(shù)，用軟件開 發(fā)工具開發(fā)前臺(tái)可執(zhí)行應(yīng)用程序，以O(shè)LE自動(dòng)化方式或DDE方式啟動(dòng) GIS 工具軟件在后臺(tái)執(zhí)行， 利用回調(diào)技術(shù)動(dòng)態(tài)獲取其返回信 息，實(shí)現(xiàn)應(yīng)用程序中的地理信息處理功能；另一種是 GIS 控件，

4、 利用GIS工具軟件生產(chǎn)廠家提供的建立在 OCX技術(shù)基礎(chǔ)上的GIS 功能控件，如 ESR的 MapObjects、MapInfo公司的MapX等，在 Visual Basic 、 Delphi 等編程工具編制的應(yīng)用程序中，直接將 GIS功能嵌入其中，實(shí)現(xiàn)地理信息系統(tǒng)的各種功能。1 利用 MapInfo 繪制地圖MapInfo Professional 7.0 是目前世界上最為完備、功能 強(qiáng)大、全面而直觀的桌面地圖信息系統(tǒng)。 MapInfo Professional 7.0 可以幫助用戶在數(shù)據(jù)庫(kù)中不同的數(shù)據(jù)之間建立關(guān)聯(lián)，在同一 環(huán)境下顯示， 并迅速提示數(shù)據(jù)之間的關(guān)系以及易被忽視的數(shù)據(jù)模 式，從而

5、做出快速的決策，提高運(yùn)作效率。利用 MapInfo 軟件， 以網(wǎng)上獲得的柵格地圖為藍(lán)本， MapInfo Professional 7.0 SCP 軟件繪制的長(zhǎng)沙市區(qū)域物流城市節(jié)點(diǎn)如圖 1 所示。2集成MapX空件MapInfo MapX是一個(gè)用來(lái)做地圖化的 OCX空件，它可以在 中。本設(shè)計(jì)以Visual Basic為開發(fā)工具，集成 MapX控件，設(shè)定 GeoSet的路徑，地圖就可以在 View窗口中直接顯示了。 MapXX寸 其進(jìn)行設(shè)置屬性、調(diào)用方法或相應(yīng)事件，即可實(shí)現(xiàn)數(shù)據(jù)可視化、 專題分析、地理查詢、地理編碼等豐富的地圖信息系統(tǒng)功能。 MapX 可以和遠(yuǎn)程數(shù)據(jù)庫(kù)連接， 可以使用SQL語(yǔ)句進(jìn)

6、行查詢，可以通過 數(shù)據(jù)綁定而把記錄顯示在地圖中， 還可以按照數(shù)據(jù)的地理信息進(jìn) 行各種統(tǒng)計(jì)與查詢。如果和GPS相結(jié)合還可以實(shí)現(xiàn)在途動(dòng)態(tài)跟蹤 和定位。應(yīng)用程序中加入強(qiáng)大的制圖功能。 出來(lái)，使數(shù)據(jù)更易于理解。由于 可以被集成到使用 Visual Basic 開發(fā)的客戶端應(yīng)用程序以及使用可以把數(shù)據(jù)用地圖的形式顯示MapX是一個(gè)OCX空件，所以它、 PowrBuilder 、 Visual C+ 等Lotus Script 的 Lotus Notes3 算法實(shí)現(xiàn)3.1 改進(jìn)后的信息素更新規(guī)則（2）設(shè)置循環(huán)次數(shù)，即 Nc=Nc+1。（3） 設(shè)置禁忌表，將螞蟻禁忌表的索引號(hào)設(shè)為k=1。（4） 設(shè)置螞蟻數(shù)目，

7、螞蟻數(shù)目的變化為k=k+1 。（5）判斷路徑是否在搜索熱區(qū)內(nèi)按照式（5）（7）計(jì)算 出每只螞蟻應(yīng)當(dāng)移動(dòng)到下一條路徑的概率，并實(shí)現(xiàn)螞蟻的移動(dòng)。（6）當(dāng)螞蟻從 i 點(diǎn)出發(fā)到達(dá) j 點(diǎn)時(shí)，寸其所經(jīng)過的路徑上 的信息素進(jìn)行更新并修改禁忌表， 將禁忌表指針按照當(dāng)前狀況進(jìn) 行修改，即將新城市 j 置于禁忌表 tabuk 中。（7）執(zhí)行步驟 2 6 ，直到每只螞蟻都找到了一條包含所有 節(jié)點(diǎn)的可行路徑。（8）在新生成的所有可行解中找到一條最短路徑，這條最 短路徑就是本次迭代中的最優(yōu)路徑。9）判斷循環(huán)次數(shù)，若循環(huán)次數(shù)小于 10 次，則對(duì)螞蟻找到的最優(yōu)路徑按照本次迭代最優(yōu)值進(jìn)行信息素更新； 若循環(huán)次數(shù) 超過 10

8、 次，則按照全局信息素進(jìn)行更新。（10）對(duì)所有螞蟻經(jīng)過的每一條路徑，按式（1 ）（4）進(jìn) 行一次全局信息素的更新。（11 ）循環(huán)執(zhí)行210，直到連續(xù)多次的迭代中沒有出現(xiàn)更優(yōu)解或Nc的值已經(jīng)達(dá)到最大迭代次數(shù)，停止運(yùn)算，輸出當(dāng)前值作為最優(yōu)解。4 仿真實(shí)驗(yàn)?zāi)车貐^(qū)突發(fā)公共衛(wèi)生事件， 需要對(duì)各個(gè)醫(yī)院運(yùn)送藥品， 物資 配送中心為該地某醫(yī)藥公司，位置已知，有 8 個(gè)醫(yī)院需要緊急 救援物資，物資種類有兩種，每個(gè)醫(yī)院編號(hào)以及需求量已知，各 個(gè)需求點(diǎn)允許到達(dá)最晚時(shí)間已知。車輛運(yùn)輸速度為60km/h，車輛數(shù)為 5，車輛載重量為 10t ，配送中心以及各醫(yī)院間的距離已 知，配送中心對(duì)各醫(yī)院送貨， 使每個(gè)醫(yī)院在規(guī)定時(shí)間

9、之內(nèi)得到物 資，同時(shí)使配送時(shí)間最短。利用改進(jìn)蟻群算法，采用 Matlab 7.0 編程對(duì)距離求解，可 得到四條路徑為： 1-5-3-1 ；1-2-1 ；1-9-6-1 ；1-4-7-8-1 。因?yàn)?在編程時(shí)將配送中心定義為編號(hào) 1，醫(yī)院定義為編號(hào) 2-9，所以 實(shí)際得出四條路徑為：第一輛車的配送路徑為：配送中心 -4-2- 配送中心；第二輛車的配送路徑為： 配送中心-1- 配送中 心；第四輛車的配送路徑為：配送中心 -8-5- 配送中心；第五輛 車的配送路徑為：配送中心 -3-6-7- 配送中心。5 結(jié)束語(yǔ)本文以長(zhǎng)沙市區(qū)域物流為研究對(duì)象， 研究應(yīng)急物資調(diào)運(yùn)信息 系統(tǒng)中的路徑優(yōu)化、物資分配、車輛優(yōu)化調(diào)度等核心問題，以面 向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言 Visual Basic 為開發(fā)工具，借助 MapInfo 軟件，集成Ma