摘要:圖形特效處理(1)
在程式設計的時候, 多少都會使用到圖形
但是使用圖形的時候, 往往不是載入圖形就算了
可能會需要在圖形上面加些文字, 或是其他圖形, 或是縮放, 或是改黑白, 改規格(色階/大小)...等等
以下利用GDI+內建功能來實做這些東西, 大概會連續發個幾十篇吧
另外未來這些文章會集結成書, 一本只談繪圖, 其他什麼都不講的書(其實是快寫好了^__^a)
1. 圖形的偏移, 縮放和旋轉
第一步: 首先要讀取圖形, 畫面上要有一個PictureBox1 物件
Dim G As Graphics= Me.PictureBox1.CreateGraphics Dim Img As Image = Image.FromFile("某個圖形檔")
第二步:依照想要的方式畫上去
Dim mx As New Drawing2D.Matrix mx.Translate(0, 80) mx.Rotate(-30) mx.Scale(1, 1.7) G.Transform = mx G.DrawImage(Img, 150, 150)其中Translate 方法為平移, 可以把這個圖形X軸不變, Y軸移動到80的位置
Rotate為旋轉, 把圖形逆時針旋轉30度
Scale為縮放, 把圖形依照X軸方向不變, Y軸方向放大1.7倍
最後把這個矩陣套用到圖形矩陣裡面就可以有想要的效果
這是一種我比較喜歡的作法, 因為繪圖矩陣可以做出很多很炫的效果
下一篇文章以後會慢慢來介紹繪圖矩陣的特殊功能
順著天賦做事,逆著個性做人生命, 就該浪費在美好的事物上