Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : transfert d'image avec winsock entre 2 image1.picture [ Archives Visual Basic / Graphique ] (robapt)

mercredi 20 avril 2005 à 18:25:32 | transfert d'image avec winsock entre 2 image1.picture

robapt

Salut je voudrait savoir si quelqun sait comment faire un envoie d'image (dans une image.picture) avec winsock dans une autre image.picture

Jattent les réponse

GAGA

mercredi 20 avril 2005 à 19:53:26 | Re : transfert d'image avec winsock entre 2 image1.picture

jack

Administrateur CodeS-SourceS
Salut
Oui, faisable : il suffit de découper chaque tache :
- Charger en mémoire la chaine qui représente l'image en passant par un fichier : SavePicture
- Transférer le fichier entre deux applications avec Winsock : des centaines de sources le font sur ce site
- Remettre les données du fichier reçu dans une image : avec LoadPicture

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)

vendredi 22 avril 2005 à 14:12:26 | Re : transfert d'image avec winsock entre 2 image1.picture

robapt

Voici le code que j'ai fait :
au fait j'ai un peu modifié ,maintenant ,cela passe d'une Image1.picture à une autre Image1.picture :


Dans la première Form :

SavePicture Image1.Picture, App.Path & "\temp.bmp"
    cLenFile = FileLen(App.Path & "\temp.bmp")
    Form1.Winsock.SendData "FILE:" & FileLen(App.Path & "\temp.bmp")
   
Et dans la seconde Form :

If Receive = True Then
    Avance = Avance + Len(cdata)
    Open App.Path & "\temp2.bmp" For Append As #1
        Print #1, data;
    Close #1
    If Avance = LenTotal Then Form3.Image1.Picture = LoadPicture(App.Path & "\temp2.bmp")
End If
If data Like "FILE:*" And Receive = False Then
    LenTotal = Mid(data, 6, Len(data))
    Receive = True
    Kill App.Path & "\temp2.bmp"
    Avance = 0
    Wck.SendData "READY"
End If

Mais avant tous sa je me connecté entre les deus Form par winsock et dans la seconde Form ,je créé un bouton "transferer l'image" pour que celui-ci envoie a la première Form l'ordre d'envoyer l'image.

Seraiez vous comment faire pour que quand la seconde Form recoit l'image ,celle-ci ne soit pas enregistrer dans App.path & "\temp.bmp" et supprimé après mais directement tranferé dans l'Image1.picture sans être enregitrer

OUUFFF

Bon ba c'est tout lol

ALLE BYE

GAGA




Cette discussion est classé dans : winsock, image, transfert, picture, image1


Répondre à ce message

Sujets en rapport avec ce message

retourné une image mais pas dans une picturebox mais dans une image1.picture [ par toto ] retourné une image mais pas dans une picturebox mais dans une image1.picture car la fonction paint picture n'a pas l'air de marcher (image1.paintictur retourné une image non pas dans picturebox mais dans image1.picture [ par toto ] retourné une image non pas dans picturebox mais dans image1.picture car j'ai tout essayer et paintpicture ne marche pas (image1.paintpicture et tout l Transfert d'image par Winsock [ par ICIoBRa ] Voila j'aimerai envoyer une image récupérée dans le ClipBoard, et l'envoyer par Winsock, et la récupérer une fois envoyée.Merci de vos réponses :]ICIo Transfert d'image par Winsock [ par ICIoBRa ] Voila j'aimerai envoyer une image récupérée dans le ClipBoard, et l'envoyer par Winsock, et la récupérer une fois envoyée.Merci de vos réponses :]ICIo pb redimensionnement image [ par chris21 ] Bonjour, je recherche une méthode pour redimensionner et sauvegarder une image, j'ai essayé ça: Image1.Picture.Width = Image1.Picture.Width / 2Image1. Mon redimensionnement d'image marche mais pas à la bonne taille pourquoi ? [ par zoglub14 ] Bonjour à tous,Données1 Picturebox en visible = False de taille 15479 x 10376 (Twips)1 control image en visible = true et stretch= false taille 5835 x Redimensionnement d'image impossible [ par zoglub14 ] Bonsoir à tous,J'essaie desesperement de redimensionner une image chargé dans une PictureBox, pour ensuite la sauvegarderPour cela j'ai crée une deuxi condition pour une image non vide [ par taj88 ] Bonjour ,voilà j'appele une procedureUserForm1.Image1.Picture = LoadPicture("c:/..........")If UserForm1.Image1.Picture "" thencopieEndifMet cela me Comment fair pour change une image dans une Picture [ par MatHack_74 ] Bonjour Voila je debut en programamtion sur Visual Basic et je voudrai savoir comment fair pour quand je clique sur un texte dans une ComboBox , sa pu picture [ par c303344 ] Bonjour,je recherche la solution pour copier dans une picturebox ou image une partie d'une autre image de reférence.merciFishton


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Appels d'offres

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,265 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.