HW3:校外教學心得

這次去台北看3D展...早上起床超冷!!! 又騎車去台北 到了之後有種後悔騎車的感覺..哀，不過好險 3D展很精彩，讓我們看到sony的技術是多麼的發達，只要把影片做成3D型態的，配上眼鏡，有種事物都是栩栩如生的感覺，尤其是一開始看足球賽，看到球員踢球..球飛過來的感覺，還真的會讓人想閃開，只能說人的需求造就了科技，為了更好的視聽效果，什麼都能做到!!我最喜歡的就是賽車的部分，配上現場的機器，有種真的在開賽車的感覺，每個轉彎都會緊張一下，希望有機會也在家放一台..以及最新的相機，可以拍出類似小動畫的照片，令人嘆為觀止!

此為左眼

此為右眼




上圖為修改成藍色的 程式碼在下面




ucRed1= (GetRValue(Image1->Canvas->Pixels[i][j]))*0;
ucGreen1= (GetGValue(Image1->Canvas->Pixels[i][j]));
ucBlue1= (GetBValue(Image1->Canvas->Pixels[i][j]));
Image1->Canvas->Pixels[i][j]= (TColor)RGB(ucRed1,ucGreen1, ucBlue1);




上圖為修改成紅色的 程式碼在下面



ucRed2 = (GetRValue(Image2->Canvas->Pixels[i][j]));
ucGreen2 = (GetGValue(Image2->Canvas->Pixels[i][j]))*0;
ucBlue2 = (GetBValue(Image2->Canvas->Pixels[i][j]))*0;
Image2->Canvas->Pixels[i][j]=(TColor)RGB(ucRed1,ucGreen1, ucBlue1);




合成過後的成品為這樣 程式碼在下面

ucRed3 = (GetRValue(Image2->Canvas->Pixels[i][j]));
ucGreen3 = (GetGValue(Image1->Canvas->Pixels[i][j]));
ucBlue3 = GetBValue(Image1->Canvas->Pixels[i][j]);
Image3->Canvas->Pixels[i][j]= (TColor)RGB(ucRed1,ucGreen1, ucBlue1);






這次作業中比較困難的部分是用BCB寫出程式，來自己跑3D圖片，還有拍照的部分，要拍到兩張好的照片..實際操作起來非常困難= =跟photoshop比起來，自己用BCB跑出來的圖片感覺是比較粗糙的，不過自己寫程式的好處就是，可以學習到裡面的迴圈跟顏色是怎麼跑的，而不是拿了一個現成的程式就跑出來答案，卻什麼都不知道。謝謝老師!