Reducir resolucion de imagen

[giantonti1801]

Empezado por Neftali [Germán.Estévez]

Cuando haces esto:

Código Delphi [-]
UniQueryIMG.ParamByName('FOTO').Assign(Image4.bitmap);

Convierte antes la image del componente TImage a JPG o a PNG (ambos formatos con compresión).
Para eso puedes encontrar muchos códigos en los foros.

Efectivamente pero debo cambiar el formato

Código Delphi [-]
UniQueryIMG.ParamByName('FOTO').Assign(Image4.jpeg);

o
UniQueryIMG.ParamByName('FOTO').Assign(Image4.picture);[/delphi]
para poder hacer eso debo colocar en el uses el 'JPEG' pero me da error al parecer no lo reconoce o me falta algun componente.


al agregar el jpeg en uses me da error de "f2063 could not compile used unit 'jpeg'"