【導(dǎo)讀】畢業(yè)設(shè)計(jì)（論文）-Delphi+SQL通用試卷自動(dòng)生成系統(tǒng)。摘要一般情況教師想出一份試卷要么到龐大的題庫里一道一道的把題找出。來或是從幾本相關(guān)的書里把題一道一道挑出來這樣即費(fèi)時(shí)又費(fèi)力而且很難保證。試題的覆蓋面和把握好試卷的難度正是為了能夠幫助教師輕松的出一份高質(zhì)量。的試卷而開發(fā)了本軟件為了達(dá)到預(yù)期的目標(biāo)我們最終選擇了MicrosoftOffice. Word做為本軟件的終端輸出本軟件是在對(duì)現(xiàn)有控件的改進(jìn)和Delphi編程的研究。的基礎(chǔ)上開發(fā)的本軟件實(shí)現(xiàn)了以下主要功能1手動(dòng)生成試卷2自動(dòng)生成試卷3. 抽取現(xiàn)有試卷試表明本軟件在Windows98／me／2021／XP平臺(tái)配合Office. XP／2021的環(huán)境下程序運(yùn)行穩(wěn)定且各項(xiàng)功能運(yùn)行得都很正確基本達(dá)到了預(yù)期的。12系統(tǒng)開發(fā)的目的4. 23在Delphi中存取數(shù)據(jù)庫8. 24SQL語言在Delphi中的運(yùn)用9. 31系統(tǒng)功能需求11. 的研究目前這一領(lǐng)域也以良好的發(fā)展姿態(tài)而不斷進(jìn)步早期已經(jīng)有了一些類似的。卷非常方便只需幾分鐘就可以生成一份試卷生成的試卷還配有答案更重

　　

【正文】 nepaper 分 1310 autoanswer autoanswer1310tmno[pp]選擇題 1310 pp pp1 end begin query1Close qur qu select tno from ti_choose if ListBox2Count 1 then begin for mm 1 to 9 do begin if TF[mm] t then begin qu where tno not like inttostr mm break end end if listBox2Count 1 then begin for mm 1 to 9 do if TF[mm] t then begin qu and tno not like inttostr mm end end end query1Open query1First while not query1Eof do begin hade false if i 1 then begin thao[i] Query1FieldValues[tno] div 10 end else if i 1 then begin for j i1 downto 1 do begin if thao[j] Query1FieldValues[tno] div 10 then begin t true break end else t false end if not t then begin thao[i] Query1FieldValues[tno] div 10 t false end end query1Next if not t then i i1 end temp random i1 1 r thao[temp] q random 9 1 ran r10q for m 1 to 800 do havetake[m] 0 for m 1 to 800 do begin if havetake[m] ran then begin showmessage chongfu hade true break end end if not hade then begin for m 0 to 800 do if havetake[m] 0 then begin havetake[m] ran break end query1Close qur qu select tiganxaxbxcxdanswerdifficulty from ti_choose where tno no query1ParamByName no Value ran query1Open if choosenumber 0 then begin if query1RecordCount 0 then continue showmessage ddd begin n strtoint query1FieldByName difficulty AsString if diff[n] 0 then begin tt tt1 memo1Text memo1Textinttostr tt query1fieldbyname tigan AsString1310 memo1Text memo1Textquery1fieldbyname xa AsString1310 memo1Text memo1Textquery1fieldbyname xb AsString1310 memo1Text memo1Textquery1fieldbyname xc AsString1310 memo1Text memo1Textquery1fieldbyname xd AsString1310 autoanswer autoanswerinttostr tt query1fieldbyname answer AsString1310 choosenumber choosenumber1 n n1 end 45 本章小結(jié) 本章主要介紹了系統(tǒng)運(yùn)行后功能實(shí)現(xiàn)的截圖跟各主要功能的實(shí)現(xiàn)代碼 結(jié) 論 畢業(yè)設(shè)計(jì)到這就全部完成了試卷自動(dòng)生成系統(tǒng)基本上完成可以實(shí)現(xiàn)有關(guān)信息的輸入修改刪除查詢以及自動(dòng)生成等功能回想整個(gè)過程從開始分析課題總體設(shè)計(jì)著手開發(fā)軟件到最后的系統(tǒng)實(shí)現(xiàn)對(duì) 于畢業(yè)設(shè)計(jì)又有了一個(gè)更高的認(rèn)識(shí)設(shè)計(jì)初我認(rèn)真地學(xué)習(xí)了此次設(shè)計(jì)所用的開發(fā)工具編程語言了解了相關(guān)的專業(yè)知識(shí)為順利完成本次畢業(yè)設(shè)計(jì)奠定了基礎(chǔ) 總的來說這次畢業(yè)設(shè)計(jì)收獲很大但是在開發(fā)過程也遇到了不少的困難通過查閱資料向別人請(qǐng)教自己琢磨和嘗試和導(dǎo)師的指導(dǎo)問題大部分被一一解決當(dāng)然本次開發(fā)的系統(tǒng)一定還存在一些問題我將在以后的學(xué)習(xí)中慢慢完善 由于時(shí)間和技術(shù)的限制本系統(tǒng)只是針對(duì)學(xué)院來設(shè)計(jì)的所以其功能還有諸多限制而且此次設(shè)計(jì)并為考慮到系統(tǒng)的美觀性經(jīng)過以后的學(xué)習(xí)可以開發(fā)出對(duì)我們整個(gè)學(xué)院都適用的試卷自動(dòng)生成系統(tǒng)甚至對(duì)所有學(xué)校都適用的 系統(tǒng) 參考文獻(xiàn) 1 吳天準(zhǔn) Delphi7 程序設(shè)計(jì)技巧與實(shí)例 [M] 中國鐵道出版社 2 張?jiān)鰪?qiáng)蔣志光 編程實(shí)例與技巧集粹 [M] 北京希望電子出版社 2021 3 薩師煊王珊 數(shù)據(jù)庫系統(tǒng)概論 [M] 第三版 高等教育出版社 2021 4 飛思科技產(chǎn)品研發(fā)中心 Delphi7 數(shù)據(jù)庫應(yīng)用開發(fā) [M] 電子工業(yè)出版社2021 5 飛思科技產(chǎn)品研發(fā)中心 Delphi6 開發(fā)者手冊(cè) [M] 電子工業(yè)出版社 2021 6 呂偉臣精通 Delphi70[M] 科學(xué)出版社 2021 7 黃德才 數(shù)據(jù)庫原理及其應(yīng)用教程 [M] 北京科學(xué) 出版社 20218 8 雪蘭 數(shù)據(jù)庫系統(tǒng)原理及應(yīng)用教程 [M] 北京機(jī)械工業(yè)出版社 20217 9 張海藩 軟件工程導(dǎo)論 第三版 [M] 北京清華大學(xué)出版社 20217 10 薩師煊王珊 數(shù)據(jù)庫系統(tǒng)概論 第三版 [M] 北京高等教育出版社 20218 11 沈佩娟 數(shù)據(jù)庫管理及應(yīng)用開發(fā) [M] 北京清華大學(xué)出版社 19954 12 胡光兵 Delphi70 程序設(shè)計(jì)實(shí)訓(xùn)教程電子工業(yè)出版社 20217 致 謝 我要忠心感謝我的指導(dǎo)老師邵斌老師感謝他為我選定了這樣一個(gè)有意義的研究課題并指導(dǎo)我完成該論文在幾 個(gè)月學(xué)習(xí)和論文的完成過程中在論文的研究資料的收集和格式方面感謝導(dǎo)師抽出寶貴時(shí)間多次提出了很有意義的意見和建議開拓了我的思路并對(duì)我進(jìn)行悉心的指導(dǎo)和幫助使我能在預(yù)定的時(shí)間內(nèi)完成畢業(yè)論文在邵老師的指導(dǎo)下我學(xué)到了很多理論與實(shí)踐的知識(shí)這是我成長路上的一筆巨大的財(cái)富感謝他的耐心指導(dǎo) 湖州師范學(xué)院 通用試卷自動(dòng)生成系統(tǒng) 30 TTable TADODataSet TADOTable TADOQuery TADOStoredProc TQuery TStoredProc TBDEDateSet TNestedTable TBDEDataSet TClientDataSet TDataSet TCustomADODataSet 客戶端應(yīng)用程序 用戶界面 TDataSouce 數(shù)據(jù)模塊 TTable TQuery BDE 數(shù)據(jù)庫服務(wù)器 試卷自動(dòng)生成系統(tǒng) 登陸系統(tǒng) 修改密碼 用戶添加 用戶刪除 修改權(quán)限 數(shù)據(jù)管理 退出系統(tǒng) 題庫 管理 試題輸入 試題查詢 試題添加 試題修改 系統(tǒng) 管理 試卷 管理 手工生成 自動(dòng)生成 試卷修改 試卷刪除 試卷預(yù)覽 事務(wù) 試卷 事務(wù) 題庫管理程序 題庫 操作記錄 試卷生成程序 數(shù)據(jù)訪問 組件 BDE 數(shù)據(jù)庫 數(shù)據(jù)控制 組件 用 戶