Hola Carlos me llegó perfecto, un solo detalle, ya que tengo el archivo
grafico modificado en una variable como lo paso a un archivo físico. Desde
ya muchas gracias

 

 

Norberto Alvarez

Socio # 1892

 

 

De: [email protected] [mailto:[email protected]] En nombre de Carlos Morandin
Enviado el: miércoles, 03 de septiembre de 2014 08:00 p.m.
Para: GUFA List Member
Asunto: [GUFA] ImageMagick

 

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]





-- 
Carlos Morandin
Avellaneda 1428
CP 3080 Esperanza
Santa Fe
Tel (03496) 430443
Cel (03496) 15-542529
[email protected]

Responder a