4D v14.3PICTURE TO GIF |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v14.3
PICTURE TO GIF
|
PICTURE TO GIF ( imagem ; blobGIF ) | ||||||||
Parâmetro | Tipo | Descrição | ||||||
imagem | Imagem |
![]() |
Campo ou variável de imagem | |||||
blobGIF | BLOB |
![]() |
BLOB que contém a imagem GIF | |||||
O comando PICTURE TO GIF permite converter uma imagem PICT armazenada em uma variável ou num campo 4D em uma imagem GIF.
Em pict se passa uma variável ou um campo tipo imagem e no parâmetro blobGIF, um campo ou uma variável de tipo BLOB. Depois da execução do comando, blobGIF contém a imagem em formato GIF.
Nota: o formato GIF não pode ter mais de 256 cores. Se a imagem PICT original contiver mais cores, algumas poderiam ser perdidas. O comando reduz o número de cores de acordo a palheta do sistema. O GIF gerado é de Tipo 87a (opaco) e normal (não entrelaçado).
Depois pode guardar a imagem localizada em blobGIF em um arquivo utilizando o comando Windows Ctrl down ou inclusive pode publicá-la na Web.
Se a conversão foi exitosa, a variável sistema OK toma o valor 1. Do contrário, será igual a 0.
Imagine que queira gerar uma imagem GIF mostrando um contador de conexiones. Em librería de imagens do base, coloque todos os números como imagens:
No Método de banco de dados On Web Connection, você escreve o código a seguir:
If(Web Context)
...
Else
C_BLOB($blob)
Case of
...
:($1="/4dcgi/contador") `Geração do contador GIF
`Quando 4D detecta este URL enquanto envía a página estática
$blob:=gifcontador(◊nbHits) `Calcula a imagem GIF
`A variável ◊nbHits contém o número de conexões
WEB SEND BLOB($blob;"image/gif")
`Inserção da imagem e envío ao navegador
...
End case
End if
Este é o método gifcontador:
C_LONGINT($1)
C_PICTURE($img)
C_BLOB($0)
If($1=0)
$ndigitos:=1
Else
$ndigitos:=1+Length(String($1))
End if
If($ndigitos<5)
$ndigits:=5
End if
$div:=10^($ndigitos-1)
For($i;1;$ndigitos)
$ref:=Int($1/$div)%10
GET PICTURE FROM LIBRARY($ref+1000;imagem)
$img:=$img+imagem
$div:=$div/10
End for
PICTURE TO GIF($img;$0)
Durante o envio da página ao navegador web, 4D mostra uma imagem GIF como a imagem a seguir:
Se a conversão é realizada corretamente, a variável sistema OK toma o valor 1. Do contrário, toma o valor 0.
Produto: 4D
Tema: Imagens
Número
671
Modificado: 4D v6.7
Manual de linguagem 4D ( 4D v14 R3)
Manual de linguagem 4D ( 4D v14 R2)
Manual de linguagem 4D ( 4D v13.5)
Manual de linguagem 4D ( 4D v14.3)
Manual de linguagem 4D ( 4D v14 R4)
Inherited from : PICTURE TO GIF ( 4D v12.4)