Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
|
| Pagetitle |
|---|
...
|
...
...
...
|
Retorna
...
o
...
tipo
...
de imagem ( BMP ou JPG ) a partir de um path informado por parâmetro.
Sintaxe
| Bloco de código | ||
|---|---|---|
| ||
RetImgType( < cPath > )
|
Parâmetros
RetImgType ( < cImgPath> ) --> nRet
...
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|
...
cPath |
...
caractere | Indica o |
...
path completo da imagem |
...
. | X |
|
Retorno
Nome | Tipo | Descrição |
|---|---|---|
nRet |
...
numérico | Tipo da imagem, onde |
...
: 1 = Bitmap e 2 = JPG |
Observações
- Caso seja especificado um path sem a unidade de disco, o mesmo será considerado no ambiente do servidor, a partir do RootPath do ambiente (caso o path comece com \ ou /), ou a partir do StartPath do ambiente (caso o path não seja iniciado com \ ou /).
- Quando um path absoluto é especificado (com unidade de disco preenchida), a função será executada na estação em que o SmartClient está em execução.
- O caminho de cPath será convertido para letra minúscula. A partir da build 7.00.121227A, o caminho não será convertido para letra minúscula para Logix.
Exemplos
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
user function Exemplo () Local cFile := "C:\totvs\bin\smartclient\totvs.jpg" Local nImgType := RetImgType( cFile ) if nImgType ==TYPE_BMP 1 // BMP conout(' "Arquivo BMP' ") elseif nImgType == 2 //TYPE_ JPG conout(' "Arquivo JPG') endIf ")
else
conout("Arquivo nao encontrado ou nao identificado!")
endif
Return
|
Abrangência
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas