摘要:本文主要采用Dephi+ArcObject的組件式開發(fā)模式，實(shí)現(xiàn)地理信息查詢以及車輛管理方案。
　　關(guān)鍵詞：Arcobjects，信息查詢論文，空間分析論文，車輛監(jiān)控
　　
　　一、Arcobjects簡介
　　ArcObject是ESRI公司Arcinfo系列軟件的底層組件集，是基于COM技術(shù)所構(gòu)建的一系列COM組件集。雖然AO是依附在ArcGISDesktop產(chǎn)品中的軟件開發(fā)包，不能開發(fā)獨(dú)立的應(yīng)用；但對于定制強(qiáng)大的GIS編輯于分分析功能的項(xiàng)目來說仍然是不二的選擇。使用AO時(shí)我們只需要利用ESRI提供的這些AO組件來進(jìn)行積木式的組裝任務(wù)，按照應(yīng)用需求將這些底層功能組裝集合成一個(gè)更強(qiáng)大的COM對象。AO是基于微軟的COM技術(shù)來構(gòu)建的，因此它的開放性和擴(kuò)展性很強(qiáng)大，可以有VBA、VB、VC++、DEPHI等多種支持COM標(biāo)準(zhǔn)的開發(fā)工具，而擴(kuò)展性是指AO組件沒有提供的功能，如需要定義一種新的數(shù)據(jù)格式，你就可以利用COM技術(shù)來寫自己的COM組件，對AO組件庫進(jìn)行擴(kuò)展補(bǔ)充。ArcGIS軟件具有良好的系統(tǒng)開放性，可與其他系統(tǒng)實(shí)現(xiàn)真正的無縫集成
　　二、開發(fā)實(shí)例論文
　　筆者參加的“石林地理信息查詢系統(tǒng)”是GIS和MIS相結(jié)合的一個(gè)應(yīng)用系統(tǒng)，對數(shù)據(jù)庫操作較多，我們采用了Dephi+AO的組件式開發(fā)模式。即采用ArcGIS、MicrosoftSQLServer2005、Delphi7.0進(jìn)行系統(tǒng)開發(fā)工作。實(shí)踐證明這種方法給我們的開發(fā)帶來了很大的方便性和可操作性。
　　1、 系統(tǒng)簡介
　　石林地理信息查詢系統(tǒng)以信息查詢?yōu)橹鞯南到y(tǒng),圖形的基本操作：放大、縮小、平移、圖層可見性選擇；查詢功能：圖形對象的屬性查詢、點(diǎn)查詢、線查詢、查詢最近目標(biāo)等；最短路徑分析，空間分析：主要是緩沖區(qū)分析；距離和面積量測；圖形上加點(diǎn)、加線、加多邊形、注記文字。車輛監(jiān)控、跟蹤當(dāng)前車輛、定越界報(bào)警、車輛歷史軌跡回放等。系統(tǒng)功能完備，界面友好，操作方便，具有無級放縮，分層顯示、地理信息查詢、顯示位置準(zhǔn)確等特點(diǎn)。
　　在每輛車上配備GPS終端接收機(jī)，信息中心主機(jī)通過GPRS網(wǎng)絡(luò)或Internet網(wǎng)絡(luò)發(fā)送控制命令和接收來自車輛的各種數(shù)據(jù)（包括坐標(biāo)信息、工作狀態(tài)等信息），信息中心不斷的把這些數(shù)據(jù)寫入數(shù)據(jù)庫（MicrosoftSQLServer2005數(shù)據(jù)庫），車輛信息放在數(shù)據(jù)庫中。從而達(dá)到對車輛軌跡進(jìn)行追蹤分析。
　　安裝在車輛上的車載終端由先進(jìn)的GPRS通信模塊、GPS衛(wèi)星定位系統(tǒng)、衛(wèi)星天線以及汽車防盜器接口、數(shù)據(jù)接口、防破壞自動(dòng)報(bào)警和遙控熄火電路所組成。本系統(tǒng)兼容GSM/GPS系統(tǒng)功能，如無GPRS網(wǎng)絡(luò)，可以自動(dòng)切換在GSM方式進(jìn)行數(shù)據(jù)傳輸和報(bào)警。
　　2、軟件功能
　　1、查詢
　　點(diǎn)狀物查詢，線狀物查詢、面狀物查詢、以點(diǎn)為中心查詢、圓選擇查詢、矩形選擇查詢、
　　多邊形選擇查詢、地名查詢、查找最近目標(biāo)等
　　2、 最短路徑分析（A點(diǎn)->B點(diǎn)）
　　//最短路徑查詢
　　RoadQueryForm.ManualDock(PageControl1,RoadQueryForm,altop);
　　PageControl1.ActivePageIndex:=PageControl1.PageCount
　　//查詢結(jié)果顯示
　　RoadQueryForm.Show;
　　鼠標(biāo)點(diǎn)擊法：在圖上的道路的端點(diǎn)任意點(diǎn)擊兩點(diǎn)，得到分析路徑如下圖（圖1）（圖2）：
　　
　　（圖1）（圖2）
　　3、空間分析
　　緩沖區(qū)分析：點(diǎn)緩沖分析、線緩沖分析、多邊形緩沖分析。
　　//多邊形緩沖分析';
　　mainform.ADOConnection1.DefaultDatabase:='StoneForest';//選擇數(shù)據(jù)庫
　　/***********************/
　　selectcarform.ADOQuery2.sql.add('selectCarID,CarNO,Telphonefromdbo.carlistdbo_carlist');
　　selectcarform.DBGrid1.Columns[0].FieldName:='CarID';
　　selectcarform.DBGrid1.Columns[1].FieldName:='CarNO';
　　selectcarform.DBGrid1.Columns[2].FieldName:='Telphone';
　　//查詢結(jié)果顯示
　　selectcarform.show;
　　自定義點(diǎn)緩沖區(qū)分析:先選擇要查詢的圖層，在工具欄的工作層的編輯框選擇，然后在地圖上任意點(diǎn)擊一下，就會(huì)出現(xiàn)輸入緩沖距離的對話框，輸入距離后，地圖就移動(dòng)到你點(diǎn)擊的點(diǎn)位置，就會(huì)在圖上畫的點(diǎn)外畫一個(gè)圓圈為你的選擇范圍，并且高亮顯示這個(gè)范圍內(nèi)的工作層的所有對象（點(diǎn)或線），屬性和數(shù)目顯示在對話框中。還有就是自定義線緩沖區(qū)分析、自定義多邊形緩沖區(qū)分析。如下圖3
　　
　　（圖3）
　　4、車輛監(jiān)控:在電子地圖上顯示當(dāng)前車輛運(yùn)動(dòng)軌跡以及實(shí)時(shí)、歷史的狀況：（坐標(biāo)、所在的位置、定位狀態(tài)、采樣時(shí)間等）。
　　
　　（圖4）
　　withmainform.adoStoredproc1dobegin
　　ProcedureName:='SlCarInfoQuery';//調(diào)用查詢參數(shù)
　　/***********************/
　　Parameters.ParamByName('@CarID').Value:=trim(selectcarform.DBGrid1.Fields[0].AsString);
　　ExecProc;//執(zhí)行查詢
　　cardisform.Xcoord.Caption:=mainform.adoStoredproc1.Recordset.Fields['Xcoord'].Value;
　　cardisform.Ycoord.Caption:=mainform.adoStoredproc1.Recordset.Fields['ycoord'].Value;
　　cardisform.driver.Caption:=mainform.adoStoredproc1.Recordset.Fields['driver'].Value;
　　cardisform.Position.Caption:=mainform.adoStoredproc1.Recordset.Fields['position'].Value;
　　cardisform.DateTime.Caption:=mainform.adoStoredproc1.Recordset.Fields['datetime'].Value;
　　cardisform.carInfo.Caption:=mainform.adoStoredproc1.Recordset.Fields['note'].Value;
　　//查詢結(jié)果的顯示
　　cardisform.show;
　　5、車輛回放軌跡效果：
　　車輛行駛軌跡的回放、查詢、維護(hù)：所有車輛終端發(fā)送過來的GPS定位數(shù)據(jù)在數(shù)據(jù)庫中都有軌跡記錄.數(shù)據(jù)庫管理模塊提供了工具可以對這些數(shù)據(jù)進(jìn)行查詢及維護(hù).
　　地圖上完全清晰地顯示車輛全程行車軌跡。車輛歷史軌跡回放:用戶利用該功能在某個(gè)時(shí)間段里該車所走的路線，在回放中用戶可以選擇“車輛、時(shí)間段、回放速度的快慢”等。如下圖5
　　//請選擇你要跟蹤的車輛,數(shù)據(jù)庫記錄
　　ADOTable1.TableName:='dbo.CarGPS';
　　ADOTable1.Open;
　　withselectCarformdobegin
　　/***********************/
　　ADOQuery1.sql.add('SELECTmax(ID)FROMCarGPS');
　　/***********************/
　　MaxID:=ADOQuery1.Recordset.Fields[0].Value;
　　/***********************/
　　ifselectcarForm.DBGrid1.DataSource.DataSet.RecNo=1then
　　StringGrid1.rows[1].Clear
　　elseifselectcarForm.DBGrid1.DataSource.DataSet.RecNo=2then
　　StringGrid1.rows[2].Clear;
　　readroadlinecoord('data'+trim(selectcarform.DBGrid1.Fields[0].AsString)+'.txt');
　　tracking:=true;
　　iftrackingthenclpt:=roadpoints.Item(0);
　　iftrim(selectcarform.DBGrid1.Fields[0].AsString)='車牌號'then
　　tl.AddEvent(clpt,7)
　　elseiftrim(selectcarform.DBGrid1.Fields[0].AsString)='車牌號'then
　　/***********************/
　　zkmmap.CenterAt(clpt.x,clpt.y);//居中顯示
　　zkmmap.FromMapPoint(clpt,tipX,tipY);//移到當(dāng)前車輛位置
　　
　　（圖5）
　　6、結(jié)語
　　該系統(tǒng)綜合運(yùn)用了GPS衛(wèi)星定位技術(shù)、GPRS無線網(wǎng)絡(luò)傳輸技術(shù)、GIS應(yīng)用系統(tǒng)，將三者結(jié)合應(yīng)用在車輛導(dǎo)航和監(jiān)控調(diào)度中。將GIS應(yīng)用系統(tǒng)開發(fā)一般原理(查詢、空間分析)與車輛導(dǎo)航和監(jiān)控具體實(shí)際相結(jié)合，然后提出了基于ArcGIS的地理信息查詢及車輛管理解決方案。
　　參考文獻(xiàn)
　　[1]蔣波濤編著ArcObject開發(fā)基礎(chǔ)與技巧——基于VisalBasic.NET武漢大學(xué)出版社2006
　　[2]韓鵬等編著地理信息系統(tǒng)開發(fā)—ArcObjects方法武漢大學(xué)出版社2005
　　[3]胡志杰王長瓊基于ArcGIS的物流配送系統(tǒng)集成研究武漢理工大學(xué)物流工程學(xué)院
　　[4]廖凌松，黃杏元．基于Arclnfo的開放式組件GIS的開發(fā)探討．計(jì)算機(jī)應(yīng)用研究，2002年第二期．
　　[5]2009BorlandSoftwareCorporation－Delphi幫助文件