FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Reducir el tamaño de una imagen
hola!!
tengo el siguiente problema : yo necesito en mi aplicacion almacenar fotos en un tamaño de 640x480, pero puede pasar que me ingresen una imagen de 1024x768. como puedo hacer, al momento de guardar la imagen, que sin importar que tamaño tenga la foto original yo la pueda guardar con un tamaño de 640x480?? aclaro que ya hice esta pregunta y me dijeron que mirara el truco 467, pero primero que no tengo idea lo que es un thumbnail (perdon por lo bruto) y el codigo lo mire.. pero la verdad no lo entiendo... :S Muchas gracias y tengan paciencia.. hace poquito empeze con Delphi. Saludos!! |
#2
|
||||
|
||||
Cita:
A parte del truco, si buscas por los foros creo que te saldrán mensajes de cómo cambiar el tamaño de una imagen, utilizando un Canvas; He algo que ya se ha discutido.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#4
|
|||
|
|||
antes que nada gracias por la respuesta, pero el problema es que ese link que me mostraste funciona con imagenes en bitmap y yo estoy usando Jpeg.... tendria que haberlo mencionado antes.. disculpenme.
probe con la linea : jpg.SetSize (ancho, largo); pero me da error, dice que no puede cambiarse el tamaño de la imagen... |
#5
|
|||
|
|||
bueno queria comentarles que segui probando y logre achicar la foto.. de una manera muy enroscada.. convierto el jpg a bitmap para poder modificar el tamaño y luego lo guardo como jpg otra ves.... pero eso me da dos problemas
1- la imagen pesa como bitmap.. por mas que la extension sea .jpg 2- se me corta la imagen.. es decir.. como la imagen era enorme.. no se ajusta a su nuevo tamaño, sino que me muestra el pedazo de foto que entre en la nueva resolucion. les muestro el codigo para que me digan... bueno en fin que me digan que soy un bruto :P Jpg := TJpegImage.Create; Jpg.LoadFromFile(ruta); MyBMP := TBitmap.Create; with MyBMP do begin Canvas. Width := 640; Height := 480; Canvas.Draw(0,0,Jpg); SaveToFile('c:\'+nombrefoto+'.jpg'); Free; end; JPG.FREE; perdon por este post largo |
#6
|
||||
|
||||
Hola pablopessoa, por favor utiliza las etiquetas [delph¡] Tu codigo aquí [/delphi]
Si quieres una imagen que no pierda su relacion de aspecto que sea sencilla y de conversion rápida, manejandolo como thumbnail, puedes usar lo dicho aquí asi:
Saludos |
#7
|
|||
|
|||
gracias lo voy a probar y perdon por lo del codigo, ya me preguntaba yo como hacian ustedes para que les salga tabulado y con color..... jajajajaajaj
un saludo!!! |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Reducir tamaño de un ejecutable | mrmanuel | Varios | 12 | 23-08-2013 02:35:30 |
Reducir tamaño bmp | atos | Impresión | 0 | 18-07-2008 11:43:02 |
Reducir tamaño de imagen de un dbimage | Walterdf | Gráficos | 4 | 11-11-2004 14:20:33 |
reducir tamaño del LOG | orodriguezc | MS SQL Server | 3 | 09-03-2004 14:50:35 |
|