Resumen JPG modificar tamaño y resolucion

El cambio de tamaño y escala lo puedes realizar en VB utilizando el método
PaintPicture del objeto PictureBox.
Puedes grabar la imagen haciendo un SavePicture, pero el formato de salida
es siempre BMP.

Para convertir los BMPs a JPG otra vez se puede utilizar el programa
PaintShopPro (PSP) que trae un batch conversion que permite cambiar el
formato de los gráficos (no escalarlos).

En VB sería algo así

Debes poner 2 controles PictureBox. En el primero presentas el original
utilizando LoadPicture (en vb5 lee JPG) y luego lo escalas en el segundo
utilizando PaintPicture.

Ej:
        Pic2.PaintPicture Pic1.Image, 0, 0, Pic1.ScaleWidth,
Pic1.ScaleHeight

Luego grabas el BMP escalado con SavePicture.

Notas:
    El Pic1 debería tener
            AutoSize = True
            BorderStyle = 0
    El Pic2 debería tener
            Autosize = False
            BorderStyle = 0
            Las dimensiones que deseas obtener.
    El Formulario, Pic1, Pic2 y Pic3 debrían tener el mismo ScaleMode

    Para escalar manteniendo las proporciones se necesita hacer algunos
cálculo que no tengo en este momento a mano.

Suerte.
Peky.

------------------------------------------------
e-mail <peky@satlink.com>
-----Original Message-----
De: fmcalva <fmcalva@arrakis.es>
Para: vb-esp@ccc.uba.ar <vb-esp@ccc.uba.ar>
Fecha: Viernes 30 de Enero de 1998 05:51
Asunto: (VB-ESP) JPG modificar tamaño y resolucion


> Necesito coger una coleccion de imagenes (en formato JPG) una a una y
> convertirlas todas
> al mismo tamaño y la misma resolucion.
> Alguna pista de como puedo hacerlo.
>
> Gracias
> J.Garcia
>



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com