Visual Basic - Imprimir una imagen

Life is soft - evento anual de software empresarial
 
Vista:

Imprimir una imagen

Publicado por César (19 intervenciones) el 03/10/2000 00:00:00
¿Como se le pasa una imagen a un objeto printer para poder sacarla en un informe para su posterior impresión?
Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Imprimir una imagen

Publicado por isidroalmaguer (288 intervenciones) el 05/10/2000 00:00:00
hola...

yo use un reporte de crystal para sacar imagenes y usando una rutina del guille... colocas la imagen en una tabla con un campo ole y liisto...


espero esto te ayude...

la direccion del guille es

guille.costasol.net

saludos
isidroalmaguer
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Imprimir una imagen

Publicado por Marcelo (29 intervenciones) el 09/10/2000 00:00:00
tienes que utilizar printer.paintpicture
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Mas opciones...

Publicado por isidroalmaguer (288 intervenciones) el 09/10/2000 00:00:00
encontre esto en
www.somser.com
espero te sirva, ya tienes mas opciones

saludos
isidroalmaguer

´
´ IMPRIMIR UNA IMAGEN DE UN PICTURE BOX
´
´Print the Picture contained in a PictureBox or a Form

Public Sub PrintImage(p As IPictureDisp, Optional ByVal x, Optional ByVal y, Optional ByVal resize)

    If IsMissing(x) Then x = Printer.CurrentX

    If IsMissing(y) Then y = Printer.CurrentY

    If IsMissing(resize) Then resize = 1

    Printer.PaintPicture p, x, y, p.Width * resize, p.Height * resize

End Sub


´
´ FORMULARIO
´

Private Sub Command1_Click()

    ´Print the image loaded in Picture1 (real size)

    PrintImage Picture1.Picture

    ´Print the image loaded in Picture1 (half size)

    PrintImage Picture1.Picture, , , 0.5

    ´Print the image loaded in Picture1 (double size)

    PrintImage Picture1.Picture, , , 0.5

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Imprimir una imagen

Publicado por Alguien tiene otra opción ? (3 intervenciones) el 05/12/2000 00:00:00
Alguién tiene otra opción lo que no quiero es imprimir las imagenes desde un campo sino que quiero enlazarlos directamente con el archivo JPG o GIF por favor si alguién tiene otra posibilidad enviar urgente.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar