Comment sauvegarder une image dans une picturebox au format jpg

J'ai été en mesure d'enregistrer un fichier sous un fichier .jpeg, mais l'image ne se charge pas, quiconque a une suggestion?

    Private Sub Btnconfirm_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnconfirm.Click

        MsgBox("A receipt will now be saved to your files", vbOKOnly, "Thank you for your purchase")

        SaveFileDialog1.ShowDialog()
        MsgBox("Thank you for choosing Tiny Theatre, have a nice day.", vbOKOnly, "Thank you")
        Me.Close()
    End Sub

    Private Sub SaveFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles SaveFileDialog1.FileOk
        Dim FileToSaveAs As String = SaveFileDialog1.FileName

        Dim objwriter As New System.IO.StreamWriter(FileToSaveAs)
        objwriter.Write(PictureBox1)
        objwriter.Close()
    End Sub
Après l'image enregistre, il apparaît là où je l'enregistre (comme il se doit), mais l'image ne s'ouvre pas, ce que je fais mal?
Ce type de contrôle est PictureBox1? Avez-vous regardé le contenu du fichier généré dans un éditeur hexadécimal? L'image de l'ouvrir si vous modifiez l'extension à autre chose, comme .png, .gif, .bmp, etc?
Désolé, je ne suis pas sûr de ce que tu veux dire
Si vous n'êtes pas sûr des éditeurs hexadécimaux, fine. Avez-vous essayé d'ouvrir le fichier dans le bloc-notes? La plupart du fichier sera probablement ressembler à ordures, mais quelque part entre les premiers caractères doivent être JFIF.
Je peux aussi dire que vous êtes très vague avec certains de vos commentaires? l'image ne s'ouvre pas - comment avez-vous essayé de l'ouvrir, et ce qui s'est passé? Quels messages d'erreur (le cas échéant) avez-vous vu? il ne sera pas enregistrer le fichier arrêt complet - que voulez-vous dire par cela? Code semble fonctionner OK mais le fichier n'apparaît pas dans l'Explorateur Windows? Un message d'erreur a été signalée en tentant de sauver le fichier? Vague et en laissant de côté les détails qui vous font qu'il est très difficile pour nous de vous aider.

OriginalL'auteur Boats | 2013-05-10

  1. 4

    Ne l'ai pas essayé, mais cela peut-il le faire?

    Private Sub SaveFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles SaveFileDialog1.FileOk
    Dim FileToSaveAs As String = System.IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.Temp, SaveFileDialog1.FileName)
    PictureBox1.Image.Save(FileToSaveAs, System.Drawing.Imaging.ImageFormat.Jpeg)
End Sub

    Si vous avez besoin d'encoder les paramètres (comme la compression jpeg), vous aurez besoin d'une surcharge de la méthode de sauvegarde. Voir http://msdn.microsoft.com/en-us/library/system.windows.forms.picturebox.image.aspx et http://msdn.microsoft.com/en-us/library/system.drawing.image.aspx

    Le code fourni enregistre le contrôle picturebox dans une forme sérialisée dans un fichier qui a une extension jpeg. Le renommage d'un text.txt fichier text.jpg n'est pas valide image jpg. C'est la même chose.

    Je lui ai donné un essai et ne pas enregistrer le fichier à l'arrêt complet.
    Ce type de contrôle est PictureBox1? Est-il un contrôle PictureBox?
    Juste un PictureBox
    C'est peut-être parce FileToSaveAs contient uniquement un nom de fichier et le chemin n'est pas complet. J'ai édité le code de sorte que le fichier est enregistré dans le répertoire temp.
    Je dois noter, il s'agit essentiellement de faire une capture d'écran de certaines zones de texte et les zones de liste modifiables avec un picturebox

    OriginalL'auteur nickvane

  2. -1
    Private Sub SaveFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles SaveFileDialog1.FileOk
    Dim FileToSaveAs As String = System.IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.Temp, SaveFileDialog1.FileName)
    PictureBox1.Image.Save(FileToSaveAs, System.Drawing.Imaging.ImageFormat.Jpeg)
End Sub

    OriginalL'auteur frs