摘 要:為了解決集裝箱船舶貝位圖由以往人工繪制帶來的各種問題,達到由終端用戶在作業現場應用計算機自動繪制的目的,采用DOTNET Framework封裝的GDI+接口及其相關方法,通過在VISUAL Basic.NET 編程環境中實現終端用戶繪制一個基礎網格,根據每次鼠標點擊的網格位置、點的顏色以及二次點擊的水平和垂直距離,判斷如何繪制貝位矩陣,應用GDI+實現貝位繪制,獲得了以鼠標拖動或點擊的方式繪制集裝箱貝位圖的模式,得到了一種通用的使用GDI+技術動態創建集裝箱貝位圖的方法。
關鍵詞:貝位; GDI+; 自定義圖形; 集裝箱
中圖分類號:TN91934 文獻標識碼:A 文章編號:1004373X(2012)22002102
DOTNET Framework 為操作圖形提供了 GDI+ 應用程序編程接口,GDI+ 是 Windows 圖形設備接口的高級實現,通過使用 GDI+,可以創建圖形、繪制文本以及將圖形圖像作為對象操作,軟件開發人員可以使用 GDI+ 在 Windows 窗體和控件上方便地呈現圖形圖像,近年來集裝箱發展突飛猛進,隨著大型集裝箱船舶、集裝箱碼頭及集裝箱場站的建設,傳統人工繪制集裝箱貝位圖的方法已不能滿足現場作業人員的需要,信息系統應用也在向圖形化發展,由軟件開發人員來繪制圖形已經不能滿足終端用戶的需求,很多場景需要終端用戶自己繪制圖形,本文描述了在Visual Basic.NET編程環境中如何開發用戶自定義集裝箱貝位圖的編程方法,使用戶可以方便地以鼠標點擊的方式繪制集裝箱貝位圖。
1 設計思路
(1) 創建一個PictureBox,重寫它的Paint事件\[1\],以其零坐標為基點,繪制一個10行20列的網格(單格長寬均為20),并在左端標注貝層,上端標注貝列編號;
(2) 重寫PictureBox的MouseDown事件,判斷是否為左鍵點擊,右鍵點擊無效,二次左鍵點擊為一組,定義一個mark變量,用以鑒別哪兩次點擊為一組\[2\];
(3) 鼠標點擊事件中根據點擊的位置計算選擇的網格,在第一次有效點擊時根據坐標計算網格、取網格的顏色并記錄在內存中\[3\],用紅色畫筆填充該網格;
(4) 在第二次有效點擊時同樣計算所選擇的網格,并判斷網格的顏色,比較二次所選網格的橫縱坐標,用不同的顏色填充二次選擇網格形成的矩陣\[4\];
(5) 當二次所選網格的顏色都不等于藍色時,用藍色填充網格矩陣,示意定義貝位;
(6) 當二次所選網格的顏色都等于藍色時,用系統色填充網格矩陣,示意取消已定義的貝位\[5\];
(7) 當第一個所選網格為藍色、第二個所選網格為紅色時(二次點擊選擇了同一個網格),用系統色填充該網格\[6\],示意取消該貝位的定義;
(8) 當第一個所選網格為藍色、第二個所選網格不是藍色也不是紅色時(第一次選擇了已定義的貝位,第二次選擇了未定義的貝位),用藍色填充該第一個網格,示意取消本次定義貝位的操作\[7\];
(9) 當第一個所選網格不是藍色、第二個所選網格是藍色時(第一次選擇了未定義的貝位,第二次選擇了已定義的貝位),用系統色填充該第一個網格\[8\],示意取消本次定義貝位的操作;
(10) 當第二個所選網格的橫/縱坐標小于第一個所選網格的橫/縱坐標時(默認從左上向右下繪圖,否則為無效定義),如果第一個所選網格為藍色則用藍色填充,否則用系統色填充,示意取消本次定義貝位操作\[9\]。
2 實現方法
(1) 定義相關變量,用以執行畫筆操作或存儲相關屬性\[10\],重寫PictureBox的Paint事件,繪制網格并標注貝行和貝列編號,主要代碼如下:
′繪制單格長寬均為20的10行20列的網格
g_line.DrawRectangle(pen_line,20 + 20 * i,20 + 20 * j,20,20)
′繪制貝列編號
g_line.DrawString(i,Me.Font,Brushes.Black,20 * i + 6,6)
′個位數的列編號
g_line.DrawString(i,Me.Font,Brushes.Black,20 * i + 2,6)
′十位數的列編號
g_line.DrawString(80 + j * 2,Me.Font,Brushes.Black,2,20 * 10 + 5 20 * j)
′繪制貝層號
(2)重寫PictureBox的MouseDown事件,執行定義貝位操作,主要代碼如下:
p.X = e.X,p.Y = e.Y
′取當前點的橫縱坐標
rectx = p.X / 20,recty = p.Y / 20
′取當前選擇網格左上角的橫縱坐標
rectx = Fix(rectx) * 20,recty = Fix(recty) * 20
color1 = rbmp.GetPixel(e.X,e.Y)
′取第一個所選網格的顏色
rect1_x = point1.X / 20,rect1_y = point1.Y / 20
′取第一次選擇網格左上角的橫縱坐標
rect1_x = Fix(rect1_x) * 20,rect1_y = Fix(rect1_y) * 20
′用紅色填充第一次選擇的網格
rbmpgraphics.FillRectangle(bru_first,rect1_x + 1,rect1_y + 1,19,19) ptbox_board.Refresh()
point2.X = e.X,point2.Y = e.Y
′取第二次點擊的橫縱坐標
color2 = rbmp.GetPixel(e.X,e.Y)
′取第二個所選網格的顏色
rect2_x = point2.X / 20
′取第二次選擇網格左上角的橫縱坐標
rect2_x = Fix(rect2_x) * 20,rect2_y = point2.Y / 20,rect2_y = Fix(rect2_y) * 20
m = (rect2_x rect1_x) / 20
′二次所選網格之間的橫網格的數量
n = (rect2_y rect1_y) / 20
′二次所選網格之間的縱網格的數量
′當二次所選網格的顏色都不等于藍色時用藍色填充網格矩陣
rbmpgraphics.FillRectangle(bru_fill,rect1_x + 20 * j + 1,rect1_y + 20 * k + 1,19,19)
′當二次所選網格的顏色都等于藍色時,用系統色填充網格矩陣
rbmpgraphics.FillRectangle(bru_sys,rect1_x + 20 * j + 1,rect1_y + 20 * k + 1,19,19)
′當第一個所選網格為藍色、第二個所選網格為紅色時,用系統色填充該網格
rbmpgraphics.FillRectangle(bru_sys,rect1_x + 1,
rect1_y + 1,19,19)
′當第一個所選網格為藍色、第二個所選網格不是藍色也不是紅色時,用藍色填充該第一個網格
rbmpgraphics.FillRectangle(bru_fill,rect1_x + 1,
rect1_y + 1,19,19)
′當第一個所選網格不是藍色、第二個所選網格是藍色時,用系統色填充該第一個網格
rbmpgraphics.FillRectangle(bru_sys,rect1_x + 1,
rect1_y + 1,19,19)
′當第二個所選網格的橫/縱坐標小于第一個所選網格的橫/縱坐標時,恢復第一個網格的顏色
rbmpgraphics.FillRectangle(bru_fill,rect1_x + 1,
rect1_y + 1,19,19)
rbmpgraphics.FillRectangle(bru_sys,rect1_x + 1,
rect1_y + 1,19,19)
3 結 語
形象、直觀的圖形化信息管理系統給現場應用人員帶來了極大的方便,不僅提高了工作效率,而且可以解決以往依賴人工不能解決的問題,通過演示程序,實現了在VISUAL Basic.NET編程環境中如何應用GDI+使用戶可以自定義集裝箱貝位圖的方法。作者已把本文的實現方法應用到連云港中理外輪理貨信息管理系統中,用戶使用起來形象、直觀、方便,得到了用戶的一致好評。通過本文示例,希望能增進大家對文中涉及到的相關技術的了解,為以后編程實現中遇到類似的需求提供實踐基礎。
參 考 文 獻
[1] 王小科.C#開發實戰寶典[M].北京:清華大學出版社,2010.
[2] NAGEL C, EVJEN b, GLYNN Jay, et al.C#高級編程[M].北京:清華大學出版社,2008.
[3] 埃斯波西托.Microsoft.NET企業級應用架構設計[M].陳黎夫,譯.北京:人民郵電出版社,2010.
[4] 張紅軍,耿隨心.Visual C++ 6.0編程詳解[M].北京:科學出版社,2003.