作者wtchao (一条长围巾)
看板Rounders
标题Re: [卡卡] 闷啊
时间Fri May 18 12:41:11 2007
※ 引述《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