Imprimir parte de Form

[Highlander]

Hola tengo un aplicación en Winforms en la cual genero una especie de etiqueta, me gustaría poder tener un botón con el cual se exporte a algún formato tipo jpg.

He revisado la web buscando alternativas y lo que encuentro siempre es exportar el contenido de una PictureBox a jpg, pero en mi caso no tengo la dicha PictureBox, habrá alguna otra alternativa?

Gracias por cualquier sugerencia.

[Ka0stj]

Dicha etiqueta es parte del Form?, es decir, la generas directamente en el Form? porque hasta donde veo es mucho más sencillo mandar de un picturebox que tomar cierta parte del Form. Te tendrias que saber las coordenadas exactas de donde se encuentra tu etiqueta y quizás estar recorriendolo a nivel pixel.

Saludos!

[Highlander]

Iniciado por Ka0stj

Dicha etiqueta es parte del Form?, es decir, la generas directamente en el Form? porque hasta donde veo es mucho más sencillo mandar de un picturebox que tomar cierta parte del Form. Te tendrias que saber las coordenadas exactas de donde se encuentra tu etiqueta y quizás estar recorriendolo a nivel pixel.

Saludos!

Hola, mira lo que yo llamo etiqueta es un panel con algunas labels y textbox con datos obtenidos de la base de datos.

[Ka0stj]

Ok, checa el siguiente enlace haber si te sirve:

http://social.msdn.microsoft.com/For...a-b48cf6ca6488

[Highlander]

Iniciado por Ka0stj

Ok, checa el siguiente enlace haber si te sirve:

http://social.msdn.microsoft.com/For...a-b48cf6ca6488

Ok con tu ayuda logre guardar el panel a jpg con el siguiente codigo:

Código:

Dim bmp As New Bitmap(Panel2.Width, Panel2.Height)
Panel2.DrawToBitmap(bmp, Panel2.ClientRectangle)

bmp.Save("panel.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

Ahora estoy viendo la posibilidad de que el usuario seleccione la ruta y el formato en el cual guardar la foto.

Gracias.

[Aquaventus]

podrias usar un SaveFileDialog como de esta manera :

Código c#:

SaveFileDialog1.Title = "Guardar Imagen En....";
                SaveFileDialog1.DefaultExt = "jpeg";
                SaveFileDialog1.Filter = "JPEG|*.jpeg|BITMAP|*.bmp|PNG|*.png|All Files|*.*";
                SaveFileDialog1.FilterIndex = 1;
 
                if (SaveFileDialog1.ShowDialog() == DialogResult.OK)
                {
                    if (SaveFileDialog1.FileName == "")
                    {
                        return;
                    }
                    //Obtengo la extension del archivo
                    string strExt;
                    strExt = System.IO.Path.GetExtension(SaveFileDialog1.FileName);
 
                    if (strExt == ".jpeg")
                    {
                        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Jpeg);
                    }
                    if (strExt == ".bmp")
                    {
                        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Bmp);
                    }
                    if (strExt == ".png")
                    {
                        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Png);
                    }
                    MessageBox.Show("Imagen Guardada Correctamente!\n* Ubicacion : " + SaveFileDialog1.FileName.toString() + "");
}
 

Espero te haya dado una idea. Saludos!.

[Ka0stj]

Puedes utilizar SaveFileDialog para indicar la ruta donde quieres guardar tu archivo, algo como lo siguiente:

Código vb:

Dim SFD As Windows.Forms.SaveFileDialog = New Windows.Forms.SaveFileDialog()
        SFD.RestoreDirectory = True
 
        Dim _Path As String = String.Empty
        Dim _Extension As String = ".jpg"
 
        If SFD.ShowDialog() = DialogResult.OK Then
 
            _Path = SFD.FileName
 
            '-- Aqui guardas tu imagén
 
End If
 

Saludos!

[Highlander]

Iniciado por Ka0stj

Puedes utilizar SaveFileDialog para indicar la ruta donde quieres guardar tu archivo, algo como lo siguiente:

Código vb:

Dim SFD As Windows.Forms.SaveFileDialog = New Windows.Forms.SaveFileDialog()
        SFD.RestoreDirectory = True
 
        Dim _Path As String = String.Empty
        Dim _Extension As String = ".jpg"
 
        If SFD.ShowDialog() = DialogResult.OK Then
 
            _Path = SFD.FileName
 
            '-- Aqui guardas tu imagén
 
End If
 

Saludos!

Gracias eso anda de lujo, lo único que cuando sale el savedialog no muestra abajo la extensión, imagino que debería venir seleccionado en jpg(aunque la graba bien)

[Aquaventus]

en el codigo que te pase alli se indica como colocarle los filtros, es similar en vb.net solo chequea sus propiedades. Saludos!.

[Aquaventus]

Mi Codigo de C# pasado a VB.net :

Código vb.net:

SaveFileDialog1.Title = "Guardar Imagen En...."
SaveFileDialog1.DefaultExt = "jpeg"
SaveFileDialog1.Filter = "JPEG|*.jpeg|BITMAP|*.bmp|PNG|*.png|All Files|*.*"
SaveFileDialog1.FilterIndex = 1
 
If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
    If SaveFileDialog1.FileName = "" Then
        Return
    End If
    'Obtengo la extension del archivo
    Dim strExt As String
    strExt = System.IO.Path.GetExtension(SaveFileDialog1.FileName)
 
    If strExt = ".jpeg" Then
        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Jpeg)
    End If
    If strExt = ".bmp" Then
        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Bmp)
    End If
    If strExt = ".png" Then
        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Png)
    End If
    MessageBox.Show("Imagen Guardada Correctamente!" & vbLf & "* Ubicacion : " & SaveFileDialog1.FileName.toString() & "")
End If
 

Pagina usada : Convertir c# a VB.NET. Saludos!..

[Highlander]

Iniciado por Aquaventus

Mi Codigo de C# pasado a VB.net :

Código vb.net:

SaveFileDialog1.Title = "Guardar Imagen En...."
SaveFileDialog1.DefaultExt = "jpeg"
SaveFileDialog1.Filter = "JPEG|*.jpeg|BITMAP|*.bmp|PNG|*.png|All Files|*.*"
SaveFileDialog1.FilterIndex = 1
 
If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
    If SaveFileDialog1.FileName = "" Then
        Return
    End If
    'Obtengo la extension del archivo
    Dim strExt As String
    strExt = System.IO.Path.GetExtension(SaveFileDialog1.FileName)
 
    If strExt = ".jpeg" Then
        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Jpeg)
    End If
    If strExt = ".bmp" Then
        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Bmp)
    End If
    If strExt = ".png" Then
        bmp.Save(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Png)
    End If
    MessageBox.Show("Imagen Guardada Correctamente!" & vbLf & "* Ubicacion : " & SaveFileDialog1.FileName.toString() & "")
End If
 

Pagina usada : Convertir c# a VB.NET. Saludos!..

Que responden rápido, gracias me funciono a la perfección.