C++Builder學(xué)生信息管理系統(tǒng)軟件開發(fā)實(shí)訓(xùn)

1、某些圖片出于隱私保護(hù)刪除 目 錄目 錄第1章 緒 論11.1背景與意義11.2國內(nèi)外現(xiàn)狀的研究1第2章 學(xué)生信息管理系統(tǒng)模塊功能設(shè)計(jì)及實(shí)現(xiàn)22.1 系統(tǒng)功能分析22.2 系統(tǒng)功能模塊22.3 系統(tǒng)功能實(shí)現(xiàn)22.3.1數(shù)據(jù)查找與瀏覽模塊22.3.2數(shù)據(jù)修改模塊22.3.3報(bào)表顯示模塊22.3.4系統(tǒng)封面構(gòu)成模塊22.4 系統(tǒng)模塊框架圖3第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟43.1 系統(tǒng)封面設(shè)計(jì)43.2 數(shù)據(jù)庫創(chuàng)建73.2.1創(chuàng)建數(shù)據(jù)庫別名73.2.2創(chuàng)建數(shù)據(jù)表83.3 學(xué)生信息管理系統(tǒng)主界面設(shè)計(jì)83.3.1主界面總體設(shè)計(jì)83.3.2信息瀏覽功能設(shè)計(jì)123.3.3信息刪除功能設(shè)計(jì)133.3.4信息查詢

2、功能設(shè)計(jì)133.3.5信息更新功能設(shè)計(jì)163.4 學(xué)生信息添加界面設(shè)計(jì)163.5 學(xué)生信息修改界面設(shè)計(jì)193.6 照片信息添加與修改223.7 報(bào)表打印界面設(shè)計(jì)23結(jié)論26參考文獻(xiàn)27 第1章 緒 論 第1章 緒 論1.1背景與意義隨著我國高等院校的連年擴(kuò)招,學(xué)生人數(shù)不斷增加,給學(xué)校各院系的學(xué)生管理工作帶來了巨大的壓力.同時(shí),信息時(shí)代的到來,使高校的學(xué)生管理工作不可抗拒的地加速進(jìn)入信息網(wǎng)絡(luò)時(shí)代,學(xué)生信息的管理采取和利用在高校中將發(fā)揮越來越重要的作用.同時(shí)隨著素質(zhì)教育的深入開展,要做好學(xué)生管理工作,各院系就必須盡可能多地掌握學(xué)生情況.在學(xué)生人數(shù)大量增加,而學(xué)生管理教師緩慢增加的同時(shí),我們就必須有

3、一個(gè)良好的學(xué)生信息管理系統(tǒng),這樣才能把握學(xué)生的信息動態(tài).在這其中,信息的采集是尤為重要的,只有具有了全面的學(xué)生信息,才能在了解學(xué)生的同時(shí)降低學(xué)生管理的工作量也只有擁有了健全完整的學(xué)生信息,我們才能更好的合理的利用學(xué)生管理信息,并服務(wù)于學(xué)生.學(xué)生管理系統(tǒng)是一個(gè)學(xué)校不可缺少的部分，它的內(nèi)容對于學(xué)校的決策者和管理者來說都至關(guān)重要，所以學(xué)生管理系統(tǒng)應(yīng)該能夠?yàn)楣芾碚咛峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。但一直以來人們使用傳統(tǒng)人工的方式管理文件信息，這種管理方式存在著許多缺點(diǎn)：效率低、保密性差，另外，時(shí)間一長，將產(chǎn)生大量的文件和數(shù)據(jù)，這對于查找、更新和維護(hù)都帶來了不少的困難，隨著科學(xué)技術(shù)的不斷提高，計(jì)算機(jī)科學(xué)日

4、漸成熟，其強(qiáng)大的功能已為人們深刻認(rèn)識，它已進(jìn)入人類社會的各個(gè)領(lǐng)域，并發(fā)揮著越來越重要的作用，作為計(jì)算機(jī)應(yīng)用的一部分，使用計(jì)算機(jī)對學(xué)生信息進(jìn)行管理，具有手工管理無法比擬的優(yōu)點(diǎn)，例如：檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點(diǎn)能夠極大地提高學(xué)生信息管理的效率，也是學(xué)校的科學(xué)化、正規(guī)化、管理與世界接軌的重要條件，因此。開發(fā)這樣一套系統(tǒng)成為很有必要的事情1.2 國內(nèi)外現(xiàn)狀的研究計(jì)算機(jī)在管理中的應(yīng)用開始于1954年，當(dāng)時(shí)美國首先用計(jì)算機(jī)處理工資單。40多年來，計(jì)算機(jī)在處理管理信息方面發(fā)展迅速。例如，60年代美國計(jì)算機(jī)在管理中應(yīng)用項(xiàng)目不到300項(xiàng)，到了1975年達(dá)到267

5、0項(xiàng)。而現(xiàn)在，美國在財(cái)務(wù)會計(jì)上90%的工作由計(jì)算機(jī)完成；物資管理中80100%的信息處理由計(jì)算機(jī)完成；計(jì)劃管理中是8090%。據(jù)計(jì)算機(jī)應(yīng)用方面發(fā)展較快的國家統(tǒng)計(jì)，計(jì)算機(jī)用于經(jīng)濟(jì)管理的約占80%；用于科技運(yùn)算的占8%；用于生產(chǎn)過程控制的占12%。我國在全國范圍內(nèi)推廣計(jì)算機(jī)在管理中的應(yīng)用，是在70年代末開始的，雖然起步較晚，近幾年發(fā)展卻較快，特別是微型計(jì)算機(jī)的出現(xiàn)和普及為信息處理提供了物美價(jià)廉的手段，對于推動我國管理信息處理的現(xiàn)代化起了重要的作用。- 26 -第2章 學(xué)生信息管理模塊功能設(shè)計(jì)及實(shí)現(xiàn)第2章 學(xué)生信息管理系統(tǒng)模塊功能設(shè)計(jì)及實(shí)現(xiàn)2.1 系統(tǒng)功能分析 資料維護(hù)：系統(tǒng)維護(hù)包括對各種表記錄的修

6、改、刪除、添加等操作。 資料維護(hù)：對數(shù)據(jù)表中的信息進(jìn)行瀏覽。 系統(tǒng)查詢：可以按學(xué)號、姓名等相關(guān)信息進(jìn)行詳細(xì)或模糊查詢。 報(bào)表統(tǒng)計(jì)：學(xué)號、學(xué)生姓名、學(xué)生性別、所在班級、年齡、入學(xué)日期、職務(wù)、照片和簡歷等字段。 其它操作：系統(tǒng)封面、計(jì)時(shí)器控制與人性化提示信息。2.2 系統(tǒng)功能模塊學(xué)生管理系統(tǒng)由數(shù)據(jù)查找與瀏覽、數(shù)據(jù)修改、報(bào)表顯示和系統(tǒng)封面構(gòu)成。2.3 系統(tǒng)功能實(shí)現(xiàn)2.3.1 數(shù)據(jù)查找與瀏覽模塊（1）數(shù)據(jù)查找：學(xué)號、學(xué)生姓名、學(xué)生性別、所在班級、年齡、入學(xué)日期、職務(wù)、照片和簡歷等字段進(jìn)行精確或模糊查找。（2）數(shù)據(jù)瀏覽：可以對數(shù)據(jù)表中的數(shù)據(jù)實(shí)現(xiàn)，上一項(xiàng)、下一項(xiàng)、首相、尾項(xiàng)等操作。（3）其他信息：設(shè)置字體

7、、顏色屬性和一些提示信息。2.3.2 數(shù)據(jù)修改模塊（1）添加數(shù)據(jù)：增加一個(gè)新的記錄。（2）修改數(shù)據(jù)：修改原有記錄。2.3.3 報(bào)表顯示模塊顯示當(dāng)前查找到的數(shù)據(jù)內(nèi)容，以報(bào)表形式打印。2.3.4 系統(tǒng)封面構(gòu)成模塊（1）系統(tǒng)時(shí)鐘：在在設(shè)定的時(shí)間間隔內(nèi)，系統(tǒng)封面顯示達(dá)到或超過設(shè)定的顯示時(shí)間，系統(tǒng)封面會自動釋放（2）功能實(shí)現(xiàn)：進(jìn)入主界面與退出系統(tǒng)。軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)2.4 系統(tǒng)模塊框架圖系統(tǒng)模塊框架由四部分，八項(xiàng)功能組成，如圖1所示： 查找與瀏覽數(shù)據(jù)查找數(shù)據(jù)瀏覽其他信息數(shù)據(jù)修改添加數(shù)據(jù)修改數(shù)據(jù)報(bào)表顯示以報(bào)表形式打印系統(tǒng)時(shí)鐘系統(tǒng)封面構(gòu)成功能實(shí)現(xiàn)學(xué)生管理系統(tǒng)圖1.系統(tǒng)模塊框架圖第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)

8、步驟第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟3.1 系統(tǒng)封面設(shè)計(jì)首先在系統(tǒng)封面插入自己喜歡的圖片，利用Additional選項(xiàng)卡中的TImage組件完成插入圖片，Stretch屬性改為True拉伸圖片至整個(gè)窗體，利用TLabel組件顯示“學(xué)生信息管理系統(tǒng)”和剩余的時(shí)間。另外利用System選項(xiàng)卡中的TTimer 組件來設(shè)置進(jìn)入系統(tǒng)的定時(shí)操作。最后利用兩個(gè)TButton組件完成進(jìn)入系統(tǒng)與退出系統(tǒng)的功能，設(shè)置ShowHint屬性為True顯示提示，Caption輸入（&R）可進(jìn)行Alt+R快捷鍵操作。系統(tǒng)封面圖設(shè)計(jì)如下：圖2. 系統(tǒng)封面設(shè)計(jì)圖本部分程序代碼如下：/-#include <vcl

9、.h>#pragma hdrstop#include "Unit1.h"#include "Unit2.h"/-#pragma package(smart_init)#pragma resource "*.dfm"軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)int logintime=6;TForm1 *Form1;/-void _fastcall TForm1:Timer1Timer(TObject *Sender)if(logintime=0) Timer1->Enabled=false; Form2->Show(); Form1-&g

10、t;Hide(); logintime=1;logintime-;Label1->Caption ="剩余("+IntToStr(logintime)+"秒)自動進(jìn)入"/-void _fastcall TForm1:Button1Click(TObject *Sender)Timer1->Enabled=false; Form2->Show(); /-void _fastcall TForm1:Button2Click(TObject *Sender)Close(); /-void _fastcall TForm1:FormCloseQ

11、uery(TObject *Sender, bool &CanClose)if(MessageDlg("確實(shí)要關(guān)閉系統(tǒng)嗎?",mtConfirmation,TMsgDlgButtons()<<mbOK<<mbCancel,0)=mrCancel)CanClose=false;第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟/-本系統(tǒng)設(shè)計(jì)的進(jìn)入程序的倒計(jì)時(shí)間為6秒，到6秒以后系統(tǒng)自動進(jìn)入登陸界面，也可以點(diǎn)擊進(jìn)入按鈕立刻進(jìn)入系統(tǒng)。在關(guān)閉系統(tǒng)時(shí)，會詢問是否關(guān)閉系統(tǒng)，以免發(fā)生誤操作。程序運(yùn)行后界面效果圖如下：圖3.系統(tǒng)封面運(yùn)行效果圖系統(tǒng)運(yùn)行時(shí)，當(dāng)點(diǎn)擊退出按鈕，或者A

12、lt+C快捷鍵，會出現(xiàn)如下界面：圖4.系統(tǒng)退出界面圖軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)3.2 數(shù)據(jù)庫創(chuàng)建3.2.1 創(chuàng)建數(shù)據(jù)庫別名利用BDE Administrator新建一個(gè)叫student的別名，選擇好路徑后點(diǎn)擊應(yīng)用，保存別名，如圖5所示：圖5. 數(shù)據(jù)庫別名建立界面3.2.2 創(chuàng)建數(shù)據(jù)表新建一個(gè)數(shù)據(jù)表BIAO.DB，添加XH、XM、XB、BJ、NL、RXRQ、ZW、ZP、JL字段，XB為邏輯型L，ZP為圖案型G，其他為字符型A，雙擊XH設(shè)置為關(guān)鍵字。圖6.數(shù)據(jù)表結(jié)構(gòu)第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟在Table properties下拉列表框中選擇Secondary Indexes時(shí)，單擊Define按鈕

13、，將顯示Define Secondary Indexes 對話框。從Fields列表框中選擇索引字段添加到右邊的Index fields列表框中。添加XH作為索引字段，單擊OK按鈕，輸入索引名，如Index_XH，再單擊OK按鈕結(jié)束索引字段的定義。所有字段輸入完后，點(diǎn)擊Save As,保存為BIAO.DB即可。3.3 學(xué)生信息管理系統(tǒng)主界面設(shè)計(jì)3.3.1 主界面總體設(shè)計(jì)學(xué)生信息管理系統(tǒng)主界面主要由菜單欄、數(shù)據(jù)顯示欄、文本顯示、文本輸入框和狀態(tài)欄以及功能按鈕組成。通過設(shè)置Table1,Datasource1，Query1,Datasource2屬性，進(jìn)行數(shù)據(jù)庫與表的連接。屬性設(shè)置由對象檢視器界面

14、設(shè)置，其中Table1的Database name設(shè)置為數(shù)據(jù)庫別名student，Table name為數(shù)據(jù)庫的名稱BIAO.DB，另外Datasource1組件的Dataset屬性設(shè)置為Table1，Table1的Active屬性設(shè)為True，DBGrid1的Datasource屬性設(shè)為Datasource1這樣,TDBGrid1組件就與數(shù)據(jù)庫相聯(lián)立起來了,Query1、Datasource2、TDBGrid2設(shè)置同上，Query1額外設(shè)置SQL屬性為select*from BIAO.DB。學(xué)生信息管理系統(tǒng)主界面圖如下：圖7. 學(xué)生信息管理系統(tǒng)主界面圖主界面程序如下：/-#include &

15、lt;vcl.h>#pragma hdrstop軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)#include "Unit2.h"#include "Unit3.h"#include "Unit4.h"#include "Unit1.h"#include "Unit5.h"/-#pragma package(smart_init)#pragma resource "*.dfm"TForm2 *Form2;/-void _fastcall TForm2:Button10Click(TObject

16、*Sender)if(MessageDlg("真的更新數(shù)據(jù)庫表？",mtConfirmation,TMsgDlgButtons()<<mbYes<<mbNo,0)=mrYes)Table1->Active=false; Table1->Active=true;elseTable1->Cancel();StatusBar1->Panels->Items0->Text="進(jìn)行了更新數(shù)據(jù)庫"/-void _fastcall TForm2:DBImage1Click(TObject *Sender)if

17、(Table1->ReadOnly)return;if(OpenDialog1->Execute()Table1->Edit();DBImage1->Picture->LoadFromFile(OpenDialog1->FileName) ;Table1->Post();/-void _fastcall TForm2:Button7Click(TObject *Sender)第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟Form3->Show();StatusBar1->Panels->Items0->Text="進(jìn)行了添加記錄&q

18、uot;/-void _fastcall TForm2:Button8Click(TObject *Sender)if(Table1->FindKey(ARRAYOFCONST(Edit1->Text) ShowMessage("記錄找到，可以修改！"); Form4->Show(); StatusBar1->Panels->Items0->Text="進(jìn)行了修改記錄" else ShowMessage("查無此人！"); Edit1->Text=""/-void _fas

19、tcall TForm2:Table1CalcFields(TDataSet *DataSet)if(Table1->FieldByName("XB")->AsBoolean)Table1->FieldByName("Sex")->AsString="男"elseTable1->FieldByName("Sex")->AsString="女"/-void _fastcall TForm2:N2Click(TObject *Sender)Form1->Sh

20、ow();/-void _fastcall TForm2:N3Click(TObject *Sender)Form2->Close();軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)Form1->Close();/-void _fastcall TForm2:Button11Click(TObject *Sender)Form5->QuickRep1->Preview();Form5->Close();StatusBar1->Panels->Items0->Text="進(jìn)行了打印報(bào)表"/-void _fastcall TForm2:Query1Calc

21、Fields(TDataSet *DataSet)if(Query1->FieldByName("XB")->AsBoolean)Query1->FieldByName("Sex")->AsString="男"elseQuery1->FieldByName("Sex")->AsString="女"/-void _fastcall TForm2:FormCreate(TObject *Sender)StatusBar1->Panels->Items0

22、->Text="歡迎使用學(xué)生管理系統(tǒng)"StatusBar1->Panels->Items1->Text=Now();/-void _fastcall TForm2:H1Click(TObject *Sender)ShowMessage("歡迎使用學(xué)生信息管理系統(tǒng)！n 本界面有如下功能：n 1.學(xué)生信息瀏覽、添加、修改、查找和刪除的操作。n 2.瀏覽、添加和修改學(xué)生照片。n 3.數(shù)據(jù)維護(hù)完畢可更新數(shù)據(jù)庫.n 4.進(jìn)行打印報(bào)表。") ;第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟/-void _fastcall TForm2:N51Click(T

23、Object *Sender)if(FontDialog1->Execute()Form2->Font=FontDialog1->Font;/-void _fastcall TForm2:C1Click(TObject *Sender)if(ColorDialog1->Execute()Form2->Panel1->Color=ColorDialog1->Color;Form3->Panel1->Color=ColorDialog1->Color;Form4->Panel1->Color=ColorDialog1->

24、Color; /-void _fastcall TForm2:D1Click(TObject *Sender)if(ColorDialog1->Execute()DBGrid1->Color=ColorDialog1->Color;DBGrid2->Color=ColorDialog1->Color; /-3.3.2信息瀏覽功能設(shè)計(jì)信息管理主界面中的置頂、上一條、下一條、置尾按鈕與Table1相連，具體實(shí)現(xiàn)程序如下：/-void _fastcall TForm2:Button3Click(TObject *Sender)Table1->First();Sta

25、tusBar1->Panels->Items0->Text="點(diǎn)擊了首項(xiàng)按鈕"/-軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)void _fastcall TForm2:Button4Click(TObject *Sender)Table1->Next();StatusBar1->Panels->Items0->Text="點(diǎn)擊了下一項(xiàng)按鈕" /-void _fastcall TForm2:Button5Click(TObject *Sender)Table1->MoveBy(-1);StatusBar1->Panels-&

26、gt;Items0->Text="點(diǎn)擊了上一項(xiàng)按鈕" /-void _fastcall TForm2:Button6Click(TObject *Sender)Table1->Last();StatusBar1->Panels->Items0->Text="點(diǎn)擊了尾項(xiàng)按鈕" /-3.3.3信息刪除功能設(shè)計(jì)利用信息管理主界面刪除按鈕實(shí)現(xiàn)數(shù)據(jù)庫的刪除功能，具體程序如下：/-void _fastcall TForm2:Button9Click(TObject *Sender)AnsiString ass;if(Applicatio

27、n->MessageBox("確定要刪除:"+ass+"的記錄嗎？").c_str(),"提示",MB_YESNO)=IDYES)Table1->Delete();StatusBar1->Panels->Items0->Text="進(jìn)行了刪除記錄" /-3.3.4信息查詢功能設(shè)計(jì)利用TQuery1、Datasource2與數(shù)據(jù)表的關(guān)聯(lián)，通過SQL語句實(shí)現(xiàn)信息精確查找或模糊查找的功能，將結(jié)果顯示在TDBGrid2。TQuery1的SQL屬性要特別設(shè)置為select*from BIAO.D

28、B。功能效果如下：第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟圖8.精確查找效果圖圖9.模糊查找效果圖本功能程序如下：/-void _fastcall TForm2:Button1Click(TObject *Sender)AnsiString ass,tabname;tabname="BIAO.DB"Query1->Active=False;Query1->SQL->Clear();Query1->SQL->Add("SELECT *");軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)ass="FROM ""+tabname+&q

29、uot;"tab"Query1->SQL->Add(ass) ;Query1->SQL->Add("WHERE XH='"+Edit1->Text+"'") ;Query1->SQL->Add("ORDER BY XH");Query1->Active=true;Edit1->Text=""if(Query1->RecordCount=0)StatusBar1->Panels->Items0->Text

30、="無符合條件數(shù)據(jù)"elseStatusBar1->Panels->Items0->Text="數(shù)據(jù)已經(jīng)找到！"/-void _fastcall TForm2:Button2Click(TObject *Sender)AnsiString ass,tabname;tabname="BIAO.DB"Query1->Active=False;Query1->SQL->Clear();Query1->SQL->Add("SELECT *");ass="FROM &

31、quot;"+tabname+""tab"Query1->SQL->Add(ass) ;Query1->SQL->Add("WHERE XH LIKE '%"+Edit1->Text+"%'") ;Query1->SQL->Add("ORDER BY XH");Query1->Active=true;Edit1->Text=""if(Query1->RecordCount=0)StatusBar1-&

32、gt;Panels->Items0->Text="無符合條件數(shù)據(jù)"elseStatusBar1->Panels->Items0->Text="符合條件數(shù)據(jù)個(gè)數(shù)為："+IntToStr(Query1->RecordCount);/-第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟3.3.5信息更新功能設(shè)計(jì)當(dāng)點(diǎn)擊添加按鈕時(shí)，當(dāng)前添加的數(shù)據(jù)被錄入到數(shù)據(jù)庫中，由于Table組件功能的局限性，需要將數(shù)據(jù)庫關(guān)閉后在打開，數(shù)據(jù)才算真正的錄入，因而信息管理主界面有數(shù)據(jù)更新和刷新功能，具體程序如下：/-void _fastcall TForm2:But

33、ton10Click(TObject *Sender)if(MessageDlg("真的更新數(shù)據(jù)庫表？",mtConfirmation,TMsgDlgButtons()<<mbYes<<mbNo,0)=mrYes)Table1->Active=false; Table1->Active=true;elseTable1->Cancel();StatusBar1->Panels->Items0->Text="進(jìn)行了更新數(shù)據(jù)庫"/-3.4 學(xué)生信息添加界面設(shè)計(jì)添加界面就由一系列TButton組件、TL

34、abel組件、TEdit組件和TMemo組件通過編程來實(shí)現(xiàn)，通過信息管理主界面的添加按鈕調(diào)出添加界面，注意在窗體調(diào)用的時(shí)候要把被調(diào)窗體的頭文件放在調(diào)用窗體的頭文件中，這樣才能實(shí)現(xiàn)窗體間的調(diào)用。添加界面設(shè)計(jì)如下：圖10.添加界面軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)本程序?qū)崿F(xiàn)的功能有當(dāng)添加的某一項(xiàng)為空時(shí)，提醒輸入內(nèi)容不能為空，當(dāng)點(diǎn)擊清空按鈕時(shí)，實(shí)現(xiàn)各個(gè)編輯框信息清除，為下一次數(shù)據(jù)錄入做準(zhǔn)備。添加界面程序如下：/-#include <vcl.h>#pragma hdrstop#include "Unit3.h"#include "Unit2.h"/-#pragma

35、 package(smart_init)#pragma resource "*.dfm"TForm3 *Form3;/-void _fastcall TForm3:Button1Click(TObject *Sender)if(Edit1->Text.IsEmpty() ShowMessage("輸入的學(xué)號不能為空"); return; if(Edit2->Text.IsEmpty() ShowMessage("輸入的姓名不能為空"); return; if(Edit3->Text.IsEmpty() ShowMes

36、sage("輸入的性別不能為空"); return; if(Edit4->Text.IsEmpty() ShowMessage("輸入的班級不能為空"); return; if(Edit5->Text.IsEmpty() ShowMessage("輸入的年齡不能為空"); return; if(Edit6->Text.IsEmpty() ShowMessage("輸入的入學(xué)日期不能為空"); return;第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟 if(Edit7->Text.IsEmpty() S

37、howMessage("輸入的職務(wù)不能為空"); return; if(Memo1->Text.IsEmpty() ShowMessage("輸入的簡歷不能為空"); return;Table1->Append();Table1->FieldByName("XH")->AsString=Edit1->Text.Trim();Table1->FieldByName("XM")->AsString=Edit2->Text.Trim();Table1->FieldBy

38、Name("XB")->AsString=Edit3->Text.Trim();Table1->FieldByName("BJ")->AsString=Edit4->Text.Trim();Table1->FieldByName("NL")->AsString=Edit5->Text.Trim();Table1->FieldByName("RXRQ")->AsString=Edit6->Text.Trim();Table1->FieldByNa

39、me("ZW")->AsString=Edit7->Text.Trim();Table1->FieldByName("JL")->AsString=Memo1->Text.Trim(); Table1->Post(); ShowMessage("添加成功！"); Form2->Show(); Form3->Close(); /-void _fastcall TForm3:Button3Click(TObject *Sender)Form3->Close();/-void _fast

40、call TForm3:Button2Click(TObject *Sender)Edit1->Text=""Edit2->Text=""Edit3->Text=""Edit4->Text=""軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)Edit5->Text=""Edit6->Text=""Edit7->Text=""Memo1->Text=""/-3.5 學(xué)生信息修改界面設(shè)計(jì)數(shù)據(jù)修改界面主要完成數(shù)據(jù)庫原有數(shù)據(jù)

41、的修改功能。本設(shè)計(jì)思想為，先在主界面快捷查詢要修改數(shù)據(jù)的原信息，確認(rèn)其存在然后光標(biāo)定位其位置，之后完成修改?？旖莶樵兊某绦虼a如下：/-void _fastcall TForm3:Button8Click(TObject *Sender)if(Table1->FindKey(ARRAYOFCONST(Edit1->Text) ShowMessage("記錄找到，可以修改！"); else ShowMessage("查無此人！"); Edit1->Text=""/-在主界面點(diǎn)擊修改后效果如下：圖11.搜索待修改學(xué)號效果

42、面實(shí)現(xiàn)修改的代碼如下：/-#include <vcl.h>#pragma hdrstop第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟#include "Unit4.h"#include "Unit2.h"/-#pragma package(smart_init)#pragma resource "*.dfm"TForm4 *Form4;/-void _fastcall TForm4:Button1Click(TObject *Sender)if(DBEdit1->Text.IsEmpty() ShowMessage("

43、輸入的學(xué)號不能為空"); return; if(DBEdit2->Text.IsEmpty() ShowMessage("輸入的姓名不能為空"); return; if(DBEdit3->Text.IsEmpty() ShowMessage("輸入的性別不能為空"); return; if(DBEdit4->Text.IsEmpty() ShowMessage("輸入的班級不能為空"); return; if(DBEdit5->Text.IsEmpty() ShowMessage("輸入的年

44、齡不能為空"); return; if(DBEdit6->Text.IsEmpty() ShowMessage("輸入的入學(xué)日期不能為空"); return; if(DBMemo1->Text.IsEmpty() ShowMessage("輸入的簡歷不能為空"); return;Form2->Table1->Edit();Form2->Table1->FieldByName("XH")->AsString=DBEdit1->Text.Trim();軟件開發(fā)實(shí)訓(xùn)課程設(shè)計(jì)Form2

45、->Table1->FieldByName("XM")->AsString=DBEdit2->Text.Trim();Form2->Table1->FieldByName("XB")->AsString=DBEdit3->Text.Trim();Form2->Table1->FieldByName("BJ")->AsString=DBEdit4->Text.Trim();Form2->Table1->FieldByName("NL"

46、)->AsString=DBEdit5->Text.Trim();Form2->Table1->FieldByName("RXRQ")->AsString=DBEdit6->Text.Trim();Form2->Table1->FieldByName("ZW")->AsString=DBEdit7->Text.Trim();Form2->Table1->FieldByName("JL")->AsString=DBMemo1->Text.Trim();

47、Form2->Table1->Post(); ShowMessage("修改成功！"); Form2->StatusBar1->Panels->Items0->Text="成功修改記錄" Form2->Show(); Form4->Close();/-void _fastcall TForm4:Button2Click(TObject *Sender)DBEdit1->Text=""DBEdit2->Text=""DBEdit3->Text=&quo

48、t;"DBEdit4->Text=""DBMemo1->Text=""DBEdit6->Text=""DBEdit7->Text=""DBEdit5->Text=""/-void _fastcall TForm4:Button3Click(TObject *Sender)Form4->Close(); /-第3章 學(xué)生信息管理系統(tǒng)設(shè)計(jì)步驟信息修改界面如下：圖12.信息修改界面3.6 照片信息添加與修改本系統(tǒng)利用Data Control選項(xiàng)卡中的TDBimage組件完成。添加一個(gè)TDBimage組件和一個(gè)OpenDialogs組件，雙擊Table組件，出現(xiàn)一個(gè)編輯器，單擊右鍵，選中Add All Fields,點(diǎn)擊OK，設(shè)置所有字段的Tfield屬性，然后設(shè)置TDBimage組件屬性，Datasource屬性設(shè)為Datasource1，Datafield的屬性設(shè)為ZP，O