第一篇：錯(cuò)位相減法畢業(yè)論文素材

導(dǎo)語(yǔ)：錯(cuò)位相減法是一種常用的數(shù)列求和方法。應(yīng)用于等比數(shù)列與等差數(shù)列相乘的形式。下面是小編收集整理的錯(cuò)位相減法畢業(yè)論文素材，歡迎參考！

【錯(cuò)位相減法畢業(yè)論文素材一】

一、問(wèn)題的提出

a1(1-qn)我們都知道，高一課本第一冊(cè)(上)在推導(dǎo)等比數(shù)列前n項(xiàng)和公式Sn= 1-q，隨即在書(shū)中的第137頁(yè)復(fù)習(xí)參考題三B(q≠1)的過(guò)程中運(yùn)用了著名的“錯(cuò)位相減法”。

組中出現(xiàn)了運(yùn)用該方法來(lái)解決的求和問(wèn)題：

6、S=1+2x+3x2+??+nxn-1。這類(lèi)數(shù)列的主要特征是：已知數(shù)列{Cn}滿(mǎn)足Cn=an?bn其中{an}等差，{bn}等比且公比不等于1，老師們形象地稱(chēng)這類(lèi)數(shù)列{Cn}為“等差乘等比型”數(shù)列。求這類(lèi)數(shù)列前n項(xiàng)的和時(shí)通常在和式的兩邊都乘以組成這個(gè)數(shù)列的等比數(shù)列的公比，然后再將得到的新和式和原和式相減，轉(zhuǎn)化為同倍數(shù)的等比數(shù)列求和，這種方法即所謂的“錯(cuò)位相減法”。而且近年來(lái)的各地乃至全國(guó)高考的試卷中頻頻出現(xiàn)此類(lèi)型的數(shù)列的求和問(wèn)題，解法當(dāng)然是不變的“錯(cuò)位相減法”，而且老師在平時(shí)的講題中也一再?gòu)?qiáng)調(diào)該類(lèi)型的前n項(xiàng)和只能用錯(cuò)位相減法來(lái)解決，似乎成了“自古華山一條道”的絕法。難道真的沒(méi)有其他的解決方法了嗎?這的確沒(méi)有讓我墨守成規(guī)，反而激起了我無(wú)限的探索欲。

二、特例解決帶來(lái)的啟發(fā)

當(dāng)q≠1時(shí)等比數(shù)列{an}通項(xiàng)an=a1qn-1可變形為an=a1qn-1?a1-q=1(qn-1-qn)1-q1-q

于是前n項(xiàng)和Sn=a1a[(1-q1)+(q1-q2)+?+(qn-1-qn)]=1(1-qn)1-q1-q

受到上面變形的啟發(fā)，我想既然等比數(shù)列的通項(xiàng)可以裂成兩項(xiàng)的差的形式，那么公比不為1的“等差乘等比型”數(shù)列的通項(xiàng)如果也能裂成類(lèi)似的形式，那么讓我苦思冥想的那個(gè)求和方法不就神奇的找到了嗎?在此之前，我們老師還一再?gòu)?qiáng)調(diào)此類(lèi)數(shù)列的求和不能用裂項(xiàng)相消，如果這一設(shè)想成功的話(huà)，算不算是觀念和方法上的一次突破。

三、一個(gè)方法的發(fā)現(xiàn)

裂項(xiàng)求和也是數(shù)列求和中最常用的一種方法，它的本質(zhì)是將數(shù)列中的每一項(xiàng)都化為兩項(xiàng)之差，并且前一項(xiàng)的減數(shù)恰好與后一項(xiàng)被減數(shù)相同，求和時(shí)中間項(xiàng)相抵消。

【錯(cuò)位相減法畢業(yè)論文素材二】

數(shù)列求和是數(shù)列的重要內(nèi)容之一，在現(xiàn)行高中教材中，只對(duì)等差數(shù)列和等比數(shù)列的求和公式進(jìn)行了計(jì)算推導(dǎo)，而數(shù)列種類(lèi)繁多，形式復(fù)雜，絕大多數(shù)既非等差數(shù)列又非等比數(shù)列，也就不能直接用公式來(lái)求解。很多同學(xué)遇到數(shù)列求和問(wèn)題總是感到力不從心，甚至有的同學(xué)把它看作是自己的死穴，覺(jué)得即使思考也做不出來(lái)，何必耽誤時(shí)間，因此遇到這類(lèi)問(wèn)題就直接跳過(guò)。在這中間，錯(cuò)位相減是一個(gè)比較重要的內(nèi)容，也是一個(gè)及其有效的解決數(shù)列求和的簡(jiǎn)便方法，但是由于它的計(jì)算量比較大，同時(shí)要反復(fù)列出幾個(gè)式子并且不斷求解，有的題目一眼看上去不容易找出公比，更加導(dǎo)致一些同學(xué)放棄或者只計(jì)算其中的一部分。實(shí)際上，通過(guò)分層次練習(xí)，總結(jié)經(jīng)驗(yàn)，并找到規(guī)律，這類(lèi)問(wèn)題的求解會(huì)變得相當(dāng)?shù)暮?jiǎn)單。

一、錯(cuò)位相減理論分析

錯(cuò)位相減是高中數(shù)學(xué)教材中推導(dǎo)等比數(shù)列前n項(xiàng)和的一種思想方法，它在解決由一個(gè)等差數(shù)列和一個(gè)等比數(shù)列對(duì)應(yīng)項(xiàng)之積所構(gòu)成的數(shù)列求和，具有非常重要的意義。由于它的獨(dú)特性與實(shí)用性，并且與課本知識(shí)緊密結(jié)合，所以，在高考中占有十分重要的地位。它所遵從的思想是一種轉(zhuǎn)化的思想，經(jīng)過(guò)轉(zhuǎn)化可以把它轉(zhuǎn)化成為等比問(wèn)題求解。乘以相同的公比得到新式子，再同舊式子錯(cuò)位相減，就得到了一個(gè)含有等比數(shù)列的等式，細(xì)心計(jì)算，便不難求解。

二、錯(cuò)位相減題目舉例

首先，我們先看一道最簡(jiǎn)單的例題，從簡(jiǎn)單題中得到啟發(fā)。

例1.已知數(shù)列an=nλnλ，求數(shù)列的和。

解：∵Tn=λ+2λ2+…+n-1)λn-1+nλn，JY①

兩邊同時(shí)乘以λ，得

λTn=λ2+2λ3+…+n-1)λn+nλn+1，JY②

①-②，得

JZ1-λ)Tn=λ+λ2+…+λn-1+λn-nλn+1，JZ∴1-λ)Tn=SXλ1-λn)1-λSX)-nλn+1，JZ∴Tn=SXλ1-λn)1-λ)2SX)-SXnλn+11-λSX).這是一個(gè)最簡(jiǎn)單的錯(cuò)位相減，同時(shí)也是解決錯(cuò)位相減問(wèn)題的一個(gè)基礎(chǔ)題目。

下面，我們來(lái)看一道有些麻煩的題目。

例二.an=1-2n)2n，求Sn.解：由題意知，JZan=(1-2n)2n，JZ∴Sn=a1+a2+a3+…+an，即

DKSn=(1-2)2+(1-4)22+(1-6)23+…+(1-2n)2nDK)JY①

①×2得

DK2Sn=(1-2)22+(1-4)23+…+(3-2n)2n+(1-2n)2n+1DK)JY②

②-①得

JZSn=2+222+23+…+22n-(2n-1)2n+

1JZ=2+2SX4(1-2n-1)1-2SX)-(2n-1)2n+1

JZ=(1-n)2n+2+2n+1-6

例二是一個(gè)具體化的錯(cuò)位相減問(wèn)題，對(duì)于這些直接列出的題目，大多數(shù)的學(xué)生都可以做出來(lái)，出錯(cuò)率也比較的低，但是，在如今這樣一個(gè)考驗(yàn)學(xué)生綜合素質(zhì)=的社會(huì)中，我們遇到的大多都是多個(gè)知識(shí)點(diǎn)結(jié)合的題目。下面我們通過(guò)一道高考題來(lái)進(jìn)一步認(rèn)識(shí)一下錯(cuò)位相減。

例三.已知等差數(shù)列{an}的前3項(xiàng)和為6，前8項(xiàng)和為-4.(1)求數(shù)列的通項(xiàng)公式.(2)設(shè)bn=(4-an)qn-1q≠0，n∈求數(shù)列的前n項(xiàng)和.解：(1)設(shè){an}的公差為d，則由已知得

JZJB{a1+a2+a3=6a1+a2+…+a8=-4，JB)即JB{3a1+3d=68a1+28d=-4，JB)

解得a1=3，d=-1，故an=3-n-1)=4-n.(2)由(1)知，bn=nqn-1，于是JZSn=1q0+2q1+3q2+…+nqn-1，若q≠1，上式兩邊同時(shí)乘以q.JZqSn=1q1+2q2+3q3+…+nqn-1，兩式相減得：

JZ(1-q)Sn=1+q1+q2+…+qn-1-nqn=SX1-qn1-qSX)-nqn.JZ∴Sn=SX1-qn(1-q)2SX)-SXnqn1-qSX)=SXnqn+1-(n+1)qn+1(1-q)2SX).若q=1，則Sn=1+2+3+…+n=SXnn+1)2SX)，JZ∴Sn=JB{HL2SXn(n+1)2SX)(q=1)

SXnqn+1-(n+1)qn+1(1-q)2SX)q≠1)HL)JB)

針對(duì)這個(gè)問(wèn)題，許多同學(xué)容易忽視對(duì)于q的討論致使題目出錯(cuò)。這個(gè)問(wèn)題的關(guān)鍵是對(duì)于等比數(shù)列的定義的認(rèn)識(shí)，若是忽視了等比數(shù)列定義中對(duì)于公比的界定，則很容易導(dǎo)致問(wèn)題出錯(cuò)。我們回顧例一可以發(fā)現(xiàn)，在例一中我們對(duì)公比進(jìn)行了限定，因此，在下面的解題中就不需要進(jìn)行討論。

三、方法總結(jié)

A.分析題型，確定類(lèi)型。錯(cuò)位相減問(wèn)題具有很強(qiáng)的規(guī)律性，當(dāng)然也適應(yīng)特定的題目，所以，在做題之前首先需要明確題目的類(lèi)型，錯(cuò)位相減法是否使用。首先，確定是否為數(shù)列類(lèi)型的題目;其次再確定是否為求和問(wèn)題;最后，通過(guò)觀察通項(xiàng)的類(lèi)型，確定是否可以使用錯(cuò)位相減法解決問(wèn)題。錯(cuò)位相減法是等差數(shù)列和等比數(shù)列的有效結(jié)合，即

JZTn=a1b1+a2b2+…+an-1bn-1+anbn

其中an為等差數(shù)列，bn為等比數(shù)列。

B.錯(cuò)位相減的做題方法

以例1為例，即

Tn=λ+2λ2+…+(n-1)λn-1+nλnJY①

λTn=λ2+2λ3+…+(n-1)λn+nλn+1JY②

(1-λ)Tn=λ+λ2+…+λn-1+λn-nλn+1JY③

1.①×公比λ得②式(或乘以公比的倒數(shù)，解題方法類(lèi)似);

2.①-②得③(③式為：留①頭，減②尾，中間對(duì)應(yīng)次數(shù)相減的同系數(shù));

3.③里面含有n+1項(xiàng);

4.按照等比數(shù)列求和方法求③式的前n項(xiàng)的和，減去第n-1項(xiàng);

5.③式兩邊同時(shí)除以SX1λ-1SX)得最后的結(jié)果。

在使用錯(cuò)位相減求和時(shí)，一定要善于識(shí)別這類(lèi)題目，準(zhǔn)確的識(shí)別是正確解題的關(guān)鍵。同時(shí)要十分注意等比數(shù)列的公比為負(fù)數(shù)的情形，此外，一定要注意在書(shū)寫(xiě)的時(shí)候注意將①②兩式的“錯(cuò)項(xiàng)對(duì)齊”，即將相同冪指數(shù)的項(xiàng)對(duì)齊，這樣有一個(gè)式子(即式①)前面空出一項(xiàng)，另外一個(gè)式子(即式②)后面就會(huì)多出一項(xiàng)，①②兩式相減得到③式，在式③中除了第一項(xiàng)和最后一項(xiàng)，剩下的n-1項(xiàng)是一個(gè)等比數(shù)列。當(dāng)然認(rèn)真細(xì)致，悉心體會(huì)，記住規(guī)律，耐住性子也是相當(dāng)重要的。

“知行統(tǒng)一”的重要性大家應(yīng)該都知道，當(dāng)我們記住了理論的知識(shí)，勤加練習(xí)，反復(fù)運(yùn)用才會(huì)使我們事倍功半，恰巧，錯(cuò)位相減正需要我們的大量練習(xí)，在不斷的練習(xí)，反復(fù)的刺激我們的記憶細(xì)胞下才有可能使我們?cè)谧鲱}的時(shí)理論練習(xí)實(shí)際，減少出錯(cuò)率。

第二篇：《數(shù)列求和之錯(cuò)位相減法》教學(xué)設(shè)計(jì)

《數(shù)列求和之錯(cuò)位相減法》教學(xué)設(shè)計(jì)

教學(xué)目標(biāo)：

讓學(xué)生能夠理解錯(cuò)位相減法，并能夠應(yīng)用錯(cuò)位相減法求數(shù)列的前n項(xiàng)和。教學(xué)重點(diǎn)： 錯(cuò)位相減法的應(yīng)用 教學(xué)難點(diǎn)：

錯(cuò)位相減法的計(jì)算過(guò)程 教學(xué)內(nèi)容：

一、課前復(fù)習(xí)

回顧等比數(shù)列前n項(xiàng)和的求和公式：

設(shè)計(jì)意圖：由于應(yīng)用錯(cuò)位相減法解題時(shí)必定會(huì)使用等比數(shù)列前n項(xiàng)和的通項(xiàng)公式求和，因此有必要做好復(fù)習(xí)鋪墊工作。

二、問(wèn)題探究

數(shù)列{an}的通項(xiàng)公式an?n，數(shù)列{bn}的通項(xiàng)公式bn?2n，求數(shù)列{an?bn}的前n項(xiàng)和。設(shè)計(jì)意圖：由具體問(wèn)題引入課題，引導(dǎo)學(xué)生觀察題目中所求數(shù)列通項(xiàng)的特點(diǎn)，即“等差×等比”型。

解決方法：展示并敘述“錯(cuò)位相減法”的具體操作步驟，具體如下：

由此歸納“錯(cuò)位相減法”核心要領(lǐng)：乘公比，錯(cuò)位，相減。設(shè)計(jì)意圖：整個(gè)過(guò)程的完整展示，幫助學(xué)生建立一個(gè)清晰的計(jì)算步驟，以此學(xué)會(huì)解決此類(lèi)型的數(shù)列求和問(wèn)題，主要體現(xiàn)設(shè)計(jì)的實(shí)用性。

三、當(dāng)堂練習(xí)

設(shè)計(jì)意圖：為了鞏固復(fù)習(xí)錯(cuò)位相減法，讓學(xué)生對(duì)不同“長(zhǎng)相”，但都屬于“等差×等比”型題目能熟悉，從而確信并有意識(shí)強(qiáng)化學(xué)習(xí)。

四、歸納小結(jié)

1、首先進(jìn)行使用“錯(cuò)位相減法”時(shí)易出錯(cuò)的4點(diǎn)進(jìn)行歸納強(qiáng)調(diào)。

2、再整體上對(duì)此段的學(xué)習(xí)進(jìn)行小結(jié)，再次提升

設(shè)計(jì)意圖：有學(xué)習(xí)必有總結(jié)。任何一種解題方法都有其使用條件、適用范圍，以及易錯(cuò)點(diǎn)等等。學(xué)生通過(guò)學(xué)習(xí)，也能自覺(jué)感知并總結(jié)，由此深化數(shù)學(xué)解題方法的學(xué)習(xí)。

五、作業(yè)布置

設(shè)計(jì)意圖：課下練習(xí)，進(jìn)一步鞏固掌握“錯(cuò)位相減法”

第三篇：常規(guī)數(shù)列求和之錯(cuò)位相減法教案

常規(guī)數(shù)列求和之錯(cuò)位相減法

例

1、已知數(shù)列{an}前n項(xiàng)和為Sn，且a1＝1，an＋1＝2Sn．

(1)證明數(shù)列{Sn}是等比數(shù)列；

(2)求數(shù)列{an}的通項(xiàng)公式；

(3)求數(shù)列{n·an}的前n項(xiàng)和Tn．

例

2、已知數(shù)列{an}滿(mǎn)足Sn＝2an＋3n－12．

(1)證明數(shù)列{an－3}是等比數(shù)列；

(2)求數(shù)列{an}的通項(xiàng)公式；

(3)求數(shù)列{n·an}的前n項(xiàng)和Tn．

第四篇：高中數(shù)學(xué)常用方法總結(jié)——如何將錯(cuò)位相減法所得結(jié)論的公式化

錯(cuò)位相減法的簡(jiǎn)潔結(jié)論----公式化

錯(cuò)位相減法是推導(dǎo)等比數(shù)列前n項(xiàng)和公式的最簡(jiǎn)潔的方法之一,錯(cuò)位相減法還可以推廣到求數(shù)列{an?bn}的前項(xiàng)和,其中{an}是等差數(shù)列,公差為不為0,{bn}是等比數(shù)列,公比不為1.例:數(shù)列{an}的前n項(xiàng)和為Sn,a1?1,an?1?2Sn,求數(shù)列{nan}的前n項(xiàng)和Tn.分析:當(dāng)n?1時(shí),由an?1?2Sn得an?2Sn?1,兩式相減得an?1?3an,所以數(shù)列{an}從第二項(xiàng)開(kāi)始成等比,又a2?2S1?2a1?2,所以an?2?3n?2,因?yàn)閍1?1不滿(mǎn)足此式,所以nan???1,n?1?2n?3n?2,n?1.Tn?1?4?30?6?31?8?32????2(n?2)?3n?4?2(n?1)?3n?3?2n?3n?23Tn?3?4?31?6?32?8?33???????2(n?2)?3n?3?2(n?1)?3n?2?2n?3n?1兩式相減: ?2Tn?2?2(31?32?33???3n?3?3n?2)?2n?3n?1

3?3n?1?2?2??2n?3n?1?(?2n?1)?3n?1?1

1?3所以: Tn?(n?)?3n?1?.又因?yàn)門(mén)1?a1?1也滿(mǎn)足上式,所以: Tn?(n?)?3n?1?,n?N?

錯(cuò)位相減法程序化的步驟讓學(xué)生容易掌握和理解,但因計(jì)算量較大,學(xué)生常會(huì)因?yàn)橛?jì)算的原因?qū)е鲁鲥e(cuò).如果錯(cuò)位相減法可以簡(jiǎn)化為一種形式簡(jiǎn)單的結(jié)論,我們又何樂(lè)而不為呢? 筆者在教學(xué)過(guò)程中發(fā)現(xiàn),通項(xiàng)形如an?(xn?y)?qn,(q?1,q?0,x?0)的數(shù)列,其前n項(xiàng)和必定形如Sn?(An?B)?qn?1?C,這個(gè)結(jié)論可以由錯(cuò)位相減法證明,就留給讀者去證了,我簡(jiǎn)單從另外一個(gè)方法求得A,B, 因?yàn)? Sn?Sn?1?[(An?B)?qn?1?C]?[(An?A?B)?qn?C]

12121212?[A(q?1)n?B(q?1)?A]?qn?(xn?y)?qn

對(duì)比系數(shù)得: A?xy?A,B?,此時(shí)C可以由S1?a1求得.q?1q?1上例中,設(shè)bn?nan,則當(dāng)n?1時(shí),b1?1,當(dāng)n?1時(shí),bn?2n?3n?2.根據(jù)公式有: A?20?111?1,B???,所以Tn?(n?)?3n?1?C, 3?13?1221212又因?yàn)? T1??C?b1?1?C? 所以:Tn?(n?)?3n?1?,n?N?

解題思路和過(guò)程固然是重要的,但簡(jiǎn)潔的結(jié)論也很重要,它可以使我們少走彎路,少做重復(fù)的工作.單方面去強(qiáng)調(diào)過(guò)程或結(jié)論都是不可取的,在教學(xué)中,應(yīng)讓學(xué)生掌握好錯(cuò)位相減法的思想精髓上,再引出這個(gè)結(jié)論,才不會(huì)顧此失彼.從例題中可以看出,即使所求數(shù)列的首項(xiàng)不滿(mǎn)足(xn?y)?qn,也不會(huì)影響使用公式求和,但若所求數(shù)列前k項(xiàng)不滿(mǎn)足(xn?y)?qn,則求和結(jié)果必須加上條件n?k,此時(shí)公式中的C值該由前k項(xiàng)和求出,當(dāng)n?k時(shí),前n

1212項(xiàng)和須看具體情形而定.

第五篇：畢業(yè)論文素材

九江職業(yè)技術(shù)學(xué)院

Jiujiang Vocational & Technical College

學(xué)生姓名：專(zhuān)業(yè)班級(jí)：論文名稱(chēng)：指導(dǎo)教師：

羅

林 計(jì)算機(jī)1201班 教材管理系統(tǒng)

于

芬

摘要

教材管理系統(tǒng)是專(zhuān)為中小學(xué)校便于管理建立的管理應(yīng)用系統(tǒng)。是面向一種異地分布的學(xué)校教材管理系統(tǒng),支持供需鏈管理的計(jì)劃和控制系統(tǒng)，系統(tǒng)還包括訂單查詢(xún)和管理以及各種綜合查詢(xún)等管理功能。

【關(guān)鍵詞】 進(jìn)庫(kù) 教材領(lǐng)取 出庫(kù) Delphi 7.0 教材管理系統(tǒng)

引言

隨著當(dāng)今教育制度的改革，辦事的快捷與高效成了急需解決的問(wèn)題，而高校教材管理是高校教學(xué)管理工作中的一項(xiàng)重要任務(wù)，教材管理水平和工作效率的高低是反映高校教學(xué)和科研管理水平的重要標(biāo)志。

隨著辦學(xué)規(guī)模的不斷擴(kuò)大，教材種類(lèi)和數(shù)量也急劇上升，教材管理工作量之大，任務(wù)繁重，給教材購(gòu)買(mǎi)和管理部門(mén)人員帶來(lái)很多困難，差錯(cuò)率高，到書(shū)率低，對(duì)學(xué)校教學(xué)和科研工作產(chǎn)生較大的影響。

為了實(shí)現(xiàn)教材管理工作現(xiàn)代化、系統(tǒng)化、和規(guī)范化，管理水平上一個(gè)臺(tái)階，因此等待著一套使其更加便利的系統(tǒng)出現(xiàn)。

本系統(tǒng)對(duì)高校教材購(gòu)銷(xiāo)業(yè)務(wù)的具體情況和需求進(jìn)行設(shè)計(jì)開(kāi)發(fā)。本系統(tǒng)清晰明了地將各個(gè)管理細(xì)節(jié)綜合起來(lái)，將分散的操作流程合并，其實(shí)用、簡(jiǎn)潔、方便的操作方法與界面能讓非計(jì)算機(jī)專(zhuān)業(yè)的人員輕松上手。同時(shí)又便于數(shù)據(jù)庫(kù)管理人員對(duì)數(shù)據(jù)庫(kù)進(jìn)行修改，節(jié)省不少人力、物力。系統(tǒng)分析 需求分析 開(kāi)發(fā)背景分析

每學(xué)期工作人員根據(jù)各系所填課目信息和教材信息，以及教務(wù)處的選課信息，以班級(jí)為單位發(fā)放每班的下學(xué)期的教材使用信息，由各系將學(xué)生所需書(shū)目統(tǒng)計(jì)后上交圖教材科，教材科工作人員按書(shū)目，出版社等信息，做好統(tǒng)計(jì)依次向出版社發(fā)放訂購(gòu)書(shū)目信息。當(dāng)收到教材和課本單價(jià)后，做好入庫(kù)的統(tǒng)計(jì)，開(kāi)學(xué)后，發(fā)放班級(jí)收費(fèi)信息，有各系向?qū)W生收費(fèi)，并上交教材科工作人員，教材科同時(shí)做好與出版社的款目的核對(duì)與結(jié)帳。

? 這是工作的大致內(nèi)容，但是也出現(xiàn)許多的例外。

? 當(dāng)訂購(gòu)教材出版社不在印制的時(shí)候，由出版社將此信息發(fā)還教材科，教材科依次向各系教師征求教材修改信息，再尋找其他出版社。? 班委統(tǒng)計(jì)數(shù)目與領(lǐng)書(shū)時(shí)的書(shū)目不合，原因部分學(xué)生在中途取消書(shū)目的訂購(gòu)，教材科處理辦法：同意修改書(shū)的數(shù)目，但是余下的書(shū)作為零售，或轉(zhuǎn)入下一年的定書(shū)中。

? 班級(jí)領(lǐng)書(shū)結(jié)束后，有部分學(xué)生需要退書(shū)，買(mǎi)書(shū)，原因：各系工作失誤多定或少定，以及個(gè)人要求的改變，教材科處理方法：同意買(mǎi)書(shū)或退書(shū)，買(mǎi)書(shū)以零售價(jià)，退書(shū)以進(jìn)價(jià),同時(shí)開(kāi)具發(fā)票。

功能分析

通過(guò)調(diào)查,要求系統(tǒng)需要有以下功能：

? 要有良好的人機(jī)界面，給人一種美觀上的享受。? 支持多人操作，要求有較好的權(quán)限分配功能。? 在教材進(jìn)庫(kù)和領(lǐng)數(shù)(出庫(kù))，要求詳細(xì)明確。? 為了方便用戶(hù)查詢(xún)，要求支持多條件查詢(xún)。

? 明確的了解班級(jí)信息以及班級(jí)領(lǐng)書(shū),同時(shí)也可以查詢(xún)教師領(lǐng)書(shū)的情況。? 支持多種報(bào)表打印。數(shù)據(jù)分析

一．?dāng)?shù)據(jù)主要有以下： 1．靜態(tài)數(shù)據(jù) 1）班級(jí)具體信息 2）班級(jí)繳費(fèi)情況 3）教材信息 4）退回書(shū)費(fèi)信息 5）單位（院系）信息 6）教師領(lǐng)書(shū)信息 7）學(xué)生領(lǐng)書(shū) 8）書(shū)費(fèi)信息 2．動(dòng)態(tài)數(shù)據(jù) 1）管理員密碼 2）書(shū)本單價(jià) 3）書(shū)本庫(kù)存 4）操作員密碼 二．?dāng)?shù)據(jù)庫(kù)描述如下：

1．本系統(tǒng)主要用的數(shù)據(jù)庫(kù)是SQL Server 2000。

2．本系統(tǒng)主要用到的數(shù)據(jù)表有：ym（用戶(hù)信息表）、banji（班級(jí)信息表）、caozuoyuan（操作員信息表）、jiaocai（教材信息表）、danwei（單位信息表）、shufei（書(shū)費(fèi)信息表）、tuihuishufei（退回書(shū)費(fèi)信息表）、xueshenglingshu（學(xué)生領(lǐng)書(shū)信息表）、xueshengshufei（學(xué)生書(shū)費(fèi)信息表）、jiaoshils（教師領(lǐng)書(shū)信息表）、jiaocairuku（教材入庫(kù)信息表）。

3．?dāng)?shù)據(jù)關(guān)系表框架如下：

關(guān)系表1

關(guān)系表2 可行性分析 經(jīng)濟(jì)可行性分析 首先開(kāi)發(fā)一個(gè)教材管理系統(tǒng)它是都具有市場(chǎng)，市場(chǎng)的經(jīng)濟(jì)潛力有多大，開(kāi)發(fā)過(guò)程中所需要的人力、物力、財(cái)力。同時(shí)在開(kāi)發(fā)任何一個(gè)基于計(jì)算機(jī)的系統(tǒng)，都會(huì)受到時(shí)間和資源上的限制。因此，在接受任何一個(gè)項(xiàng)目開(kāi)發(fā)任務(wù)之前，必須根據(jù)客戶(hù)可能提供的時(shí)間和資源條件進(jìn)行可行性分析，以減少項(xiàng)目開(kāi)發(fā)風(fēng)險(xiǎn)，避免人力、物力和財(cái)力的浪費(fèi)。

技術(shù)和具體實(shí)現(xiàn)中采集的關(guān)鍵技術(shù)分析

本系統(tǒng)數(shù)據(jù)庫(kù)采用目前比較流行的Microsoft SQL Server，該數(shù)據(jù)庫(kù)系統(tǒng)在安全性、準(zhǔn)確性、運(yùn)行速度方面有絕對(duì)的優(yōu)勢(shì)，并且處理數(shù)據(jù)庫(kù)量大，效率高；開(kāi)發(fā)工具采用Delphi7，Delphi7是目前應(yīng)用最廣泛的數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)工具，可以快速開(kāi)發(fā)Windows應(yīng)用程序。總體設(shè)計(jì) 項(xiàng)目規(guī)劃

教材管理系統(tǒng)是一個(gè)典型的數(shù)據(jù)庫(kù)應(yīng)用程序，由登錄模塊、主界面、系統(tǒng)管理模塊、書(shū)費(fèi)管理模塊、出入庫(kù)模塊、綜合查詢(xún)、幫助。特規(guī)劃功能模塊如下：

? 系統(tǒng)管理模塊

系統(tǒng)管理模塊的主要實(shí)現(xiàn)操作員管理、密碼修改、班級(jí)管理、單位信息和用戶(hù)管理等管理。

? 書(shū)費(fèi)管理模塊

書(shū)費(fèi)管理模塊主要管理學(xué)校繳納書(shū)費(fèi)和退回書(shū)費(fèi)管理。? 出入庫(kù)管理模塊

出入庫(kù)管理模塊主要管理教材入庫(kù)、學(xué)生領(lǐng)書(shū)、教師領(lǐng)書(shū)等功能。? 綜合查詢(xún)管理模塊

總和管理模塊主要實(shí)現(xiàn)庫(kù)存貨品瀏覽、書(shū)費(fèi)的查詢(xún)。功能框架

圖1 功能框圖

系統(tǒng)設(shè)計(jì) 設(shè)計(jì)目標(biāo)

根據(jù)企業(yè)的需求和進(jìn)銷(xiāo)存管理的特點(diǎn)，該系統(tǒng)實(shí)施后，應(yīng)達(dá)到以下目標(biāo)： ? 界面美觀友好、信息查詢(xún)靈活、方便、快捷、準(zhǔn)確。? 強(qiáng)大的庫(kù)存預(yù)警功能，在意外中將損失降到最低。? 提高工作效率，降低成本。? 往來(lái)賬目詳細(xì)瀏覽。

? 對(duì)用戶(hù)輸入的數(shù)據(jù)進(jìn)行過(guò)濾，當(dāng)輸入有誤時(shí)提示用戶(hù)。? 數(shù)據(jù)保密性強(qiáng)，用戶(hù)對(duì)應(yīng)不同的操作級(jí)別。

? 系統(tǒng)最大限度地實(shí)現(xiàn)了易安裝性、易維護(hù)性和易操作性。? 系統(tǒng)運(yùn)行穩(wěn)定、安全可靠。開(kāi)發(fā)及運(yùn)行環(huán)境

系統(tǒng)開(kāi)發(fā)平臺(tái)：Delphi7.0。

數(shù)據(jù)庫(kù)管理系統(tǒng)軟件：SQL Server 2000。運(yùn)行平臺(tái)：Windowsxp/ Windows2000。分辨率：最佳效果1024*768。邏輯結(jié)構(gòu)設(shè)計(jì)

本系統(tǒng)數(shù)據(jù)庫(kù)采用SQL Server 2000數(shù)據(jù)庫(kù)，數(shù)據(jù)庫(kù)名稱(chēng)為“教材管理系統(tǒng)”。數(shù)據(jù)庫(kù)教材管理系統(tǒng)中包含11個(gè)表。數(shù)據(jù)庫(kù)中的數(shù)據(jù)表如下：

1．操作員信息表（cuozuoyuan）

2．班級(jí)信息表（banji）

3．單位信息表（danwei）

4．教材信息表（jiaocai）

5．教師領(lǐng)書(shū)信息表（jiaoshils）

6．書(shū)費(fèi)信息表（shufei）

7．退回書(shū)費(fèi)信息（tuihuishufei）

8．學(xué)生領(lǐng)書(shū)信息表（xueshenlingshu）

9．學(xué)生書(shū)費(fèi)信息表（xueshengshufei）

10．用戶(hù)信息表（ym）

11．教材入庫(kù)信息表（jiaocairuku）

主要功能模塊設(shè)計(jì)

主窗口目標(biāo)

主窗體是程序的控制中心，其他模塊都是通過(guò)主窗體來(lái)調(diào)用，所以主窗體的界面要設(shè)計(jì)的美觀易操作。教材管理管理系統(tǒng)主窗體運(yùn)行結(jié)果如圖2所示：

圖2 主窗體運(yùn)行的結(jié)果

基礎(chǔ)窗體創(chuàng)建

創(chuàng)建基礎(chǔ)窗體主要為了提高開(kāi)發(fā)速度和代碼的利用率，從基礎(chǔ)窗體繼承的子窗體具有基礎(chǔ)窗體的全部功能?；A(chǔ)窗體如圖3所示：

圖3 基礎(chǔ)窗體

基礎(chǔ)窗體設(shè)計(jì)步驟

添加一個(gè)新窗體，命名為“F_base”，設(shè)置其BorderStyle屬性為“bsDialog”；KeyPreview屬性為“True”。

相關(guān)程序代碼如下： 在窗體的OnKeyPress事件處理過(guò)程中設(shè)置〈Enter〉鍵代替〈Tab〉鍵。代碼如下：

procedure TF_base.FormKeyPress(Sender: TObject;var Key: Char);begin

if Key=#13 then

perform(WM_NEXTDLGCTL,0,0);end;系統(tǒng)管理模塊設(shè)計(jì)

系統(tǒng)管理模塊的主要實(shí)現(xiàn)操作員管理、密碼修改、班級(jí)管理、單位信息和用戶(hù)管理等管理。操作員管理

當(dāng)你單擊“系統(tǒng)管理”菜單中的“操作員管理”時(shí)，就會(huì)出現(xiàn)“操作員管理”窗體。通過(guò)本窗體可以進(jìn)行的新增、刪除、修改等操作，操作管理窗體如圖4所示：

圖4操作員管理窗體

相關(guān)程序代碼如下：

procedure Tf_czy.Button2Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;//顯示窗體

f_czy.hide;//隱蔽窗體

end;end;procedure Tf_czy.Button1Click(Sender: TObject);begin

case radiogroup1.ItemIndex of

2:

if application.MessageBox('您確認(rèn)要?jiǎng)h除該信息嗎？','刪除確認(rèn)',mb_okcancel)=idok then

//提示是否要?jiǎng)h除該信息

begin

t6.Delete;

edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

edit4.Text :='';

edit5.Text :='';

end;//如果刪除了該信息,文本框內(nèi)的內(nèi)容清空

1:

begin

t6.Edit;

t6['操作員']:=edit1.Text;

t6['密碼']:=edit2.Text;

t6['所屬部門(mén)']:=edit3.Text;

t6['操作員信息']:=edit4.Text;

t6['日期']:=edit5.Text;

t6.Post;

end;//添加信息,之后更新

0:

begin

t6.Append;

t6['操作員']:=edit1.Text;

t6['密碼']:=edit2.Text;

t6['所屬部門(mén)']:=edit3.Text;

t6['操作員信息']:=edit4.Text;

t6['日期']:=edit5.Text;

t6.Post;

edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

edit4.Text :='';

edit5.Text :='';

end;end;end;procedure Tf_czy.FormCreate(Sender: TObject);begin

t6.Open;//打開(kāi)表6 end;procedure Tf_czy.DBGrid1CellClick(Column: TColumn);begin

edit1.Text:=DBGrid1.Fields[0].Value;

edit2.Text:=DBGrid1.Fields[1].Value;

edit3.Text:=DBGrid1.Fields[2].Value;

edit4.Text:=DBGrid1.Fields[3].Value;

edit5.Text:=DBGrid1.Fields[4].Value;end;end.班級(jí)管理

當(dāng)你單擊“系統(tǒng)管理”菜單中的“班級(jí)管理”時(shí)，就會(huì)出現(xiàn)“班級(jí)管理”窗體。通過(guò)本窗體用戶(hù)可以進(jìn)行班級(jí)的新增、刪除、修改等操作，,班級(jí)管理如圖5所示：

圖5班級(jí)管理系統(tǒng)窗體

相關(guān)程序代碼如下：

procedure Tf_bj.Button4Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then

begin

f_xitong.show;//顯示窗體

f_bj.Hide;//隱蔽窗體

end;end;procedure Tf_bj.FormCreate(Sender: TObject);begin

t2.Open;//打開(kāi)表2

edit1.Text :=t2['班級(jí)名'];

edit2.Text :=t2['入學(xué)時(shí)間'];

edit3.Text :=t2['班長(zhǎng)'];

edit4.Text :=t2['班主任'];

edit5.Text :=t2['班級(jí)人數(shù)'];

edit6.Text :=t2['所學(xué)專(zhuān)業(yè)'];

edit7.Text :=t2['所在院系'];

edit8.text:=t2['班長(zhǎng)聯(lián)系電話(huà)'];

edit9.text:=t2['班主任聯(lián)系電話(huà)'];end;//在文本框中顯示數(shù)據(jù)表中的內(nèi)容

procedure Tf_bj.DBGrid1CellClick(Column: TColumn);begin

edit1.Text:=DBGrid1.Fields[0].Value;

edit2.Text:=DBGrid1.Fields[1].Value;

edit3.Text:=DBGrid1.Fields[3].Value;

edit4.Text:=DBGrid1.Fields[5].Value;

edit5.Text:=DBGrid1.Fields[11].Value;

edit6.Text:=DBGrid1.Fields[10].Value;

edit7.Text:=DBGrid1.Fields[2].Value;

edit8.Text:=DBGrid1.Fields[4].Value;

edit9.Text:=DBGrid1.Fields[6].Value;end;procedure Tf_bj.Button1Click(Sender: TObject);begin

t2.Append;

t2['班級(jí)名']:=edit1.Text;

t2['入學(xué)時(shí)間']:=edit2.Text;

t2['班長(zhǎng)']:=edit3.Text;

t2['班主任']:=edit4.Text;

t2['班級(jí)人數(shù)']:=edit5.Text;

t2['所學(xué)專(zhuān)業(yè)']:=edit6.Text;

t2['所在院系']:=edit7.Text;

t2['班長(zhǎng)聯(lián)系電話(huà)']:=edit8.Text;

t2['班主任聯(lián)系電話(huà)']:=edit9.Text;

t2.Post;//添加信息

edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

edit4.Text :='';

edit5.Text :='';

edit6.Text :='';

edit7.Text :='';

edit8.Text :='';

edit9.Text :='';end;procedure Tf_bj.Button2Click(Sender: TObject);begin

if application.MessageBox('您確認(rèn)好刪除該信息嗎？','確認(rèn)刪除',mb_okcancel)=IDOK then

begin

t2.Delete;

edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

edit4.Text :='';

edit5.Text :='';

edit6.Text :='';

edit7.Text :='';

edit8.Text :='';

edit9.Text :='';

t2.First;

end;//刪除信息 end;procedure Tf_bj.Button3Click(Sender: TObject);begin

t2.Edit;

t2['班級(jí)名']:=edit1.Text;

t2['入學(xué)時(shí)間']:=edit2.Text;

t2['班長(zhǎng)']:=edit3.Text;

t2['班主任']:=edit4.Text;

t2['人數(shù)']:=edit5.Text;

t2['所學(xué)專(zhuān)業(yè)']:=edit6.Text;

t2['所在院系']:=edit7.Text;

t2['班長(zhǎng)聯(lián)系電話(huà)']:=edit8.Text;

t2['班主任聯(lián)系電話(huà)']:=edit9.Text;

t2.Post;//修改信息

self.DBGrid1.Refresh;end;end.密碼修改和單位信息

當(dāng)單擊“系統(tǒng)管理”菜單中的“密碼修改”或者“單位信息”時(shí)，就會(huì)出現(xiàn)“密碼修改”或者是“單位信息”窗體。通過(guò)本窗體用戶(hù)可以進(jìn)行對(duì)密碼的修改，單位信息查看、修改、刪除等。密碼修改和單位信息如圖6和7所示：

圖6 密碼修改窗體

圖7 單位信息窗體

密碼修改窗體相關(guān)程序代碼如下: procedure Tf_xiugai.Button1Click(Sender: TObject);begin

try

t.Filter :='用戶(hù)名='''+edit1.Text +'''';

t.Filtered:=true;

t.Open;

except

application.MessageBox('用戶(hù)名不對(duì)','請(qǐng)重新輸入',mb_ok);

application.Terminate;

end;

if t.RecordCount =1 then

begin

if t['密碼']=edit2.Text then

begin

if edit3.Text =edit4.Text then

begin

t.Edit;

t['密碼']:=edit3.Text;

t.Post;

end

else

application.MessageBox('兩次密碼輸入不一致,請(qǐng)檢查','提示信息',mb_ok);

end

else

application.MessageBox('密碼錯(cuò)誤','請(qǐng)重新輸入',mb_ok);

end;

application.MessageBox('密碼修改成功','恭喜你呀!',mb_ok);

edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

edit4.Text :='';end;procedure Tf_xiugai.Button3Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;

f_xiugai.Hide;

end;end;procedure Tf_xiugai.Button2Click(Sender: TObject);begin edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

edit4.Text :='';

edit1.SetFocus;end;end.單位信息窗體相關(guān)程序代碼如下：

procedure Tf_dx.Button2Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then

begin

f_xitong.show;

f_dx.Hide;

end;end;procedure Tf_dx.FormCreate(Sender: TObject);begin

t3.Open;

edit1.Text :=t3['單位名'];

edit2.Text :=t3['負(fù)責(zé)人'];

edit3.text:=t3['聯(lián)系電話(huà)'];end;procedure Tf_dx.DBGrid1CellClick(Column: TColumn);begin

edit1.Text:=DBGrid1.Fields[0].Value;

edit2.Text:=DBGrid1.Fields[1].Value;

edit3.Text:=DBGrid1.Fields[2].Value;end;procedure Tf_dx.Button1Click(Sender: TObject);begin

case radiogroup1.ItemIndex of

2:

if application.MessageBox('您確認(rèn)要?jiǎng)h除該信息嗎？','刪除確認(rèn)',mb_okcancel)=idok then

begin

t3.Delete;

edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

end;

1:

begin

t3.Edit;

t3['單位名']:=edit1.Text;

t3['負(fù)責(zé)人']:=edit2.Text;

t3['聯(lián)系電話(huà)']:=edit3.Text;

t3.Post;

end;

0:

begin

t3.Append;

t3['單位名']:=edit1.Text;

t3['負(fù)責(zé)人']:=edit2.Text;

t3['聯(lián)系電話(huà)']:=edit3.Text;

t3.Post;

edit1.Text :='';

edit2.Text :='';

edit3.Text :='';

end;end;end;end.書(shū)費(fèi)管理模塊設(shè)計(jì)

書(shū)費(fèi)管理模塊主要管理學(xué)校繳納書(shū)費(fèi)和退回書(shū)費(fèi)管理。繳納書(shū)費(fèi)

可以查詢(xún)、打印各班級(jí)繳納書(shū)費(fèi)情況和操作。繳納書(shū)費(fèi)如圖8所示：

圖8繳納書(shū)費(fèi)窗體 繳納書(shū)費(fèi)相關(guān)程序代碼如下：

procedure Tf_jf.Button2Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;

f_jf.Hide;

end;end;procedure Tf_jf.FormCreate(Sender: TObject);begin

t4.Open;

while not t4.Eof do

begin

combobox1.AddItem(t4['班級(jí)名'],nil);

t4.Next;

end;end;procedure Tf_jf.Button1Click(Sender: TObject);begin

t4.Filter :='班級(jí)名='''+combobox1.Text+'''';

t4.Filtered :=true;

edit1.Text := t4['班級(jí)人數(shù)'];

edit2.Text := t4['本期費(fèi)用'];

edit3.Text := t4['說(shuō)明'];

edit4.Text := t4['上期費(fèi)用'];

edit5.Text := t4['操作員'];

edit6.Text := t4['經(jīng)辦人'];end;end.退回書(shū)費(fèi)

可以查詢(xún)、打印各班級(jí)退回書(shū)情況和操作。退回書(shū)費(fèi)如圖9所示：

圖9 退回書(shū)費(fèi)窗體 退回書(shū)費(fèi)相關(guān)代碼如下：

procedure Tf_tf.Button3Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;//顯示窗體

f_tf.hide;// 隱蔽窗體

end;end;procedure Tf_tf.FormCreate(Sender: TObject);begin

t5.Open;

while not t5.Eof do

begin

combobox1.AddItem(t5['班級(jí)名'],nil);

t5.Next;

end;end;procedure Tf_tf.Button1Click(Sender: TObject);begin

t5.Filter :='班級(jí)名='''+combobox1.Text+'''';

t5.Filtered :=true;

edit1.Text := t5['班級(jí)人數(shù)'];

edit2.Text := t5['總書(shū)記費(fèi)'];

edit3.Text := t5['退回書(shū)費(fèi)'];

edit4.Text := t5['經(jīng)辦人'];

edit5.Text := t5['說(shuō)明'];end;procedure Tf_tf.Button2Click(Sender: TObject);begin f_tf.RvProject1.ProjectFile:=ExtractFilePath(Application.ExeName)+'printproject1.rav';

self.RvProject1.Execute;

end;end.出入庫(kù)管理模塊設(shè)計(jì)

出入庫(kù)管理模塊主要管理教材入庫(kù)、學(xué)生領(lǐng)書(shū)、教師領(lǐng)書(shū)等功能。教材入庫(kù)

當(dāng)你單擊“系統(tǒng)管理”菜單中的“教材入庫(kù)”時(shí)，就會(huì)出現(xiàn)“教材入庫(kù)”窗體。通過(guò)本窗體可以進(jìn)行的查詢(xún)、打印等操作，教材入庫(kù)如圖10所示：

圖10教材入庫(kù)窗體

相關(guān)程序代碼如下：

procedure Tf_rk.Button2Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;

f_rk.Hide;

end;end;procedure Tf_rk.FormCreate(Sender: TObject);begin

t7.Open;while not t7.Eof do

begin

combobox1.AddItem(t7['訂書(shū)單位'],nil);

t7.Next;

end;end;procedure Tf_rk.Button1Click(Sender: TObject);begin

t7.Filter :='訂書(shū)單位='''+combobox1.Text +'''';

t7.Filtered :=true;

t7.Open;

edit1.Text :=t7['教材名'];

edit2.Text :=t7['獲獎(jiǎng)情況'];

edit3.Text :=t7['出版年月'];

edit4.Text :=t7['經(jīng)辦人'];

edit5.Text :=t7['上期數(shù)量'];

edit6.Text :=t7['獲獎(jiǎng)情況'];

edit7.Text :=t7['入庫(kù)時(shí)間'];

edit8.Text :=t7['出版社'];

edit9.Text :=t7['教材單價(jià)'];

edit10.Text :=t7['操作員'];

edit11.Text :=t7['本期數(shù)量'];

edit12.Text :=t7['使用說(shuō)明'];

edit13.Text :=t7['說(shuō)明'];end;procedure Tf_rk.Button3Click(Sender: TObject);begin f_rk.RvProject1.ProjectFile :=ExtractFilePath(Application.ExeName)+'printproject2.rav';

self.RvProject1.Execute;end;end.學(xué)生領(lǐng)書(shū)和教師領(lǐng)書(shū)

查詢(xún)各班學(xué)生和教師的領(lǐng)書(shū)情況。學(xué)生領(lǐng)書(shū)和教師領(lǐng)書(shū)如圖11和12所示：

圖11學(xué)生領(lǐng)書(shū)窗體

圖12教師領(lǐng)書(shū)窗體

學(xué)生領(lǐng)書(shū)相關(guān)程序代碼如下：

procedure Tf_lshu.Button2Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;

f_lshu.hide;

end;end;procedure Tf_lshu.FormCreate(Sender: TObject);begin

t8.Open;

while not t8.Eof do

begin

combobox1.AddItem(t8['班級(jí)名'],nil);

t8.Next;

end;end;procedure Tf_lshu.Button1Click(Sender: TObject);begin

t8.Filter :='班級(jí)名='''+combobox1.text+'''';

t8.Filtered :=true;

t8.open;

edit1.Text :=t8['總書(shū)記費(fèi)'];

edit2.Text :=t8['教材名'];

edit3.Text :=t8['班級(jí)人數(shù)'];

edit4.Text :=t8['所在院系'];

edit5.Text :=t8['出版社'];

edit6.Text :=t8['作者'];

edit7.Text :=t8['領(lǐng)書(shū)數(shù)量'];

edit8.Text :=t8['書(shū)費(fèi)'];

edit9.Text :=t8['庫(kù)存數(shù)'];

edit10.Text :=t8['單價(jià)'];

edit11.Text :=t8['經(jīng)辦人'];end;procedure Tf_lshu.DBGrid1CellClick(Column: TColumn);begin

combobox1.Text :=DBGrid1.Fields[0].Value;

edit1.Text:=DBGrid1.Fields[4].Value;

edit2.Text:=DBGrid1.Fields[1].Value;

edit3.Text:=DBGrid1.Fields[10].Value;

edit4.Text:=DBGrid1.Fields[9].Value;

edit5.Text:=DBGrid1.Fields[3].Value;

edit6.Text:=DBGrid1.Fields[2].Value;

edit7.Text:=DBGrid1.Fields[8].Value;

edit8.Text:=DBGrid1.Fields[5].Value;

edit9.Text:=DBGrid1.Fields[7].Value;

edit10.Text:=DBGrid1.Fields[6].Value;

edit11.Text:=DBGrid1.Fields[11].Value;end;end.教師領(lǐng)書(shū)相關(guān)程序代碼如下：

procedure Tf_jshu.Button2Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;

f_jshu.Hide;

end;end;procedure Tf_jshu.FormCreate(Sender: TObject);var i:integer;f:boolean;begin

t0.Open;

t9.Open;

while not t9.Eof do

begin

f:=true;

for i:=1 to combobox1.Items.Count-1 do

if combobox1.Items[i]=t9['教師名'] then

f:=false;

if f then

combobox1.AddItem(t9['教師名'],nil);

t9.Next;

end;end;procedure Tf_jshu.ComboBox1Change(Sender: TObject);begin

t9.Filter :='教師名='''+combobox1.text+'''';

t9.Filtered :=true;

t9.Open;

combobox1.Text :=DBGrid2.Fields[0].Value;end;end.綜合查詢(xún)模塊設(shè)計(jì)

綜合查詢(xún)管理模塊主要實(shí)現(xiàn)庫(kù)存貨品瀏覽、書(shū)費(fèi)的查詢(xún)。書(shū)費(fèi)查詢(xún)

可以查詢(xún)各班級(jí)書(shū)費(fèi)等操作。書(shū)費(fèi)查詢(xún)?nèi)鐖D13所示：

圖13 書(shū)費(fèi)查詢(xún)窗體 書(shū)費(fèi)查詢(xún)相關(guān)程序代碼如下：

procedure Tf_cxsf.Button1Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then begin

f_xitong.show;

f_cxsf.Hide;

end;end;procedure Tf_cxsf.FormCreate(Sender: TObject);begin

t10.Open;

while not t10.Eof do

begin

combobox1.AddItem(t10['班級(jí)名'],nil);

t10.Next;

end;end;procedure Tf_cxsf.ComboBox1Change(Sender: TObject);begin

t10.Filter :='班級(jí)名='''+combobox1.text+'''';

t10.Filtered :=true;

t10.Open;

combobox1.Text :=DBGrid1.Fields[0].Value;end;end.庫(kù)存查詢(xún)

可以查詢(xún)書(shū)本庫(kù)存的存貨和打印等操作。庫(kù)存查詢(xún)?nèi)鐖D14所示：

圖14庫(kù)存查詢(xún)窗體

庫(kù)存查詢(xún)相關(guān)程序代碼如下：

procedure Tf_cxk.Button1Click(Sender: TObject);begin if application.MessageBox('您確認(rèn)要退出嗎？','刪除退出',mb_okcancel)=idok then

begin

f_xitong.show;

f_cxk.Hide;

end;end;

procedure Tf_cxk.ComboBox1Change(Sender: TObject);begin

case radiogroup1.ItemIndex of

0:

begin

t11.Filter :='教材名='''+combobox1.text+'''';

t11.Filtered :=true;

t11.Open;

end;

1:

begin

t11.Filter :='出版社='''+combobox1.text+'''';

t11.Filtered :=true;

t11.Open;

end;

2:

begin

t11.Filter :='入庫(kù)時(shí)間='''+combobox1.text+'''';

t11.Filtered :=true;

t11.Open;

end;

3:

begin

t11.Filter :='訂書(shū)單位='''+combobox1.text+'''';

t11.Filtered :=true;

t11.Open;

end;end;end;procedure Tf_cxk.RadioGroup1Click(Sender: TObject);var

i:integer;

f:boolean;begin

case radiogroup1.ItemIndex of

0:

begin

combobox1.Items.Clear;

t11.First;

while not t11.Eof do

begin

f:=true;

for i:=0 to combobox1.Items.Count-1 do

if combobox1.Items[i]=trim(t11['教材名'])then //按教材名查詢(xún)

f:=false;

if f then

combobox1.AddItem(t11['教材名'],nil);

t11.Next;

end;

end;

1:

begin

combobox1.Items.Clear;

t11.First;

while not t11.Eof do

begin

f:=true;

for i:=0 to combobox1.Items.Count-1 do

if combobox1.Items[i]=trim(t11['出版社'])then //按出版社查詢(xún)

f:=false;

if f then

combobox1.AddItem(t11['出版社'],nil);

t11.Next;

end;

end;

2:

begin

combobox1.Items.Clear;

t11.First;

while not t11.Eof do

begin

f:=true;

for i:=0 to combobox1.Items.Count-1 do

if combobox1.Items[i]=trim(t11['入庫(kù)時(shí)間'])then //按入庫(kù)時(shí)間查詢(xún)

f:=false;

if f then

combobox1.AddItem(t11['入庫(kù)時(shí)間'],nil);

t11.Next;

end;

end;

3:

begin

combobox1.Items.Clear;

t11.First;

while not t11.Eof do

begin

f:=true;

for i:=0 to combobox1.Items.Count-1 do

if combobox1.Items[i]=trim(t11['訂書(shū)單位'])then //按訂書(shū)單位查詢(xún)

f:=false;

if f then

combobox1.AddItem(t11['訂書(shū)單位'],nil);

t11.Next;

end;

end;end;end;procedure Tf_cxk.FormCreate(Sender: TObject);begin

t11.Open;end;end.幫助模塊設(shè)計(jì)

幫助模塊如圖15所示：

圖15幫助窗體

系統(tǒng)使用說(shuō)明 系統(tǒng)運(yùn)行環(huán)境

運(yùn)行環(huán)境要求：以上，本系統(tǒng)是本系統(tǒng)是采用Delphi開(kāi)發(fā)工具以及后臺(tái)數(shù)據(jù)庫(kù)SQL server2000。同時(shí)本系統(tǒng)的運(yùn)行環(huán)境要求在windows 2000以上的操作系統(tǒng)。

系統(tǒng)操作說(shuō)明

本系統(tǒng)在使用之前先還原數(shù)據(jù)庫(kù)（教材管理系統(tǒng)）數(shù)據(jù)庫(kù)的命名為“教材管理系統(tǒng)”。

在打開(kāi)之后會(huì)顯示登錄窗體，其中用戶(hù)名和密碼默認(rèn)的都是“1”，或者是用戶(hù)名“小羅”，密碼是“1”。登錄后會(huì)顯示一個(gè)主窗體，之后就可以在主窗體上進(jìn)行用戶(hù)所想操作的功能。致謝

經(jīng)過(guò)幾個(gè)月的構(gòu)思與設(shè)計(jì)，在指導(dǎo)老師的精心指導(dǎo)和安排下，本系統(tǒng)已經(jīng)設(shè)計(jì)完畢。其使用功能基本符合在實(shí)際工作的需要，具有一定的實(shí)用性。但是由于時(shí)間比較倉(cāng)促，加上本人軟件設(shè)計(jì)經(jīng)驗(yàn)的不足。因此，在分析問(wèn)題、解決問(wèn)題時(shí)顯得不夠嚴(yán)密、完善，還需要在以后的工作中不斷地改進(jìn)和完善。本次畢業(yè)設(shè)計(jì)歷時(shí)兩個(gè)多月，從選題、開(kāi)題答辯，完成說(shuō)明書(shū)。其間每一過(guò)程都得到指導(dǎo)教師的悉心指導(dǎo)，指導(dǎo)老師每周安排見(jiàn)面會(huì)，身體力行、兢兢業(yè)業(yè)地為我們排憂(yōu)解難，不僅治學(xué)嚴(yán)謹(jǐn)而且為人師表，堪稱(chēng)良師益友，教給我們的不僅是知識(shí)還有待人處世的積極態(tài)度，在此表示衷心的感謝。

還要感謝九江職業(yè)技術(shù)學(xué)院圖書(shū)館及圖書(shū)館熱情的管理員為我提供豐富的參考資料。感謝某些同學(xué)，給我提供了一些方便,同時(shí)他們給了我很多寶貴的意見(jiàn)和參考，使我獲益很多，最后感謝所有關(guān)心、幫助過(guò)我的朋友和同學(xué)。

在這次的畢業(yè)設(shè)計(jì)中，讓我深深地體現(xiàn)到進(jìn)行軟件開(kāi)發(fā)不是一件簡(jiǎn)單的事情，它需要設(shè)計(jì)者具有全面的專(zhuān)業(yè)知識(shí)、縝密的思維、嚴(yán)謹(jǐn)?shù)墓ぷ鲬B(tài)度以及較高的分析問(wèn)題、解決問(wèn)題的能力，而我在很多方面還有欠缺。最后，我要衷心感謝老師在我的設(shè)計(jì)過(guò)程中給予我的極大幫助，使我能夠及時(shí)、順利地完成此次的畢業(yè)設(shè)計(jì)。同時(shí)，也要感謝我的老師和同學(xué)們及實(shí)習(xí)企業(yè)在本系統(tǒng)的設(shè)計(jì)過(guò)程中給予我的支持和幫助。