※ 引述《wtchao (一條長圍巾)》之銘言：
: ※ 引述《stary (........)》之銘言：
: : 我一開始還以為是卡卡很悶 -_-
: me2
: and 又是clifflu發表的
: 我以為有八掛了
借問一下，又是vb的問題
我寫一個程式，主要把圖叫到picture box 中
再一點一點的抓顏色
如底下, 因為主要是要取得一個圓內的灰階值的加總
------------------------------------------------------------------------
For I = 0 To IntWidth Step 1
For J = 0 To IntHeigh Step 1
If ((((I - X) ^ 2 + (J - Y) ^ 2) ^ 0.5) <= Ridual) And ((((I - X) ^ 2 +
(J - Y) ^ 2) ^ 0.5) > Ridual - 125) Then
num = num + 1
Color1 = Picture1.Point(I, J)
R = Color1 And &HFF&
G = (Color1 And &HFF00&) \ &H100
B = (Color1 And &HFF0000) \ &H10000
Color2 = (R * 76 / 255 + G * 150 / 255 + B * 29 / 255) + Color2
If (R * 76 / 255 + G * 150 / 255 + B * 29 / 255) > 200 Then
Color3 = Color3 + 1
Picture1.PSet (I, J), RGB(255, 0, 0)
End If
End If
Next J
Next I
---------------------------------------------------------------------------
我想問一下，因為這種方法所能讀的圖完全受限於螢幕解析度
太大的就不行了
有方法可以直接在記憶體中做，不用叫到picture box上嗎
--
能愛一個人是幸福的，為她付出，看著她快樂就好，心中喜怒哀樂只為她
能堅持一個人也是幸福的，不論如何，心中，只認定她是一生中的伴侶
當愛的人與堅持的人相同，那是最大的幸福，可以相愛相伴到此生的盡頭，一世無悔
當這分別是兩個人時，我只能選擇堅持，因為承諾像奈何橋，一過就回不去了，只能
一輩子遵守；而愛的人，我只好為她付出，看著她幸福，看著她快樂，這，雖然無奈
我相信，無奈的終點，就是習慣。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.52.210