亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 學院 > 開發設計 > 正文

VB圖像處理之像素的獲取和輸出

2019-11-18 17:41:26
字體：大 中 小
來源：轉載
供稿：網友
要處理一個圖像，首先要獲得該圖像的像素值，而VB本身提供的PICTURE控件雖然可以打開很多類型的圖片，但是它提供的那個POINT方法讀取像素實在是太慢。而使用GetPixel這個API的速度也快不到哪里去，因為PIONT方法本身就是對于GetPixel的一個包裝。

　　在VB中要快速獲取一幅在PICTURE中打開的圖像比較快速的方法是使用DIB方法，當然還有DDB方法，不過使用DDB方法還需要考慮不同顏色深度的圖像的分別處理，在程序的實現上要相對復雜，而使用DIB方法則不必，并且在處理速度上比DDB方法也慢的有限。

　　過程一：獲得一個在PICTURE控件中打開的圖像的所有像素。

->PublicSubDibGet(ByValIdSourceAsLong,XBeginAsLong,ByValYBeginAsLong,ByValXEndAsLong,ByValYEndAsLong)
　DimiBitmapAsLong
　DimiDCAsLong
　DimIAsLongDim
　DimWAsLong
　DimHAsLong

　OnErrorGoToErrLine
　Done=False
　TimeGet=timeGetTime
　InPutWid=XEnd-XBegin
　InPutHei=YEnd-YBegin
　W=InPutWid 1
　H=InPutHei 1

　I=(Bits/8)-1
　ReDimColVal(I,InPutWid,InPutHei)
　Withbi24BitInfo.bmiHeader
　　.biBitCount=Bits
　　.biComPRession=0&
　　.bEndSub->

　　在這個過程中所用到的只是一些參數的設定和API的調用，不涉及算法。

　　過程二：圖像輸出的過程：

->PublicSubDIBPut(ByValIdDestinationAsLong)
　DimWAsLong
　DimHAsLong

　OnErrorGoToErrLine
　Done=False
　TimePut=timeGetTime

　W=OutPutWid 1
　H=OutPutHei 1

　Withbi24BitInfo.bmiHeader
　　.biWidth=W
　　.biHeight=H
　　LineBytes=((W*Bits 31)And&HFFFFFFE0)/8
　　.biSizeImage=LineBytes*H
　EndWith
　SetDIBitsToDeviceIdDestination,0,0,W,H,0,0,0,H,ColOut(0,0,0),bi24BitInfo.bmiHeader,0

　Done=True
　TimePut=timeGetTime-TimePut
　ExitSub
ErrLine:
　MsgBoxErr.Description
EndSub->

　　下面解釋一下在過程中到的全局變量和數據結構，以及API的定義。

　　API定義：

　　刪除一個DC

->PrivateDeclareFunctionDeleteDCLib"gdi32"(ByValhdcAsLong)AsLong->

　　刪除一個對象

->PrivateDeclareFunctionDeleteObjectLib"gdi32"(ByValhObjectAsLong)AsLong->

　　選擇當前對象

->PrivateDeclareFunctionGetCurrentObjectLib"gdi32"(ByValhdcAsLong,ByValuObjectTypeAsLong)AsLong->

　　獲取DIB

->PrivateDeclareFunctionGetDIBitsLib"gdi32"(ByValaHDCAsLong,ByValhBitmapAsLong,ByValnStartScanAsLong,ByValnNumScansAsLong,lpBitsAsAny,lpBIAsBitMapInfo,ByValwUsageAsLong)AsLong->

　　獲取系統時間

->PrivateDeclareFunctiontimeGetTimeLib"winmm.dll"()AsLong->

　　數據結構定義：

->PrivateTypeBitMapInfoHeader'文件信息頭——BITMAPINFOHEADER
　biSizeAsLong
　biWidthAsLong
　biHeightAsLong
　biPlanesAsInteger
　biBitCountAsInteger
　biCompressionAsLong
　biSizeImageAsLong
　biXPelsPerMeterAsLong
　biYPelsPerMeterAsLong
　biClrUsedAsLong
　biClrImportantAsLong
EndType

PrivateTypeRGBQuad
　rgbBlueAsByte
　rgbGreenAsByte
　rgbRedAsByte
　'rgbReservedAsByte
EndType

PrivateTypeBitMapInfo
　bmiHeaderAsBitMapInfoHeader
　bmiColorsAsRGBQuad
EndType->

　　這三個數據結構都是在DIB中不可缺少的。我們不必深究，只是按照順序復制粘貼直接使用就是了。

　　過程中用到的全局變量：

->PrivateConstBitsAsLong=32'顏色深度，這里把所有圖像都按照32位來處理
PublicDoneAsBoolean'用于標記一個過程是否結束
PublicTimeGetAsLong'用于記錄輸入過程處理所花費的時間
PublicTimePutAsLong'用于記錄輸出過程處理所花費的時間
DimColVal()AsByte'用于存放從DIB輸入的像素值
DimColOut()AsByte'用于存放向DIB輸出的像素值
DimInPutHeiAsLong'用于記錄輸入圖像的高度
DimInPutWidAsLong'用于記錄輸入圖像的寬度
Dimbi24BitInfoAsBitMapInfo'定義BMP信息->

　　可以看出，我在輸入和輸出中使用了兩個不同的動態數組ColVal()和ColOut()，這么做是有道理的，因為我們不只是為了輸入和輸出圖像，中間還要對像素進行處理。包括圖像縮放、色彩調整、銳化、柔化等等處理，使用兩個不同的數組來分別存放數據更有利于程序的實現。

　　有些性急的朋友說不定已經把程序貼到工程里試用了，可是會發現根本不能輸出圖像。這是因為當你用DIBGET獲得的圖像還在ColVal()中呢，需要把它們放到ColOut()這個數組中去，DIBPUT這個過程才能起作用。

　　這里再給出一個用于數組整體移動數據的過程：

->PublicSubCopyData(ByValWAsLong,ByValHAsLong)
　DimLengthAsLong
　DimIAsLong
　DimLAsLong
　I=Bits/8
　L=I-1
　Length=(W 1&)*(H 1&)*I
　ReDimColOut(L,W,H)
　CopyMemoryColOut(0,0,0),ColVal(0,0,0),Length
Endsub->

　　API定義：

->PrivateDeclareSubCopyMemoryLib"kernel32"Alias"RtlMoveMemory"(pDestAsAny,pSrcAsAny,ByValByteLenAsLong)->

　　這時，我們就可以來試一下效果了：

　　把你的顯示器調到32位色。

　　將前面的所有API和變量定義全部貼到一個新建的模塊里

　　新建一個窗體，加兩個PICTURE控件：pictrue1,picture2一個按鈕command1

　　在pictrue1中加載一個圖片

　　在command1中寫如下代碼：

->subcommand1_click()
　Withpicture1
　　.ScaleMode=3
　　.BorderStyle=0
　　DibGet.hdc,0,0,.scalewidth,.scaleheight
　EndWith
　CopyDataInPutHei,InPutWid
　picture2.AutoRedraw=True
　DibPutpicture2.hdc
　picture2.refresh
endsub->

　　運行一下，按鈕按下，pictreu1中的圖片就立刻顯示到了picture2中。

　　這時，你可能會說，弄了這么半天就貼個圖？用PaintPicture不是就可以了嗎？

　　不錯，如果只是要貼個圖，確實不用這么麻煩，可是，我們后面要說的圖像處理部分將會用到前門得到的像素值。所以，這只是一個開始，我真正要講的東西還在后面呢。請大家繼續關注。->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
亚洲国产美女精品久久久久∴| 欧美成人中文字幕在线| 亚洲免费中文字幕| 一本色道久久88综合亚洲精品ⅰ| 中文日韩在线视频| 亚洲性av在线| 欧美亚洲激情在线| 日韩欧美视频一区二区三区| 91超碰中文字幕久久精品| 国产欧美精品在线播放| 成人性生交大片免费看视频直播| 亚洲国产精品久久久| 欧美做爰性生交视频| 欧美大片在线看免费观看| 亚洲аv电影天堂网| 亚洲天堂av在线免费观看| 欧美午夜视频在线观看| 亚州欧美日韩中文视频| 亚洲一区国产精品| 91sao在线观看国产| 欧美第一黄网免费网站| 欧美日韩在线观看视频小说| 国产精品视频白浆免费视频| 久久免费视频在线| 中文字幕亚洲情99在线| 91视频8mav| 亚洲成在人线av| 色综合亚洲精品激情狠狠| 亚洲欧美成人一区二区在线电影| 国产91精品久久久久久| 中日韩午夜理伦电影免费| 成人黄色av免费在线观看| 亚洲免费精彩视频| 91美女片黄在线观看游戏| 久久久久久噜噜噜久久久精品| 亚洲人成网站免费播放| 欧美成人精品激情在线观看| 国产精品色婷婷视频| 国产精品入口免费视频一| 精品视频在线导航| 欧美成人精品在线视频| 黑人精品xxx一区一二区| 最近2019中文字幕在线高清| 777777777亚洲妇女| 久久成年人免费电影| 91免费视频国产| 最近中文字幕mv在线一区二区三区四区| 久久久99免费视频| 精品毛片网大全| 久久精品国亚洲| 国产97色在线| 亚洲精品第一国产综合精品| 成人免费在线视频网站| 国产精品爱啪在线线免费观看| 久久免费视频观看| 亚洲在线www| 国产精品丝袜久久久久久不卡| 欧美性videos高清精品| 日韩电影免费观看中文字幕| 亚洲福利精品在线| www.99久久热国产日韩欧美.com| 国产mv免费观看入口亚洲| 成人深夜直播免费观看| 亚洲性线免费观看视频成熟| 国产精品88a∨| 91精品国产综合久久香蕉922| 精品国偷自产在线视频| 91国产中文字幕| 国产91成人video| 欧美一级片在线播放| 成人福利在线视频| 国产精品亚洲精品| 91夜夜未满十八勿入爽爽影院| 国语自产偷拍精品视频偷| 亚洲一区二区少妇| 久久免费视频这里只有精品| 777777777亚洲妇女| 九九热精品在线| 中文字幕在线看视频国产欧美| 国产精品免费一区二区三区都可以| 国产精品香蕉国产| 亚洲女人被黑人巨大进入al| 亚洲第一中文字幕| 国产日韩在线一区| 国产精品久久色| 91免费视频网站| 精品毛片三在线观看| x99av成人免费| 亚洲乱码国产乱码精品精| 日韩欧美福利视频| 亚洲国产古装精品网站| 国产精品主播视频| 亚洲成人精品视频在线观看| 国产美女扒开尿口久久久| 国产精品免费久久久久影院| 国产精品自产拍在线观看中文| 久久精品电影一区二区| 91精品视频在线播放| 国产成人免费91av在线| 91免费在线视频网站| 国产精品青草久久久久福利99| 日韩高清av一区二区三区| 人体精品一二三区| 777午夜精品福利在线观看| 一区二区日韩精品| 欧美性猛交xxxx免费看漫画| 久久精品中文字幕一区| 亚洲精品小视频在线观看| 一本色道久久88综合亚洲精品ⅰ| 欧美激情亚洲自拍| 2018中文字幕一区二区三区| 91成人免费观看网站| 日韩欧美国产骚| 久久国产精品久久国产精品| 91欧美精品成人综合在线观看| 欧美做受高潮1| 亚洲精品久久久久久下一站| 亚洲国产小视频在线观看| 久久久久久久色| 国产精品色婷婷视频| 国内精品模特av私拍在线观看| 日韩中文字幕在线播放| 狠狠色噜噜狠狠狠狠97| 午夜精品99久久免费| 亚洲白虎美女被爆操| 欧美日韩一区二区在线播放| 亚洲aa中文字幕| 日本一区二区三区在线播放| 91中文在线观看| 精品久久香蕉国产线看观看亚洲| 亚洲无亚洲人成网站77777| 欧美性猛交xxxx免费看久久久| 亚洲一区国产精品| 中文字幕九色91在线| 国产精品精品视频一区二区三区| 欧美成人中文字幕在线| 日韩亚洲综合在线| 亚洲精品不卡在线| 亚洲品质视频自拍网| 亚洲视频在线观看免费| 精品国产91久久久久久| 成人伊人精品色xxxx视频| 91精品视频免费| 在线精品播放av| 国产成人综合亚洲| 97精品国产97久久久久久| 日韩免费av一区二区| 亚洲人高潮女人毛茸茸| 热门国产精品亚洲第一区在线| 色青青草原桃花久久综合| 国产一区二区日韩| 国产日韩一区在线| 日韩大胆人体377p| 日韩在线www| 日韩欧美在线看| 成人美女av在线直播| 国产成人在线一区二区| 欧美大片在线免费观看| 中文字幕日韩av| 日韩视频免费在线观看| 日本韩国欧美精品大片卡二| 中文字幕免费精品一区高清| 国产精品99久久久久久www| 亚洲电影在线看|