Dobrý den mám tento kod: kde chci ukládat obrázky z pictureboxu ale z nějakého důvodu to nefunguje ale u textu když napíšu místo Picturebox textbox.text tak to uloží a filter All (*.*)| *.*
SaveFileDialog1.Filter = "Obrázky(*.jpeg)| *.jpeg"
SaveFileDialog1.ShowDialog()
If SaveFileDialog1.FileName <> "" Then
FileOpen(1, SaveFileDialog1.FileName, OpenMode.Output)
PrintLine(1, PictureBox.Image)
FileClose(1)
End If
|