用Delphi下載WebServices數(shù)據(jù)自動生成服務(wù)材料

周 明,于嶸慶

(1.重慶市萬州區(qū)氣象局,重慶 萬州 404000;2.四川省氣象局大氣探測中心,四川 成都 610071)

用Delphi下載WebServices數(shù)據(jù)自動生成服務(wù)材料

周 明1,于嶸慶2

(1.重慶市萬州區(qū)氣象局,重慶 萬州 404000;2.四川省氣象局大氣探測中心,四川 成都 610071)

隨著氣象現(xiàn)代化進(jìn)程的不斷推進(jìn),區(qū)域自動站數(shù)量不斷增加,萬州區(qū)站點(diǎn)數(shù)已達(dá) 40余個(gè),加之當(dāng)?shù)攸h政和相關(guān)部門以及社會公眾日益增長的預(yù)報(bào)服務(wù)需求,使預(yù)報(bào)服務(wù)人員較以往增加了大量工作任務(wù),為在人員少任務(wù)重的情況下做好預(yù)報(bào)服務(wù)工作,根據(jù)重慶市局提供的實(shí)時(shí)和歷史數(shù)據(jù)庫的分布式檢索接口,用Delphi編程調(diào)用Web Service數(shù)據(jù)并快速生成服務(wù)材料,極大地提高了預(yù)報(bào)服務(wù)工作效率。

Delphi;下載WebServices數(shù)據(jù);生成服務(wù)材料

1 生成Web Service數(shù)據(jù)接口單元

(1)啟動 Delphi,新建一個(gè) Application,將缺省For m1的 name改為 Frmfirst。

(2)選 File—>New—>Other—>WebServices—>WSDL Importer,出現(xiàn)圖 1窗口。

圖 1 New Items窗口

單擊圖 1“Ok”,在 Location Of WSDL File or URL框中填入:http://172.24.176.29/hmsas/wsdl/ hmsas.wsdl,單擊“Next>”按鈕,單擊“Finish”生成接口定義單元 hmsas。

2 下載數(shù)據(jù)

3 自動生成服務(wù)材料

4 結(jié)束語

①通過統(tǒng)一的接口訪問數(shù)據(jù),性能更高、系統(tǒng)更穩(wěn)定,且用戶不需關(guān)心如何操作數(shù)據(jù)庫,可大大縮短開發(fā)周期,開發(fā)應(yīng)用程序更加簡單快捷。

②有此程序后,萬州區(qū)氣象臺的服務(wù)材料如《每日氣象要訊》、《三峽水庫試蓄水期間專題服務(wù)材料》等可快速準(zhǔn)確的自動生成,并且重點(diǎn)關(guān)注內(nèi)容亦可方便選擇,為提高服務(wù)效率、避免錯(cuò)誤提供了較好的技術(shù)支撐。

TP274

B

2010-09-10

周明(1954-),男,高工,主要從事天氣預(yù)報(bào)工作。

1003-6598(2010)增刊 -0187-03