Picture

[neb84]

I have two questions:
1) is there a way that i can store a pixel from a picture box picture and place it into another picture box?
2)how can i save a picture box as a *.bmp


------------------
neb84

[Darkwraith]

2)how can i save a picture box as a *.bmp'

SavePicture Picture1.Picture, App.Path & "\Test.bmp"

[cyborg]

Originally posted by neb84
1) is there a way that i can store a pixel from a picture box picture and place it into another picture box?

Public Declare Function GetPixel Lib "gdi32" Alias "GetPixel" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Public Declare Function SetPixelV Lib "gdi32" Alias "SetPixelV" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long
 
Dim Color As Long
 
'Code for getting and setting the pixel
 
Color = GetPixel(Picture1.hDC, X, Y)
SetPixelV Picture2.hDC, X, Y, Color