ccd影像监控系统与影像处理技术

ccd影像监控系统与影像处理技术

ID:15444865

大小:441.00 KB

页数:7页

时间:2018-08-03

ccd影像监控系统与影像处理技术_第1页
ccd影像监控系统与影像处理技术_第2页
ccd影像监控系统与影像处理技术_第3页
ccd影像监控系统与影像处理技术_第4页
ccd影像监控系统与影像处理技术_第5页
资源描述:

《ccd影像监控系统与影像处理技术》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、實驗二CCD影像監控系統與影像處理技術一、實驗題目1.設計一程式,能擷取CCD之影像,達成監控的目地。二、實驗目的:藉由此實驗,讓學生熟悉影像處理之技術。三、實驗儀器:WEBCam一台四、實驗結果與程式:監控主程式畫面(a)手形偵測(b)臉型偵測(c)人型偵測程式碼#include#pragmahdrstop#include"Unit1.h"#include"Unit2.h"//-------------------------------------------------------------

2、--------------#pragmapackage(smart_init)#pragmalink"Img"#pragmalink"MultiCapture"#pragmalink"Img"#pragmaresource"*.dfm"TForm1*Form1;Graphics::TBitmap*Bitmap1=newGraphics::TBitmap;Graphics::TBitmap*Bitmap2=newGraphics::TBitmap;Graphics::TBitmap*Bitmap3=newGrap

3、hics::TBitmap;byte*ptr1,*ptr2,*ptr3;//---------------------------------------------------------------------------__fastcallTForm1::TForm1(TComponent*Owner):TForm(Owner){Bitmap1->Height=MultiCapture1->Height;Bitmap1->Width=MultiCapture1->Width;Bitmap1->PixelFo

4、rmat=pf24bit;Bitmap2->Height=MultiCapture1->Height;Bitmap2->Width=MultiCapture1->Width;Bitmap2->PixelFormat=pf24bit;Bitmap3->Height=MultiCapture1->Height;Bitmap3->Width=MultiCapture1->Width;Bitmap3->PixelFormat=pf24bit;}//-------------------------------------

5、--------------------------------------void__fastcallTForm1::Button1Click(TObject*Sender){unsignedlong*bit1;unsignedintcount;COLORREFcolor;bit1=MultiCapture1->bits;for(inty=0;y<480;y++){ptr1=(byte*)Bitmap1->ScanLine[y];for(intx=0;x<640;x++){count=(479-y)*640+x

6、;//由於MultiCapture物件的起始座標點(0,0)是在左下角,而COLORREF這個函式//所取的RGB值是從左上為啟始座標所開始取的,所以要透過座標之間的轉換才可正確取值color=*(bit1+count);ptr1[x*3]=GetRValue(color);ptr1[x*3+1]=GetGValue(color);ptr1[x*3+2]=GetBValue(color);ptr1[x*3]=(ptr1[x*3]+ptr1[x*3+1]+ptr1[x*3+2])/3;ptr1[x*3+1]=ptr

7、1[x*3];ptr1[x*3+2]=ptr1[x*3];}}Timer1->Enabled=true;}//---------------------------------------------------------------------------void__fastcallTForm1::MultiCapture1ReceiveImage(TObject*Sender){//}//------------------------------------------------------------

8、---------------void__fastcallTForm1::Button2Click(TObject*Sender){MultiCapture1->Start();}//---------------------------------------------------------------------------void__fastcallTForm1

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。