cs_hippo92210b
Messages postés59Date d'inscriptionlundi 12 février 2007StatutMembreDernière intervention 9 décembre 2009
-
29 août 2009 à 12:18
cs_hippo92210b
Messages postés59Date d'inscriptionlundi 12 février 2007StatutMembreDernière intervention 9 décembre 2009
-
29 août 2009 à 13:32
Bonjour,
Voila, je travaille sur une application de partage d'image, mais je bloque au niveaux du transfert (par winsock), voila mon code :
FROM1 :
Dim a() As Byte
Private Sub Timer1_Timer()
a = PictureToArray(Picture1.Picture())
b.SendData a
End Sub
FORM2 :
Dim Data() As Byte
Private Sub a_DataArrival(ByVal bytesTotal As Long)
a.GetData Data
ArrayToPicture Data, Picture2.Image
Picture2.Refresh
End Sub
Voila, les fonction PictureToArray et ArrayToPicture sont des fonction qui permette de TRANSFORMER L'IMAGE D'UNE PICTUREBOX EN UN TABLEAU DE BYTES et inversement.