Ahi va !! Saludos Carlos El 03/09/2014 a las 07:48 p.m., Norberto Mario Alvarez escibió:
Hola Carlos, me parece que es lo que estoy buscando, pero el outlook me bloquea el prg, me lo podrás mandar zipeado. Desde ya muchas gracias por tu respuesta.** *Norberto Alvarez* *Socio # 1892* ***De:*[email protected] [mailto:[email protected]] *En nombre de *Carlos Morandin*Enviado el:* miércoles, 03 de septiembre de 2014 07:21 p.m. *Para:* GUFA List Member *Asunto:* [GUFA] ImageMagick Fijate si te sirve esto.es para bajar el peso de una imagen. en algun momento lo usé y me solucionó el tema.usa la clase _gdiPlus.vcx envio adjunto el prg ya que tiene 1.9k Espero te sirva. Saludos Carlos Morandin Se usa algo así: lcFileNew =ResizePicture(lcFilename,320,240,100) *!* FUNCTION ResizePicture() *!* La funcion requiere de 4 parametros: *!* tcFile -> Archivo de imagen *!* tcWitdth -> Nuevo ancho de imagen *!* tcHeigth -> Nuevo alto de imagen *!* tcQuality -> Calidad para el redimencionamiento (0 - 100) El 02/09/2014 a las 08:20 p.m., Norberto Mario Alvarez escibió: Estimados Colisteros, por medio de un sistema tengo que tomar una foto en jpg (yo la selecciono) y esta puede variar de tamaño 6 Mb, 4 Mb y tengo que bajar el peso de la misma y a su vez crear el Thumbnail, para que luego la envio a una ruta via ftp. Me han comentado del ImageMagick y la verdad no se por donde empezar, si alguien utilizo esta librería o alguna otra solicito una mano y/o ejemplo. Desde ya muchas gracias por vuestra atención. ** *Norberto Alvarez* *Socio # 1892* -- Carlos Morandin Avellaneda 1428 CP 3080 Esperanza Santa Fe Tel (03496) 430443 Cel (03496) 15-542529 [email protected] <mailto:[email protected]>
-- Carlos Morandin Avellaneda 1428 CP 3080 Esperanza Santa Fe Tel (03496) 430443 Cel (03496) 15-542529 [email protected]
resizepicture.rar
Description: Binary data
