GIS軟件開發(fā)課程設(shè)計(jì)報告書

.../GIS軟件開發(fā)課程設(shè)計(jì)報告書題目名稱：全球信息查詢系統(tǒng)院系：管理學(xué)院地理科學(xué)專業(yè)班級：地理科學(xué)0811開發(fā)組員：張波張萍李旭周鑫張茫鄧曉燕董晶晶馬嚴(yán)彪指導(dǎo)教師：李權(quán)國完成日期：20XX12月26目錄1引言22系統(tǒng)分析22．1需求分析23系統(tǒng)設(shè)計(jì)33．1總體設(shè)計(jì)33.1.1用戶需求33.1.2系統(tǒng)目標(biāo)33.1.3總體結(jié)構(gòu)33.1.4系統(tǒng)功能43．2詳細(xì)設(shè)計(jì)53.2.1子系統(tǒng)設(shè)計(jì)53.2.2數(shù)據(jù)庫設(shè)計(jì)53.2.3功能模塊設(shè)計(jì)63.2.4用戶界面設(shè)計(jì)104設(shè)計(jì)結(jié)論141引言隨著我國經(jīng)濟(jì)水平突飛猛進(jìn)的發(fā)展,科學(xué)技術(shù)不斷向前,傳統(tǒng)的教學(xué)方式效率不高,因此越來越不能滿足教育服務(wù)工作的需要。全球查詢服務(wù)系統(tǒng)將為科學(xué)技術(shù)普及及中學(xué)教學(xué)工作提供一種方便、快捷的方式。該系統(tǒng)將為科學(xué)普及和教學(xué)工作的發(fā)展帶來很好的促進(jìn)作用。2系統(tǒng)分析2．1需求分析目前,隨著信息化水平的不斷提高以及信息技術(shù)的普及,相關(guān)技術(shù)逐漸進(jìn)入一般人的生活中,因而數(shù)字化信息化的教學(xué)方式被引入一般中學(xué)教學(xué)以及一些科學(xué)技術(shù)普及工作中,然而在相關(guān)需求不斷擴(kuò)大的現(xiàn)在,與其相配套的技術(shù)卻略有滯后,傳統(tǒng)的方法不僅操作難度大,同時效率低下。如何滿足人們?nèi)找嬖鲩L的需求以及方便教師與科普工作者進(jìn)行一般的教育科普工作,是當(dāng)前必須解決的一個問題?；贕IS的全球地理查詢系統(tǒng)是一個擁有全球個地方簡易地理信息的數(shù)據(jù)庫,集成了地理信息管理模塊可以實(shí)現(xiàn)GIS的空間查詢,分析功能及可視化功能的軟件。其旨在滿足廣大教育與科學(xué)普及工作者的需求,采用GIS技術(shù),使地理數(shù)據(jù)的查詢、分析更加方便快捷,且操作簡單容易,易于一般沒有任何計(jì)算機(jī)操作的人員使用。實(shí)現(xiàn)了授課的高科技化。該信息平臺大大提高了信息化、智能化程度,提高了數(shù)據(jù)的集成度,對空間數(shù)據(jù)的查詢,分析更加方便、數(shù)據(jù)結(jié)構(gòu)更為合理,并增加了對動態(tài)數(shù)據(jù)的存儲、處理和顯示,提供了更多的管理與分析模塊,在一般中學(xué)教學(xué)與科學(xué)普及工作中有一定的優(yōu)勢。3系統(tǒng)設(shè)計(jì)3．1總體設(shè)計(jì)用戶需求在系統(tǒng)具體設(shè)計(jì)前必須明確所要設(shè)計(jì)系統(tǒng)的用戶需求,只有了解了用戶的具體要求才能依此為依據(jù)進(jìn)行系統(tǒng)具體功能的設(shè)計(jì),這樣設(shè)計(jì)的系統(tǒng)才有其存在的意義。然而對于本系統(tǒng)來說其用戶的需求是能夠方便快捷的查詢,分析世界地圖上各個地區(qū)的一些基本的地理信息屬性,例如面積,經(jīng)緯度,距離等,并可以實(shí)現(xiàn)數(shù)據(jù)篩選功能。同時操作要求便捷,數(shù)據(jù)要用文字,數(shù)字,圖形等快速的顯示出來。系統(tǒng)目標(biāo)全球地理查詢系統(tǒng)的目標(biāo)主要是實(shí)現(xiàn)中學(xué)課堂教學(xué)及一般科學(xué)普及單位科普工作的信息化,來滿足當(dāng)前社會發(fā)展趨勢下用戶要求,可以給用戶提供一些最基本的地理信息,為了提高課堂教學(xué)以及科學(xué)普及工作的信息化,加快教育信息化發(fā)展,為地理教學(xué)科普而開發(fā)基于SuperMapObject6.0和VisualBasic語言GIS建立的全球地理查詢系統(tǒng),并希望通過這個系統(tǒng)使課堂地理教學(xué)信息化更加普及,系統(tǒng)目標(biāo)如下：〔1系統(tǒng)應(yīng)能實(shí)現(xiàn)圖形和屬性的連接,實(shí)現(xiàn)用戶對圖形及屬性的雙向檢索；〔2系統(tǒng)具有快速對地理信息進(jìn)行查詢、空間分析與顯示功能；〔3系統(tǒng)應(yīng)具有良好的擴(kuò)展性與改進(jìn)空間。總體結(jié)構(gòu)本課題所研究的全球地理查詢系統(tǒng)根據(jù)用戶的需要,實(shí)現(xiàn)了地理信息查詢,以及測距,側(cè)面積的功能。經(jīng)過需求分析階段的工作后,系統(tǒng)必須"做什么"的問題已經(jīng)解決了,現(xiàn)在是解決"怎么做"這個問題的時候了。總體設(shè)計(jì)的基本目的就是回答系統(tǒng)應(yīng)該如何實(shí)現(xiàn)這個問題。系統(tǒng)總體結(jié)構(gòu)設(shè)計(jì)是要根據(jù)系統(tǒng)分析的要求和組織的實(shí)際情況來對新系統(tǒng)的總體結(jié)構(gòu)形式進(jìn)行大致設(shè)計(jì),它是一種宏觀、總體上的設(shè)計(jì)和規(guī)劃。1全球地理查詢系統(tǒng)主要功能是讓用戶方便對于基礎(chǔ)地理信息的查詢與分析工作,方便教學(xué)與科普活動。2數(shù)據(jù)的屬性查詢模塊主要功能是對所屬地區(qū)基本地理信息,例如面積,經(jīng)緯度等的查詢。3條件查詢的主要功能是設(shè)置一條件,對于滿足此條件的地域進(jìn)行顯示的功能。系統(tǒng)功能總體結(jié)構(gòu)圖如圖1：圖1、系統(tǒng)功能總結(jié)構(gòu)圖系統(tǒng)功能本課題主要基本地理信息的查詢分析服務(wù),目的是為課堂教學(xué)更加科學(xué)更加人性化,是用戶輕而易舉就可以完成地理相關(guān)信息的查詢與檢索功能。本系統(tǒng)重要包括五個獨(dú)立的模塊：地圖瀏覽模塊,查詢模塊,娛樂模塊,精確查詢模塊,幫助模塊。幾個模塊的使用大大提高了用戶信息檢索的效率與精確度,為用戶提供了很大的方便。3．2詳細(xì)設(shè)計(jì)子系統(tǒng)設(shè)計(jì)本系統(tǒng)主要分為5個獨(dú)立的模塊：地圖瀏覽模塊、娛樂模塊、精確查詢模塊、查詢功能模塊,幫助模塊。在地圖瀏覽模塊中,用戶可以使用相關(guān)控件對地圖進(jìn)行漫游,放大,縮小,也可以根據(jù)個人需要進(jìn)行自由縮放,以及全屏觀看在娛樂模塊中,為大家在學(xué)習(xí)工作之余提供了小游戲。在精確查詢模塊中,進(jìn)行SQL查詢,根據(jù)用戶的不同需求對信息進(jìn)行檢索,并對檢索結(jié)果進(jìn)行排序,并且可以保存輸出查詢結(jié)果。在查詢模塊中,可以查詢相關(guān)地域的屬性,使用條件查詢可以對地圖上的符合查詢條件的地點(diǎn)通過圖像進(jìn)行顯示。幫助模塊用于對用戶提供一定的幫助。3.2.2數(shù)據(jù)庫設(shè)計(jì)由于是地理信息系統(tǒng),全球地理查詢系統(tǒng)數(shù)據(jù)庫也應(yīng)包括空間數(shù)據(jù)庫和屬性數(shù)據(jù)庫,再此采用關(guān)系型數(shù)據(jù)庫模式。具體的屬性數(shù)據(jù)以圖表形式記錄,而圖形數(shù)據(jù)以拓?fù)潢P(guān)系記錄。并且在這些建立這些專題數(shù)據(jù)庫時要注意各種專題信息的關(guān)系字段,保證互相之間都有聯(lián)系。數(shù)據(jù)建庫時,要按照分類標(biāo)準(zhǔn)進(jìn)行科學(xué)分類,要符合數(shù)據(jù)編碼的一般要求：〔1凡國家已施行的編碼規(guī)范和標(biāo)準(zhǔn),均按國家規(guī)定的執(zhí)行；〔2科學(xué)編碼系統(tǒng)的設(shè)計(jì)必須可靠地識別數(shù)據(jù)信息的分類,以較少的代碼提供豐富的參考信息,以及根據(jù)代碼結(jié)構(gòu)能進(jìn)行數(shù)據(jù)間關(guān)系的邏輯推理和判別；〔3編碼不宜過長,一般為4—7位,以減少出錯的可能性和節(jié)省存儲空間。對于多要素的數(shù)據(jù)信息,通過設(shè)置特征位來有效地壓縮碼位的長度；〔4編碼標(biāo)準(zhǔn)化,其內(nèi)容包括統(tǒng)一的碼位長度、一致的碼位格式和明確的代碼含義,不能出現(xiàn)代碼的多義性等等。此外,數(shù)據(jù)質(zhì)量要嚴(yán)格控制,主要控制保證：數(shù)據(jù)完整性、數(shù)據(jù)一致性、位置精度、時間精度、屬性精度。系統(tǒng)E-R圖如圖2：系統(tǒng)維護(hù)系統(tǒng)維護(hù)用戶111用戶信息售后服務(wù)管理員管理n軟件管理包括111官方網(wǎng)站瀏覽,提問管理1nnnnn圖2、系統(tǒng)E-R功能模塊設(shè)計(jì)查詢功能模塊PrivateSubToolbar2_ButtonClick<ByValButtonAsMSComctlLib.Button>SelectCaseButtonCase"屬性查詢"SuperMap1.Action=scaSelectCase"條件查詢"DimobjDsAssoDataSource'數(shù)據(jù)源DimobjDtVectorAssoDatasetVector'矢量數(shù)據(jù)集DimobjRecordsetAssoRecordset'記錄集DimobjSelectionAssoSelection'選擇集'取矢量數(shù)據(jù)集：取其中面數(shù)據(jù)集"World"進(jìn)行查詢SetobjDs=SuperWorkspace1.Datasources.Item<"MyDataSource">IfobjDsIsNothingThenExitSubSetobjDtVector=objDs.Datasets<"World">IfobjDtVectorIsNothingThenMsgBox"打開數(shù)據(jù)集錯誤",vbInformationExitSubEndIf'使用SQL過濾條件安從數(shù)據(jù)集中查詢出記錄集,SetobjRecordset=objDtVector.Query<txtExpression.Text,True>IfobjRecordsetIsNothingThenExitSubElse'將查詢結(jié)果加入到選擇集中,使其高亮顯示SetobjSelection=SuperMap1.SelectionobjSelection.FromRecordsetobjRecordset'刷新地圖窗口SuperMap1.RefreshEndIfSetobjDtVector=NothingSetobjRecordset=NothingSetobjSelection=NothingEndSelectEndSub娛樂模塊PrivateSubToolbar3_ButtonClick<ByValButtonAsMSComctlLib.Button>SelectCaseButtonCase"游戲"Shell"C:\DocumentsandSettings\Administrator\桌面\VisualBasic6.0\ddchess.exe"Case"音樂"Shell"F:\KuGou2010\KuGoo.exe"Case"驚喜"Print"售價100萬,地科免費(fèi)！"FontName="黑體"FontItalic=TrueFontSize=48EndSelectEndSub精確查找模塊PrivateSubbtnSQL_Click<>frmSQLExpression.ShowvbModal,MeEndSubPrivateSubbtnShowDt_Click<>DimiAsIntegerDimobjDsAssoDataSourceDimobjDtAssoDatasetIfbtnShowDt.Caption="顯示生成的數(shù)據(jù)集"ThenSetobjDs=SuperWorkspace1.Datasources<1>IfstrDtName=""ThenExitSubSetobjDt=objDs.Datasets<strDtName>SuperMap1.Layers.AddDatasetobjDt,TrueSuperMap1.RefreshbtnShowDt.Caption="顯示全部圖層"ElseSetobjDs=SuperWorkspace1.Datasources<1>Fori=SetobjDt=objDs.Datasets<i>SuperMap1.Layers.AddDatasetobjDt,TrueNextbtnShowDt.Caption="顯示生成的數(shù)據(jù)集"EndIfSuperMap1.RefreshEndSub地圖瀏覽模塊PrivateSubToolbar1_ButtonClick<ByValButtonAsMSComctlLib.Button>SelectCaseButtonCase"放大"SuperMap1.Action=scaZoomInCase"縮小"SuperMap1.Action=scaZoomOutCase"自由縮放"SuperMap1.Action=scaZoomFreeCase"漫游"SuperMap1.Action=scaPanCase"選擇"SuperMap1.Action=scaSelectCase"全屏"SuperMap1.ViewEntireCase"演示"'建立地圖窗口與工作空間的聯(lián)系,用于顯示數(shù)據(jù)SuperMap1.ConnectSuperWorkspace1.ObjecDimstrAliasAsString'數(shù)據(jù)源別名DimnEngineTypeAsseEngineType'數(shù)據(jù)源引擎類型DimstrDatasourceNameAsString'數(shù)據(jù)源所在路徑DimobjDataSourceAssoDataSource'數(shù)據(jù)源對象,指向打開的數(shù)據(jù)源DimbReadOnlyAsBoolean'數(shù)據(jù)源是否只讀打開DimobjLayerAssoLayer'圖層對象變量,指向?qū)⒁蜷_的圖層DimbAddToHeadAsBoolean'是否將數(shù)據(jù)集加到地圖最上一層顯示DimiAsInteger'數(shù)據(jù)集索引strAlias="MyDataSource"'別名可任意,但建議取數(shù)據(jù)源文件名相同的名稱nEngineType=sceSDBPlus'可打開不同引擎的數(shù)據(jù)源strDatasourceName="C:\DocumentsandSettings\Administrator\桌面\VisualBasic6.0\world.sdb"'數(shù)據(jù)源所在路徑,也可以是相對路徑bReadOnly=False'非只讀打開SetobjDataSource=SuperWorkspace1.OpenDataSource<strDatasourceName,strAlias,nEngineType,bReadOnly>IfobjDataSourceIsNothingThenMsgBox"打開數(shù)據(jù)源失敗！",vbInformationElse'把數(shù)據(jù)源中的所有數(shù)據(jù)集加入到SuperMap中顯示bAddToHead=TrueSetaset<objDataSource.Datasets.Item<i>,bAddToHead>NextEndIf'刷新地圖窗口SuperMap1.Refresh'可定制選中對象風(fēng)格,或保持默認(rèn)SuperMap1.Selection.Style.PenColor=RGB<231,77,0>SuperMap1.Selection.Style.PenWidth=1SuperMap1.Selection.Style.PenStyle=1SuperMap1.Selection.Style.BrushStyle=5=RGB<115,69,140>=RGB<239,150,255>SuperMap1.Selection.Style.BrushOpaqueRate=50'釋放內(nèi)存SetobjDataSource=NothingSetobjLayer=NothingCase"退出"EndEndSelectEndSub幫助模塊PrivateSubbb_Click<>MsgBox"GIS全球查詢系統(tǒng)1.3,有問題請聯(lián)系我們！"En