Why don't you use Agraham's graphics library? I have used it for my CAD program and it has all that I required.
Michael
Ofcause I will buy the license....not just yet.buy the program then all your problems are over!
Bitmap.SetPixel(x,y,RGB(R,G,B))
Bitmap.GetPixel returns such values as
-1
-330010
-1457575
etc .They don't look like RGB
Dim Type (R,G,B) clr
clr() = GetRGB(Bitmap.GetPixel1(x,y))
Msgbox("Red=" & clr.R & " Green=" & clr.G & " Blue=" & clr.B)
Do you really need the R,G,B values and what for ?
You can use a variable for the color, like col
You can convert a color to RGB with:
Code:
Dim Type (R,G,B) clr
clr() = GetRGB(Bitmap.GetPixel1(x,y))
Msgbox("Red=" & clr.R & " Green=" & clr.G & " Blue=" & clr.B)
Probably I've spent too much time at my comp today
ToastMessageShow(bmpBackground.GetPixel(20,20),True)
Dim Type (R,G,B) clr
clr() = GetRGB(bmpBackground.GetPixel1(20,20))
Msgbox("Red=" & clr.R & " Green=" & clr.G & " Blue=" & clr.B)