|
Usa un objeto TJPegImage (unidad jpeg).
Ajustas su propiedad CompressionQuality y usas el método Compress. Con esto, al guardar la imagen (SaveToFile) el tamaño se ajustará al nivel de compresión escogido. Sólo recuerda, entre más pequeño es CompressionQuality, menor es el tamaño del archivo pero menor también es la calidad de la imagen.
// Saludos
|