計(jì)算機(jī)圖形課程設(shè)計(jì)報(bào)告

1、<p>　　計(jì)算機(jī)圖形學(xué)課程設(shè)計(jì)</p><p>　　學(xué) 院: 信息工程學(xué)院</p><p>　　專 業(yè): 計(jì)算機(jī)科學(xué)與技術(shù)</p><p>　　學(xué) 號(hào): </p><p>　　姓 名: </p><p><b>　　指導(dǎo)老師： </b><

2、/p><p><b>　　時(shí) 間： </b></p><p>　　目 錄</p><p>　　1、課程設(shè)計(jì)目的…………………………………………………………………2</p><p>　　2、課程設(shè)計(jì)描述及要求…………………………………………………………2</p><p>　　3、系統(tǒng)

3、開(kāi)發(fā)環(huán)境…………………………………………………………………2</p><p>　　五角星算法原理………………………………………………………………2</p><p>　　5、動(dòng)態(tài)改變五角星的原理………………………………………………………3</p><p>　　6、核心代碼………………………………………………………………………3</p><p>

4、　　7、程序運(yùn)行結(jié)果…………………………………………………………………3</p><p>　　8、總結(jié)……………………………………………………………………………5</p><p>　　9、參考資料………………………………………………………………………5</p><p>　　10、附錄 …………………………………………………………………………7</p>

5、<p>　　一、設(shè)計(jì)任務(wù)及要求：</p><p><b>　　設(shè)計(jì)任務(wù)：</b></p><p>　　動(dòng)態(tài)繪制一個(gè)五角星,并可動(dòng)態(tài)改動(dòng)五角星的五個(gè)角的長(zhǎng)度。</p><p><b>　　要 求： </b></p><p>　　此次課程設(shè)計(jì)的課題為通過(guò)編程，五角星的繪制。并要求可動(dòng)態(tài)改

6、動(dòng)五角星的五個(gè)角的長(zhǎng)度，并給出代碼和結(jié)果截圖。</p><p>　　計(jì)算機(jī)圖形學(xué)課程設(shè)計(jì)報(bào)告</p><p><b>　　1、課程設(shè)計(jì)目的</b></p><p>　　本學(xué)期系統(tǒng)學(xué)習(xí)了計(jì)算機(jī)圖形學(xué)的概論原理，在學(xué)期期末按課程要求進(jìn)行實(shí)驗(yàn)。通過(guò)實(shí)驗(yàn)，進(jìn)一步理解和掌握中點(diǎn)算法、Bresenham算法和二階差分算法，</p><p

7、>　　并掌握以上算法生成圓和直線等圖形的基本過(guò)程，并正此過(guò)程中深化，并提高學(xué)生對(duì)計(jì)算機(jī)圖形學(xué)的了解與運(yùn)用技巧，同時(shí)通過(guò)此次課程設(shè)計(jì)提高動(dòng)手實(shí)踐能力與學(xué)習(xí)分析能力。</p><p>　　2、課程設(shè)計(jì)描述及要求</p><p><b>　　●畫(huà)五角星的算法 </b></p><p>　　掌握畫(huà)五角星的原理，設(shè)計(jì)五角星的算法，相關(guān)函數(shù)實(shí)現(xiàn)畫(huà)出五

8、角星。</p><p><b>　　●動(dòng)態(tài)改變五角星</b></p><p>　　通過(guò)一定的方法動(dòng)態(tài)改變五角星各個(gè)角的大小，使五角星能夠達(dá)到動(dòng)態(tài)的效果。</p><p><b>　　3．系統(tǒng)開(kāi)發(fā)環(huán)境</b></p><p>　　開(kāi)發(fā)工具：VB 6.0</p><p>　　操作

9、系統(tǒng)：Microsoft Windows XP/Windows 2007</p><p>　　4、五角星的算法原理</p><p>　　通過(guò)畫(huà)圓在圓上取5點(diǎn)連接起來(lái)既可以得到五角星。先畫(huà)個(gè)圓，在這個(gè)圓上取一點(diǎn)，然后每360/5=72°取一個(gè)點(diǎn)，共計(jì)5個(gè)點(diǎn)，把這5個(gè)點(diǎn)連接即可。</p><p>　　5、動(dòng)態(tài)改變五角星的原理</p><p&

10、gt;　　最主要是使用Timer控件。Timer控件可以有規(guī)律地間隔一段時(shí)間執(zhí)行一次代碼。Interval屬性是Timer控件最重要的一個(gè)屬性，它以千分之一秒為單位指定Timer事件之間的間隔，理論上可以認(rèn)為最少可設(shè)置為1毫秒觸發(fā)一次Timer事件，另外一個(gè)重要屬性是Enabled屬性，它決定計(jì)時(shí)器是否開(kāi)始工作。它隨著時(shí)間的流逝，動(dòng)態(tài)改變各個(gè)角度的大小。</p><p><b>　　6、核心代碼<

11、/b></p><p><b>　　畫(huà)五角星</b></p><p><b>　　l = l + 1</b></p><p>　　For i = 0 To 6 Step 1</p><p>　　x(i) = 100 + l * Cos((i * 72 + 54) * 3.14 / 180)&l

12、t;/p><p>　　y(i) = 100 + l * Sin((i * 72 + 54) * 3.14 / 180)</p><p><b>　　Next i</b></p><p>　　For i = 0 To 4 Step 1</p><p>　　Picture1.Line (x(i), y(i))-(x(i + 2)

13、, y(i + 2)), RGB(255, 0, 0)</p><p><b>　　Next i</b></p><p><b>　　時(shí)間控件</b></p><p>　　Private Sub Timer1_Timer()</p><p>　　'Static l As Integer<

14、;/p><p>　　If k = 1 Then</p><p>　　If l > 100 Then</p><p><b>　　l = 0</b></p><p>　　Picture1.Cls</p><p><b>　　End If</b></p><

15、p><b>　　7、程序運(yùn)行結(jié)果</b></p><p><b>　　8、總結(jié)</b></p><p>　　通過(guò)此次課程設(shè)計(jì)，使我更加扎實(shí)的計(jì)算機(jī)圖形學(xué)方面的知識(shí)，在設(shè)計(jì)過(guò)程中雖然遇到了一些問(wèn)題，但經(jīng)過(guò)一次又一次的思考，一遍又一遍的檢查終于找出了原因所在，也暴露出了前期我在這方面的知識(shí)欠缺和經(jīng)驗(yàn)不足。實(shí)踐出真知，通過(guò)親自動(dòng)手制作，使我們掌握

16、的知識(shí)不再是紙上談兵。</p><p>　　過(guò)而能改，善莫大焉。在課程設(shè)計(jì)過(guò)程中，我們不斷發(fā)現(xiàn)錯(cuò)誤，不斷改正，不斷領(lǐng)悟，不斷獲取。最終的檢測(cè)調(diào)試環(huán)節(jié)，本身就是在踐行“過(guò)而能改，善莫大焉”的知行觀。這次課程設(shè)計(jì)終于順利完成了，在設(shè)計(jì)中遇到了很多問(wèn)題，最后在老師和同學(xué)們的幫助指導(dǎo)下，終于游逆而解。在今后社會(huì)的發(fā)展和學(xué)習(xí)實(shí)踐過(guò)程中，一定要不懈努力，不能遇到問(wèn)題就想到要退縮，一定要不厭其煩的發(fā)現(xiàn)問(wèn)題所在，然后一一進(jìn)行解決

17、，只有這樣，才能成功的做成想做的事，才能在今后的道路上劈荊斬棘，而不是知難而退，那樣永遠(yuǎn)不可能收獲成功，收獲喜悅，也永遠(yuǎn)不可能得到社會(huì)及他人對(duì)你的認(rèn)可！</p><p>　　回顧起此課程設(shè)計(jì)，至今我仍感慨頗多，從理論到實(shí)踐，在這段日子里，可以說(shuō)得是苦多于甜，但是可以學(xué)到很多很多的東西，同時(shí)不僅可以鞏固了以前所學(xué)過(guò)的知識(shí)，而且學(xué)到了很多在書(shū)本上所沒(méi)有學(xué)到過(guò)的知識(shí)。通過(guò)這次課程設(shè)計(jì)使我懂得了理論與實(shí)際相結(jié)合是很重要的

18、，只有理論知識(shí)是遠(yuǎn)遠(yuǎn)不夠的，只有把所學(xué)的理論知識(shí)與實(shí)踐相結(jié)合起來(lái)，從理論中得出結(jié)論，才能真正為社會(huì)服務(wù)，從而提高自己的實(shí)際動(dòng)手能力和獨(dú)立思考的能力。在設(shè)計(jì)的過(guò)程中遇到問(wèn)題，可以說(shuō)得是困難重重，但可喜的是最終都得到了解決。</p><p>　　此次設(shè)計(jì)也讓我明白了思路即出路，有什么不懂不明白的地方要及時(shí)請(qǐng)教或上網(wǎng)查詢，只要認(rèn)真鉆研，動(dòng)腦思考，動(dòng)手實(shí)踐，就沒(méi)有弄不懂的知識(shí)，收獲頗豐。</p><p

19、><b>　　9、參考資料：</b></p><p>　　《計(jì)算機(jī)圖形學(xué)基礎(chǔ)》 陸玲 桂穎 編著</p><p>　　東華理工大學(xué)精品課程</p><p>　　10、附錄：源程序代碼清單</p><p>　　Dim l As Integer</p><p>　　Dim i As Integ

20、er</p><p>　　Dim x1 As Integer, x2 As Integer</p><p>　　Dim y1 As Integer, y2 As Integer</p><p>　　Dim x(7) As Integer</p><p>　　Dim y(7) As Integer</p><p>　　D

21、im k As Integer</p><p>　　Private Sub Command1_Click()</p><p>　　'l = Val(Text1.Text)</p><p><b>　　k = 1</b></p><p>　　Timer1.Enabled = True</p><

22、p>　　Timer1.Interval = 100</p><p><b>　　End Sub</b></p><p>　　Private Sub Command2_Click()</p><p>　　Picture1.Cls</p><p><b>　　k = 0</b></p>

23、<p><b>　　l = 0</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Command3_Click()</p><p><b>　　k = 0</b></p><p><b>　　End

24、Sub</b></p><p>　　Private Sub Command4_Click()</p><p><b>　　End</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Form_Load()</p><

25、p><b>　　k = 0</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Timer1_Timer()</p><p>　　'Static l As Integer</p><p>　　If k = 1 Then</p&g

26、t;<p>　　If l > 100 Then</p><p><b>　　l = 0</b></p><p>　　Picture1.Cls</p><p><b>　　End If</b></p><p><b>　　l = l + 1</b></p

27、><p>　　For i = 0 To 6 Step 1</p><p>　　x(i) = 100 + l * Cos((i * 72 + 54) * 3.14 / 180)</p><p>　　y(i) = 100 + l * Sin((i * 72 + 54) * 3.14 / 180)</p><p><b>　　Next i&l

28、t;/b></p><p>　　For i = 0 To 4 Step 1</p><p>　　Picture1.Line (x(i), y(i))-(x(i + 2), y(i + 2)), RGB(255, 0, 0)</p><p><b>　　Next i</b></p><p><b>　　En