|
|
 |
 |
|
Paypal | |
|
FTP | |
|
CCD | |
|
Buscar | |
|
Trucos | |
|
Trabajo | |
|
Foros | |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
09-08-2003
|
||||
|
||||
|
No voy a darte la solución, pero te voy a contar como hacerlo:
Cargas tu archivo de cualquier tipo en un TPicture, calculas el tamaño en que lo quieres dejar, creas un TBitmap y le das el tamaño calculado, luego haces Bitmap.Canvas.StretchDraw( Rect(datos calculados), Picture.Graphic), luego creas un TJpegImage, le asignas el Bitmap y luego le pones el CompressionQuality que tu desees. Creo que no se me olvidó ningún paso, espero que te siva y lee la Guía de Estilo Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. 
Última edición por delphi.com.ar fecha: 09-08-2003 a las 01:42:35. 
|
|
|
 |
|
Modo Hilado