【正文】 fPrint窗體的代碼省略，請(qǐng)讀者參考光盤詳細(xì)代碼。全景運(yùn)行的界面如圖1626所示。 該窗體中使用了大量的API函數(shù)來實(shí)現(xiàn)該功能。該窗體名稱為fFilter，通過菜單“Adjust224。 圖1627 濾鏡預(yù)覽窗體 圖1628 濾鏡選擇框關(guān)于數(shù)字圖像處理系統(tǒng)的核心功能和代碼，就介紹到此。該濾鏡窗體，選擇不同的濾鏡，其界面會(huì)根據(jù)該濾鏡的需要，顯示不同的選項(xiàng)。26．濾鏡效果查看窗體本系統(tǒng)提供了很多的濾鏡效果，通過主窗體的“Filter”菜單和“Adjust”菜單，可以對(duì)圖像進(jìn)行多種圖像的濾鏡處理。隨著圖像的進(jìn)一步放大，紅色的方框會(huì)越來越小。Panoramic”可以進(jìn)入到圖像全景窗體。Print】，可以彈出打印圖像的窗體，如圖1625所示。23．顯示圖像信息的窗體在主主窗體中，單擊菜單【View224。22．更改圖像大小的窗體在主窗體中，通過菜單“Edit224。在主界面中，通過菜單“Filter224。本系統(tǒng)能夠在各種常用的圖像格式之間進(jìn)行轉(zhuǎn)換。*.gif。其設(shè)計(jì)界面如圖1620所示。該控件的代碼省略，請(qǐng)讀者參考光盤詳細(xì)代碼。 該類的代碼省略，請(qǐng)讀者參考光盤詳細(xì)代碼。其界面如圖1617所示。如圖1616所示?！?jiǎng)?chuàng)建臨時(shí)DIB Call (x2 x1, y2 y1) Call (, x1, y1) 39?！淖兇笮?，然后將當(dāng)前圖像更改為被剪切的圖像 Call (x2 x1, y2 y1) Call () 39。Private Sub mnuCrop_Click(Index As Integer) Dim TmpDIB As New cDIB Dim x1 As Long, y1 As Long Dim x2 As Long, y2 As Long Select Case Index Case 0 39?？s小 End Select End If End With End Select pvWindowProc = CallWindowProc(m_OldWindowProc, hWnd, wMsg, wParam, lParam)End Function17．ucCanvas控件ucCanvas為自定義開發(fā)控件，用來作為顯示和處理圖像的容器。—?jiǎng)?chuàng)建回調(diào)函數(shù) m_OldWindowProc = SetWindowLong(, GWL_WNDPROC, AddressOf pvWindowProc)End Sub（2）pvWindowProc函數(shù)，回調(diào)函數(shù)；Private Function pvWindowProc(ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long Select Case wMsg Case WM_MOUSEWHEEL 39。該類的代碼省略，請(qǐng)讀者參考光盤詳細(xì)代碼。代碼省略，詳細(xì)代碼請(qǐng)參見光盤 14．mMisc模塊mMisc用于聲明一些系統(tǒng)中常用的函數(shù)。Public Sub HSLtoRGB(ByVal H As Single, ByVal S As Single, ByVal L As Single, R As Byte, G As Byte, B As Byte)39。計(jì)算飽和度 39。該模塊的代碼省略，請(qǐng)讀者參考光盤詳細(xì)代碼。圖1615 顏色選擇對(duì)話框10．mDialogEx模塊mDialogEx類主要用于創(chuàng)建帶圖像預(yù)覽功能的文件選擇對(duì)話框。該模塊的代碼省略，請(qǐng)讀者參考光盤詳細(xì)代碼?！?jiǎng)h除原始文件 On Error Resume Next Kill sFilename On Error GoTo 0 39。 Palette table/Indexes For lIdx = 0 To (2 ^ BPP) 1 aBI(lIdx * 4 + 41) = (lIdx) aBI(lIdx * 4 + 42) = (lIdx) aBI(lIdx * 4 + 43) = (lIdx) Next lIdx End If 39。H4D42 .bfSize = Len(tBIH) + IIf(BPP = 8, 4 * (2 ^ BPP), 0) + Walg * .bfOffBits = Len(tBFH) + Len(tBIH) + IIf(BPP = 8,4 *(2 ^ BPP), 0) End With 39。 14 bytes Dim tBIH As BITMAPINFOHEADER 39。5 cDIBPal類模塊cDIBPal類主要進(jìn)行創(chuàng)建各種調(diào)色板。代碼省略，詳細(xì)代碼請(qǐng)參見光盤 （17）Shift濾鏡39。代碼省略，詳細(xì)代碼請(qǐng)參見光盤 （13）ReplaceL濾鏡39。代碼省略，詳細(xì)代碼請(qǐng)參見光盤 （9）Outline濾鏡39。代碼省略，詳細(xì)代碼請(qǐng)參見光盤 （5）Emboss濾鏡39。由于篇幅限制，大部分的濾鏡效果圖，沒有貼在書上，讀者可以自己測(cè)試。下面將介紹部分重要濾鏡的代碼實(shí)現(xiàn)。代碼省略3．cDIBDither類模塊cDIBDither類主要進(jìn)行圖像顏色的處理，如將圖像進(jìn)行二值化處理、轉(zhuǎn)化成灰度圖調(diào)色板、轉(zhuǎn)換成彩色調(diào)色板等。判斷剪貼板是否為空 dsk_hWnd = GetDesktopWindow dsk_hDC = GetDC(dsk_hWnd) clp_hDC = CreateCompatibleDC(dsk_hDC) If (clp_hDC 0) Then clp_hObj = CreateCompatibleBitmap(dsk_hDC, , m_tBIH. biHeight) If (clp_hObj 0) Then clp_hOldObj = SelectObject(clp_hDC, clp_hObj) Call (clp_hDC) Call SelectObject(clp_hDC, clp_hOldObj) 39?！d入調(diào)色板 If ( = 8) Then 39。如果圖像不為空 If (GetObjectType(Picture) = OBJ_BITMAP) Then 39。通常在創(chuàng)建一個(gè)新的位圖、或者對(duì)一個(gè)圖像進(jìn)行旋轉(zhuǎn)、鏡像等處理時(shí)，都需要?jiǎng)?chuàng)建DIB位圖?！?jiǎng)?chuàng)建DIB m_hDIB = CreateDIBSection(m_hDC, m_tBIH, DIB_RGB_COLORS,m_lpBits,0, 0) If (m_hDIB 0) Then 39。 （1）Create函數(shù)，該函數(shù)創(chuàng)建一個(gè)位圖空間；Public Function Create(ByVal NewWidth As Long, ByVal NewHeight As Long, Optional ByVal BackColor As Long = vbBlack) As Boolean Dim tRect As RECT2 Dim hBrush As Long 39。 39。 實(shí)例實(shí)現(xiàn)本系統(tǒng)功能比較強(qiáng)大，因此包含了大量的文件，下面列出一些重點(diǎn)的文件：（1），該文件為系統(tǒng)的主界面，由菜單和工具欄組成 ；（2），該文件為圖像打印設(shè)置窗體；（3），該文件為圖像材質(zhì)編輯窗體；（4），該文件為圖像縮放設(shè)置窗體；（6），該文件為圖像屬性顯示窗體；（7），該文件為放大圖形時(shí)，快速查看目標(biāo)圖像的窗體；（8），該文件用于對(duì)文件進(jìn)行旋轉(zhuǎn)設(shè)置、以及進(jìn)行水平和垂直鏡像；（9），該文件用于查看圖像應(yīng)用各種濾鏡后的效果；（10），該文件為打開圖片時(shí)進(jìn)行圖片預(yù)覽；（11），該文件為類模塊，用于進(jìn)行圖像的基本操作；（12），該文件為類模塊，用于對(duì)圖像顏色進(jìn)行各種操作；（13），該文件為類模塊，用于對(duì)圖像進(jìn)行各種濾鏡操作；（14），該文件為類模塊，用于對(duì)圖像的模板進(jìn)行處理； （15），該文件為類模塊，用于對(duì)將當(dāng)前的圖像保存成其他文件格式；（16），該文件為類模塊，用于操作內(nèi)存中的圖像數(shù)據(jù)；（17），該文件為基本模塊，用于進(jìn)行系統(tǒng)的各種設(shè)置；（18），該文件為基本模塊，用于對(duì)鼠標(biāo)的滾輪進(jìn)行處理；（19），該文件為基本模塊，用于對(duì)文件進(jìn)行處理；（20），該文件為基本模塊，用于讀寫INI文件；（21），該文件為基本模塊，用于進(jìn)行HSL、RGB等顏色的轉(zhuǎn)換；（22），該文件為基本模塊，用于聲明各種GDI函數(shù)和變量；（23），該文件為基本模塊，用于創(chuàng)建打開圖像文件對(duì)話框，并且能夠進(jìn)行圖像預(yù)覽；（24），該文件為基本模塊，用于選擇圖像中的文件；（25），該文件為基本模塊，用于選擇文件夾；（26），該文件為自定義控件，用于作為圖像的畫布；（27），該文件為自定義控件，用于顯示圖像處理的各種信息；（28），該文件為自定義控件，用于顯示圖像處理的進(jìn)度；（29），該文件為自定義控件，用于顯示系統(tǒng)的工具欄。常用的LOG算子是5*5的模板，即。Sobel算子另一種形式是Isotropic Sobel算子，也有兩個(gè)，一個(gè)是檢測(cè)水平邊沿的即，一個(gè)是檢測(cè)豎直平邊沿的即。常用的邊緣檢測(cè)算子有如下幾種。在灰度相近的區(qū)域內(nèi)，這么做的結(jié)果使得該點(diǎn)的灰度值接近于0，而在邊界附近，灰度值有明顯的跳變，這么做的結(jié)果使得該點(diǎn)的灰度值很大，這樣就出現(xiàn)了上面的結(jié)果。它的原理很簡(jiǎn)單：假設(shè)有一條與原點(diǎn)距離為s，方向角為θ的一條直線，如圖1612所示。把一個(gè)點(diǎn)的特定長(zhǎng)度或形狀的鄰域稱作窗口，在一維的時(shí)候，中值濾波器是一個(gè)奇數(shù)個(gè)像素的滑動(dòng)窗口，窗口正中間的值用窗口內(nèi)各個(gè)像素的中值代替。鄰域平均法是一種在空間域上對(duì)圖像進(jìn)行平滑處理的最常用方法。因此這種消除圖像的噪聲及滿足彩色復(fù)制特殊需要的方法，在圖像處理中稱為圖像平滑。銳化的常用模板如下： ， ， （11）圖像平滑在輸入圖像的過程中，圖像可能存在各種寄生效應(yīng)，如可能受到各種噪聲源的干擾，混入各種高頻噪聲。由于常常無法事先確定輪廓的取向，因而挑選用于輪廓增強(qiáng)的微分算子時(shí)，必須選擇那些不具備空間方向性的和具有旋轉(zhuǎn)不變的線性微分算子。在圖像中，邊緣是由灰度級(jí)和相鄰域點(diǎn)不同的像素點(diǎn)構(gòu)成的。當(dāng)H在[00,1200]時(shí)：當(dāng)H在[1200,2400]時(shí)： 當(dāng)H在[2400,3600]之間時(shí)：（10）圖像銳化在圖像系統(tǒng)中由于攝影系統(tǒng)的聚焦不良和信號(hào)傳輸系統(tǒng)信號(hào)頻帶過窄，造成圖像中目標(biāo)輪廓的模糊是必然的。為了得到更美觀的鏡像顯示效果，具體操作時(shí)不能先顯示一幅正常圖像，然后再顯示反面圖像，而需要兩個(gè)圖像時(shí)從交叉點(diǎn)向外顯示，這樣將形成特殊的屏幕效果。也就是通過平移后的像素點(diǎn)的位置返回去求出原始點(diǎn)的像素位置，這樣就存在一個(gè)問題：如果新圖中有一點(diǎn)（x1，y1），如果變化得到的（x0，y0）不在原圖中則把該點(diǎn)的RGB值統(tǒng)一設(shè)成白色（255，255，255），平移后的圖像沒有縮放，移出的部分被截?cái)唷＃?）圖像平移初始坐標(biāo)為（x0，y0）的點(diǎn)經(jīng)過平移（tx，ty）（以向右，向下為正方向）后，坐標(biāo)變?yōu)椋▁1，y1）。在一幅灰階圖像上，信號(hào)的差異是通過灰度（或亮度）的明暗來體現(xiàn)的，高對(duì)比度意思是圖像上兩個(gè)不同觀察點(diǎn)一個(gè)非常暗，另一個(gè)非常亮，而低對(duì)比度表示兩點(diǎn)的相對(duì)亮度差別較小，當(dāng)在提高對(duì)比度時(shí)，圖像中的暗色調(diào)變得更暗，亮色區(qū)域變得更亮，而人眼在辯認(rèn)一件事物時(shí)，更多地是從色彩的差錯(cuò)對(duì)比中得出結(jié)論，因此更大的對(duì)比度會(huì)帶來更為醒目的效果。其中動(dòng)態(tài)閾值法是一個(gè)變換方法，即在一個(gè)nn的子塊中，所有具有灰度級(jí)超過平均灰度值到255數(shù)據(jù)點(diǎn)變換1（即黑色），而另一些低于平均灰度值的數(shù)據(jù)點(diǎn)則變換到1（即白色）。不同的灰度圖像，其灰度深度是存在差異的。實(shí)際的位圖（Bitmap）中，0對(duì)應(yīng)于方法二：求出每一個(gè)像素點(diǎn)R、G、B三個(gè)分量的最大值，然后把這個(gè)最大值賦給原來像素點(diǎn)的R、G、B三個(gè)分量。它對(duì)類或私有設(shè)備場(chǎng)景無效Private Declare Function ReleaseDC Lib user32 (ByVal hWnd As Long, ByVal hDC As Long) As Long（21）OpenClipboard函數(shù)打開剪貼板Private Decla