4D Doc Center : LOAD COMPRESS PICTURE FROM FILE

4D v13.4

LOAD COMPRESS PICTURE FROM FILE


LOAD COMPRESS PICTURE FROM FILE ( documento ; metodo ; qualidade ; imagem )

Parâmetro	Tipo	Descrição
documento	DocRef	Número de referência de documento
metodo	cadeia	método de compressão de string de 4 caracteres
qualidade	Inteiro longo	Qualidade compressão (1..1000)
imagem	Imagem	Imagem comprimida

Nota de compatibilidade

Este comando chama mecanismos obsoletos e só se conserva por razões de compatibilidade. Foi substituído favorávelmente pelos comandos READ PICTURE FILE e CONVERT PICTURE

Descrição

Este comando comprime uma imagem carregada de um documento em disco.

Nota: este comando não funciona em Windows.

Pode abrir um documento PICT utilizando a função Open document. Depois pode utilizar a referência do documento retornado por esta função para carregar e comprimir a PICT encontrada no documento. Este comando carrega a imagem em memória, a comprime utilizando o método e qualidade que especificou e depois a devolve em imagem.

A imagem se carrega em memória antes de ser comprimida. Se não houver suficiente memória para carregar a imagem, utilize COMPRESS PICTURE FILE antes de chamar a LOAD COMPRESS PICTURE FROM FILE.

O parâmetro metodo é uma cadeia de 4 caracteres que indica o tipo de compressão. Neste parâmetro deve passar uma das constantes do tema Compressão de imagem. Se metodo for uma cadeia vazia, a imagem se carrega mas não se comprime.

O parâmetro qualidade é um inteiro entre 1 e 1 000 indicando a qualidade da imagem comprimida. Em geral, reduzir a qualidade permite uma melhor compressão da imagem.

Advertência: o raio de compressão possível para uma qualidade dada depende do tamanho e a natureza da imagem que estiver comprimindo. A compressão de imagens pequenas poderia não produzir uma redução do tamanho.

Exemplo

O exemplo a seguir apresenta uma caixa de diálogo de abertura de arquivo que lhe permite selecionar um arquivo PICT. A imagem no arquivo PICT é carregada em memória, se comprime e se armazena em uma variável de tipo imagem. Depois é fechado o arquivo.

 vRef:=Open document("";"PICT")

 If(OK=1)

    LOAD COMPRESS PICTURE FROM FILE(vRef;QT Photo compressor;500;vPict)

    CLOSE DOCUMENT(vRef)

 End if