顏色的控制

摘要:顏色的控制

電腦的顏色是由RGBA構成

在32bit繪圖品質的設定下, 一個點得要佔據4個BYTE

R: Red

G:Green

B:Blue

A:Transperant

各是由0~255的數字構成, 共四個BYTE, 但可能會因為螢幕設定的模式不一樣, 以上僅供參考

繪圖過程中, 常常會需要用到顏色, 以下是一些程式中選擇顏色的技巧

        Dim 顏色 As Color = Color.Yellow

        Me.PictureBox1.BackColor = 顏色

 

這是最簡單的方式, 直接利用內建的常數來選擇想要的顏色, 但這種方式有缺點

通常會較為常用就是紅藍黃綠這些一般的顏色, 其他的顏色還要一個一個在那邊試, 很麻煩

 

 

        Dim 顏色 As Color = Color.FromArgb(252, 250, 150)

        Me.PictureBox1.BackColor = 顏色

 

這種我最喜歡用, 因為可以利用繪圖軟體去試出一種喜歡的顏色, 把它的RGB數值抄過來代入就好

可以顯示出任何想要的顏色, 像是幫客戶做東西的時候, 這種配合法可以完全的做出客戶想要用的顏色

 

 

        If Me.ColorDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Me.PictureBox1.BackColor = Me.ColorDialog1.Color
        End If

 

也可以由對話框來顯示顏色, 畫面上需要先拉一個colordialog顏色選擇對話框物件

或是自己動態產生那個物件也可以

 

 

        Dim 顏色 As Color = Color.FromArgb(0, 252, 250, 150)

        Me.PictureBox1.BackColor = 顏色

 

這種配色方式就又加入了透明度的數值, 配出來會有點半透明效果, 自己試囉

我的作法一定是搭配繪圖軟體, EX: photoimpact, 可以精準的配出想要的

 

        Me.PictureBox1.BackColor = Color.FromArgb(Me.TB透明色.Value, Me.TB紅色.Value, Me.TB綠色.Value, Me.TB藍色.Value)
        Me.txt配色結果.Text = Me.TB紅色.Value.ToString + "," + Me.TB綠色.Value.ToString + "," + Me.TB藍色.Value.ToString

這種作法就是畫面上拉四個trackbar , 分別控制RGBA四個色層, 每一個的maximum屬性設定為255

minimum屬性設定為0

直接拉動這四個trackbar就可以直接看到在畫面上的配色效果

還滿方便

 

        Dim C As Color = Color.FromKnownColor(KnownColor.ActiveBorder)
        Me.PictureBox1.BackColor = C

還有這種從以知顏色來選的, 不過這更少用了, 但有時候和網頁溝通的時候偶而會用上

順著天賦做事,逆著個性做人生命, 就該浪費在美好的事物上