基于Ｄｅｌｐｈｉ的醫(yī)學(xué)積件教學(xué)平臺(tái)的設(shè)計(jì)

摘 要針對(duì)目前醫(yī)學(xué)圖像數(shù)據(jù)在課件制作應(yīng)用中的問題，本文提出了一種基于Delphi的醫(yī)學(xué)積件教學(xué)平臺(tái)的設(shè)計(jì)方法，并給出了實(shí)現(xiàn)過程。

關(guān)鍵詞 醫(yī)學(xué)積件；平臺(tái)；設(shè)計(jì)

中圖分類號(hào)：G434文獻(xiàn)標(biāo)識(shí)碼：A文章編號(hào)：1671-489X（2007）12－0053-02

Design of Medical Integrable Ware Platform based on Delphi//Lu Huifen，Hu Junfeng

Abstract In this article， we firstly analyze the main issues existed in current courseware， and then put forward a kind of design of medical integrable ware platform based on Delphi. Finally， we discuss the key to the platform.

Key words Medical Integrable Ware；platform；design

Author’s address

1 Modern Educational Technology Center ，Xuzhou Normal University ， Xuzhou，Jiangsu221006

2 Institute Cancer of Xuzhou Medical Coloege， Xuzhou，Jiangsu221006

1 引言

積件（Integrable Ware）是由教師和學(xué)生根據(jù)教學(xué)需要，自己組合運(yùn)用多媒體教學(xué)信息資源的教學(xué)軟件系統(tǒng)[1]。積件思想作為一種關(guān)于CAI發(fā)展的系統(tǒng)思路，是對(duì)多媒體教學(xué)信息資源和教學(xué)過程進(jìn)行準(zhǔn)備、檢索、設(shè)計(jì)、組合、使用、管理、評(píng)價(jià)的理論與實(shí)踐。它不是在技術(shù)上把教學(xué)資源素材庫和多媒體著作平臺(tái)的簡單疊加，而是從課件的經(jīng)驗(yàn)中發(fā)展出來的現(xiàn)代教材建設(shè)的重要觀念轉(zhuǎn)變，是繼第1代教學(xué)軟件課件之后的新1代教學(xué)軟件系統(tǒng)和教學(xué)媒體理論。它包括教學(xué)資源素材庫、微課件單元和積件組合平臺(tái)3個(gè)基本部分。設(shè)計(jì)制作多媒體教學(xué)組合平臺(tái)是整個(gè)系統(tǒng)的核心[2]。

數(shù)字化后的文字、圖像、表格、電影、聲音等存儲(chǔ)于醫(yī)院影像系統(tǒng)中，可直接服務(wù)于醫(yī)療，但教學(xué)與科研應(yīng)用目前卻很不方便。現(xiàn)在，醫(yī)學(xué)教學(xué)中已廣泛采用多媒體課件方式，課件的制作離不開圖像等醫(yī)院的影像系統(tǒng)信息，怎樣利用這些信息呢？現(xiàn)在的辦法是個(gè)人去查，一個(gè)一個(gè)備份，然后再在課件制作中打開利用，做過課件的教師都有很多類似的經(jīng)歷，要做好一堂課的課件確實(shí)是一個(gè)費(fèi)時(shí)又費(fèi)力的事。為了更好地利用醫(yī)院的影像系統(tǒng)中的信息，教師有必要開展新型的積件系統(tǒng)的研究。通過開發(fā)一個(gè)課件制作平臺(tái)，使醫(yī)院圖像數(shù)據(jù)庫中查找到的有用圖像，直接添加到課件中去。這樣就可以減少許多的中間環(huán)節(jié)，從而使得課件的制作輕而易舉，既可以豐富課件內(nèi)容，又可以增加醫(yī)院圖像的利用率。

2 醫(yī)學(xué)積件教學(xué)平臺(tái)的開發(fā)

要完成醫(yī)學(xué)積件系統(tǒng)的開發(fā)，就必須開發(fā)一套課件自動(dòng)生成平臺(tái)。它能有效地利用醫(yī)院多媒體數(shù)據(jù)庫的相關(guān)信息，自動(dòng)生成醫(yī)學(xué)教學(xué)課件。

2.1 平臺(tái)開發(fā)應(yīng)起點(diǎn)高

目前一些優(yōu)秀的多媒體編著平臺(tái)如Authorware、PowerPoint對(duì)普及學(xué)校課堂計(jì)算機(jī)輔助教學(xué)、教學(xué)素材資源的建設(shè)起到了很好的推動(dòng)作用，但它們不是筆者所說的平臺(tái)。筆者在開發(fā)醫(yī)學(xué)教學(xué)平臺(tái)時(shí)吸收了常用的課件生成平臺(tái)的設(shè)計(jì)思想，考慮到目前大部分教師使用計(jì)算機(jī)的實(shí)際水平，而且忙于日常的教學(xué)和臨床醫(yī)療，所以直接面向?qū)W校師生的平臺(tái)系統(tǒng)應(yīng)在易學(xué)易用方面多下工夫，使教師能借助系統(tǒng)這一工具靈活方便地制作教學(xué)軟件。

2.2 編程控件選擇

開發(fā)時(shí)筆者選用了Delphi6.0編程語言，充分利用它強(qiáng)大的編程處理功能及具備與PowerPoint關(guān)聯(lián)的相關(guān)控件的特性。Delphi6.0中相關(guān)控件有PowerPoint Presentation控件、PowerPoint Application控件、PowerPoint Slide控件，實(shí)現(xiàn)了與PowerPoint演示文稿的關(guān)聯(lián)，直接把多媒體數(shù)據(jù)庫程序中圖像和文檔插入到PowerPoint中，并控制播放[3]。這樣在開發(fā)平臺(tái)時(shí)就不必自行開發(fā)第三方控件，從而可以減少開發(fā)時(shí)間，降低開發(fā)風(fēng)險(xiǎn)，提高程序運(yùn)行可靠性和可移植性，進(jìn)而開發(fā)出安全可靠的課件生成平臺(tái)。

2.3 編程實(shí)現(xiàn)

首先完成對(duì)控件PowerPoint Presentation、PowerPoint Application、PowerPoint Slide屬性的設(shè)置，主要包括是否自動(dòng)連接（Auto Connect）、連接種類（Connect Kind）、連接遠(yuǎn)程計(jì)算機(jī)名（Remote Machine Name）、設(shè)置幻燈片（Slide Show Settings）等，各控件的主要方法在程序代碼中進(jìn)行定義[4]。

其次要添加數(shù)據(jù)庫相關(guān)控件:Table、Data Source、DB Navigator、DB Grid、DB Image，完成平臺(tái)與多媒體數(shù)據(jù)庫的連接與圖片顯示。

利用平臺(tái)，直接把多媒體數(shù)據(jù)庫圖片添加進(jìn)PowerPoint 演示文稿的實(shí)現(xiàn)界面圖（如圖1所示），其實(shí)現(xiàn)過程如下：

PowerPoint Slide1.Connect To (PowerPoint Presentation1. Slides. Add(PowerPoint-Presentation1. Slides. Count + 1，1))；

with PowerPoint Slide1 do

begin

button4.Enabled := True； {設(shè)置圖片的位置}

Layout := 20； {設(shè)置背景}

Follow Master Background := 0；

Background.Fill.Preset Gradient(2， 2， 10)； {設(shè)置文本}

Shapes.Item(1).textFrame.textRange.Insert After(Table1.Field by name('疾病').As String)；

Shapes.Item(3).textframe.textrange.Font.Name := 'Arial'；

Shapes.Item(3).textframe.textrange.Insert After('門診號(hào):' + Table1.Field By Name('門診號(hào)').As String + #13 +'姓名:' + Table1.Field By Name('姓名').As String + #13 + '說明：' + table1.field by name('說明').AsString)； {插入圖片}

Db Image1.Copy To Clipboard；//復(fù)制到剪貼板

Shapes.Item(2).Delete；

Shapes.Paste；//粘貼

Shapes.Item(2).Left :=200；

Shapes.Item(2).Top := 180；

Shapes.Item(2).Width := 300；

Shapes.Item(2).Height := 300；

Slide Show Transition.Advance On Time := 1； {設(shè)置幻燈的變化時(shí)間}

Slide Show Transition.Advance Time := 2；

Name := Table1.Field By Name(’疾病').As String + (Int To Str(PowerPoint Presentation1.Slides.Count))；

TV1.Items.Add Child(TN，Name)；

TN.Selected；

TV1.Set Focus；

3 結(jié)束語

由于目前PowerPoint在大專院校應(yīng)用最廣，許多教師已掌握了使用PowerPoint制作課件的技術(shù)。筆者本著無需培訓(xùn)，最易使用的方向，在PowerPoint的基礎(chǔ)上開發(fā)了該平臺(tái)。這樣，隨著PowerPoint主流軟件不斷加強(qiáng)其功能，相信這一平臺(tái)的利用率也會(huì)更高，使用壽命也就可能更長。

參考文獻(xiàn)：

[1]教育部現(xiàn)代遠(yuǎn)程教育資源建設(shè)委員會(huì).教育資源建設(shè)技術(shù)規(guī)范（征求意見稿）[Z].2002

[2]胡俊峰.醫(yī)學(xué)教學(xué)積件系統(tǒng)的研究[J].醫(yī)療設(shè)備信息，2004（1）:22-23

[3]段興.Delphi 6控件實(shí)用程序設(shè)計(jì)100例[M].北京：人民郵電出版社，2002

[4]陳豫龍.Delphi 6數(shù)據(jù)庫系統(tǒng)開發(fā)實(shí)例導(dǎo)航[M].北京：人民郵電出版社，2002