Recortar una imagen antes del printre.paintpicure

Ti
07 de Noviembre del 2003
Bueno, es visto muchos codigos de como imprimir
una imagen en VB , con el objeto printer, pero
necesito recortar la imagen, solo imprimer una parte
de la imagen , ya que la misma es mas grande que
el form, bueno si alguno puede pasarme algun
codigo de este tipo de impresion, Muchas Gracias

si es con ayuda mejor ;)

Baltasar
07 de Noviembre del 2003
Mírate la ayuda de paintpicture, verás que después de las coordenadas de la imagen, le puedes dar el tamaño de la misma, e incluso una zona de recorte. Todo eso te lo hace ya el objeto printer.

Saludos

Ti
07 de Noviembre del 2003
Gracias, pero el problema es que no tengo la ayuda
en CD ni nada de eso, es por eso que pregunto
como es especificamente donde se pone o como
se pone la instruccion de corte
si tienen algun ejemplo del codigo, se los
agradezco !!!


Baltasar
07 de Noviembre del 2003
ahora que estoy frente al ordenador que tiene el visual, te copio lo que explica la ayuda:

Sintaxis:
objeto.PaintPicture imagen, x1, y1, ancho1, alto1, x2, y2, ancho2, alto2, código_op

La sintaxis del método PaintPicture consta de las siguientes partes:

Parte Descripción
objeto Opcional. Una expresión de objeto que da como resultado un objeto de la lista Aplicable a. Si se omite objeto, se supone que objeto es el objeto Form que tenga el enfoque.

imagen Requerido. El origen del gráfico que se va a presentar en objeto. Debe ser la propiedad Picture de un objeto Form o control PictureBox.

x1, y1 Requerido. Valores de precisión simple que indican las coordenadas de destino (eje x y eje y) del objeto en el que se dibuja la imagen. La propiedad ScaleMode del objeto determina las unidades de medida que se usan.

ancho1 Opcional. Un valor de precisión simple que indica el ancho de destino de la imagen. La propiedad ScaleMode del objeto determina las unidades de medida que se usan. Si el ancho de destino es mayor o menor que el ancho de origen (ancho2), imagen se amplía o se comprime para que quepa. Si se omite, se usa el ancho de origen.

alto1 Opcional. Un valor de precisión simple que indica el alto de destino de la imagen. La propiedad ScaleMode del objeto determina las unidades de medida que se usan. Si el alto de destino es mayor o menor que el alto de origen (alto2), la imagen se amplía o se comprime para que quepa. Si se omite, se usa el alto de origen.

x2, y2 Opcional. Valores de precisión simple que indican las coordenadas (eje x y eje y) de la región de recorte dentro de la imagen. La propiedad ScaleMode del objeto determina las unidades de medida que se usan. Si se omite, se asume el valor 0.

ancho2 Opcional. Un valor de precisión simple que indica el ancho de la región de recorte de la imagen. La propiedad ScaleMode del objeto determina las unidades de medida que se usan. Si se omite, se usa el ancho de origen total.

alto2 Opcional. Un valor de precisión simple que indica el alto de origen de una región de recorte de la imagen. La propiedad ScaleMode del objeto determina las unidades de medida que se usan. Si se omite, se usa el alto de origen total.

código_op Opcional. Un valor de tipo Long o código que se usa sólo con mapas de bits. Define una operación bit a bit (como vbMergeCopy o vbSrcAnd) que se realiza sobre imagen a medida que se dibuja sobre objeto. Para obtener la lista completa de constantes de operadores a nivel de bits, vea el tema Constantes de RasterOp en la Ayuda de Visual Basic.

Ti
07 de Noviembre del 2003
Gracias Baltasar !!!!!!!!!!!

Mil gracias !!

Baltasar
07 de Noviembre del 2003
Perdona, pensaba que tenías la ayuda.

Pues te pongo un ejemplo de lo que se puede hacer:

printer.scale(0,0)-(2100,2970) 'A4
printer.paintpicture picture1.picture X,Y,W,H,x2,y2,w2,h2
printer.enddoc

X,Y - posición de la imagen en el papel
W,H - ancho y alto de la imagen en el papel
X2,Y2 posición en la imagen de la zona desde la que se quiere imprimir (usar sólo para recortar)
W2,H2 ancho y alto de la zona a recortar

espero que puedas entenderlo, si no es así, avisa.