Come faccio a salvare una picturebox con Savefiledialog ???

[.Avanatsia.]

Ciao a tutti :-)


ho un piccolo problema con visual basic 2008

Non riesco a salvare i dati di un form!! Mi spiego meglio:

ho 2 picturebox una a destra e una a sinistra e una texbox in alto

Il programma permette di fare il dragandrop dalla picture box a destra ( dove c'è un immag )
alla picturebox a sinistra e di scrivere un testo nella textbox in alto;

ora vorrei che, premendo su un bottom "salva", mi salvasse il contenuto delle due picturebox e della texbox in un file.

Ho gia implementato la funzione Savefiledialog collegandola al bottom, poi però mi blocco che devo fare? ho cercato in giro sul web ma trovo sempre riferimenti a come salvare in un file di testo
facendo: w as IOstream ecc...
w.write(textbox1.text) ma la picturebox??

GRAZIE ANTICIPATAMENTE A TUTTI :-

[Alexander777]

Avanatsia, vengo in tuo aiuto.

Anchio ho avuto la tua stessa difficoltà, ma infine una soluzione l'ho trovata.

Ecco qua il codice su come salvare una immagine

Private Sub Button2_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button2.Click
' Displays a SaveFileDialog so the user can save the Image
' assigned to Button2.
Dim saveFileDialog1 As New SaveFileDialog()
saveFileDialog1.Filter = "JPeg Image|*.jpg|Bitmap Image|*.bmp|Gif Image|*.gif"
saveFileDialog1.Title = "Save an Image File"
saveFileDialog1.ShowDialog()

' If the file name is not an empty string open it for saving.
If saveFileDialog1.FileName <> "" Then
' Saves the Image via a FileStream created by the OpenFile method.
Dim fs As System.IO.FileStream = Ctype _
(saveFileDialog1.OpenFile(), System.IO.FileStream)
' Saves the Image in the appropriate ImageFormat based upon the
' file type selected in the dialog box.
' NOTE that the FilterIndex property is one-based.
Select Case saveFileDialog1.FilterIndex
Case 1
Me.button2.Image.Save(fs, _
System.Drawing.Imaging.ImageFormat.Jpeg)

Case 2
Me.button2.Image.Save(fs, _
System.Drawing.Imaging.ImageFormat.Bmp)

Case 3
Me.button2.Image.Save(fs, _
System.Drawing.Imaging.ImageFormat.Gif)
End Select

fs.Close()
End If

CIao!

[.Avanatsia.]

Ti ringrazio ma non era quello che mi serviva

a me serve di salvare tutto il form costruito cosi com'è

quando poi faccio apri mi ritorna cosi come l'ho modificato :-)

è come se vai su file/salva di un programma qualsiasi

[Gandalfrank]

Se vuoi memorizzare tutto il form puoi usare la serializzazione.

dai un'occhiata quà

[gibra]

Originariamente inviato da .Avanatsia.
Ti ringrazio ma non era quello che mi serviva

Ma è proprio quello che hai chiesto tu, ed il titolo della discussione non lascia dubbi su questo, quindi ti sei espresso malissimo.

Ciao

[Alexander777]

Bhè, questo non era espresso nel messaggio inziale, come hai detto tu.
Comunque, se vuoi, ti posso dare solo questo:

Dim memoryImage As Bitmap

Dim myGraphics As Graphics = Me.CreateGraphics()
Dim s As Size = DimensioniQuadro
memoryImage = New Bitmap(s.Width, s.Height, myGraphics)
Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage)
memoryGraphics.CopyFromScreen(CoordinateX, CoordinateY, 0, 0, s)


cattura l'immagine nello schermo, e in questo modo specificare che cattura il form.

Spero di esserti stato d'aiuto.