versión 3
LOAD COMPRESS PICTURE FROM FILE (documento; metodo; calidad; imagen)
Parámetro | Tipo | Descripción | |
documento | DocRef | Número de referencia del documento | |
metodo | Alfa | Método de compresión cadena 4 caracteres | |
calidad | Numérico | Calidad de compresión (1..1000) | |
imagen | Imagen | Imagen comprimida |
Nota de compatibilidad: Este comando llama mecanismos obsoletos y sólo se mantiene por razones de compatibilidad. Ha sido reemplazado favorablemente por los comandos READ PICTURE FILE y CONVERT PICTURE.
Descripción
Este comando comprime una imagen cargada de un documento en disco.
Nota: Este comando no funciona en Windows.
Usted puede abrir un documento PICT utilizando la función Open document. Luego puede utilizar la referencia del documento devuelta por esta función para cargar y comprimir la PICT encontrada en el documento. Este comando carga la imagen en memoria, la comprime utilizando el método y calidad que usted especificó, y luego la devuelve en imagen.
La imagen se carga en memoria antes de ser comprimida. Si no hay suficiente memoria para cargar la imagen, utilice COMPRESS PICTURE FILE antes de llamar a LOAD COMPRESS PICTURE FROM FILE.
El parámetro metodo es una cadena de 4 caracteres que indica el tipo de compresión. En este parámetro debe pasar una de las constantes del tema Compresión de imágenes. Si metodo es una cadena vacía, la imagen se carga pero no se comprime.
El parámetro calidad es un entero entre 1 y 1000 indicando la calidad de la imagen comprimida. En general, reducir la calidad permite mayor compresión de la imagen.
Advertencia: El radio de compresión posible para una calidad dada depende del tamaño y la naturaleza de la imágen que esté comprimiendo. La compresión de imágenes pequeñas podría no producir una reducción del tamaño.
Ejemplo
El ejemplo siguiente presenta una caja de diálogo de apertura de archivo que le permite seleccionar un archivo PICT. La imagen en el archivo PICT se carga en memoria, se comprime y se almacena en una variable de tipo imagen. Luego se cierra el archivo.
vRef:=Open document ("";"PICT") If (OK=1) LOAD COMPRESS PICTURE FROM FILE(vRef;QT Photo compressor;500;vPict) CLOSE DOCUMENT(vRef) End if
Ver también
COMPRESS PICTURE, COMPRESS PICTURE FILE, CONVERT PICTURE, Introducción imágenes, READ PICTURE FILE, SAVE PICTURE TO FILE.