folder Tahribat.com Forumları
linefolder Visual Basic - Basic - PicBasic ve Türevleri
linefolder VB Pixel Rengini Almak



VB Pixel Rengini Almak

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    HighNitro
    HighNitro's avatar
    Kayıt Tarihi: 21/Ağustos/2005
    Erkek
    bi oyun oynuyorum ona yazmaya calıstım :) 
    *sorun su programa x,y kordinati tanımlıcaz bu tanımladıgımız noktadaki renk degisince program klaveyeden 8 tusuna basacak mesela 
    *ben programa kordinati felan okutuyorum
    *sadece renk kodunu  tanımlatamıyorum sartda.
     
    Bunu nasıl yaparız hocalar bilen arkadaşlar yardımcı olursa sevinirim :D 
     
     
    @konu acarken doru duzgun baslik yazalim..
    Reply With Quote Alıntı yap
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Hunter
    j4x
    j4x's avatar
    Kayıt Tarihi: 16/Temmuz/2005
    Erkek

    getpixellemi aliyorsun rengi ? bi ornek vereim.

    Denemek icin bi picture box ekle picture1 adli backcolorunu siyah yap.(#000000)

    'Api declare :

    Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long

     

    Dim color As Long, r As Byte, g As Byte, b As Byte, rgb As String

    color = GetPixel(Picture1.hdc, 7, 5)

    r = color Mod 256
    b = Int(color / 65536)
    g = (color - (b * 65536) - r) / 256
    Dim rgb As String
    rgb = Hex(r) & Hex(g) & Hex(b)
    MsgBox rgb

    Gördügün gibi 3 byte rgb formatinda verior rengi.Beyaz icin

    if rgb="FFFFFF" then

    msgbox "beyaz"

    end if

     

    gibisindende sinayabilrsin.

    The king is bleeding.
    Reply With Quote Alıntı yap
Toplam Hit: 2802 Toplam Mesaj: 2